"lawrence mitchell" <wence@gmx.li> wrote in message
news:wkptw0ngzl.fsf@ID-97657.usr.dfncis.de...
> pd wrote:
>
> [...] 5.8.x --> Oort
>
> > 1) I'd like to know how Oort differs from 5.x, so I can estimate how
much
> > work it will take to modify my .gnus file, etc.  I gather that some
changes
> > are required, at least if I want to take advantage of the new features
of
> > Oort.
>
> Bug reports of things failing to work are always useful, since
> then, the developers can make sure that they won't fail once Oort
> is released.

Will do.

> > 2) I'm caught in a Windows world, so configure, etc. don't work for me.
>
> No problem, the gnus distribution comes with a make.bat, which
> may do what you need.  However, you most likely only really want
> to compile the gnus files:

<stuff deleted>

I did add the path, and compile the .el files.  I haven't worried about the
info files yet because trying to load infohack didn't work for me (with
XEmacs 21.1.8).

However, when I tried to run gnus, I got:

Wrong number of arguments: gnus-continuum-version, 0

The traceback looks like this:

Signaling: (wrong-number-of-arguments gnus-continuum-version 0)
  gnus-continuum-version()
  byte-code("..." [gnus-summary-line-format-spec
gnus-summary-dummy-line-format-spec gnus-group-line-format-spec
emacs-version version gnus-version gnus-continuum-version group
"%M%S%p%P%5y: %(%g%)%l\n" summary-dummy "*  %(:                          :%)
%S\n" summary "%U%R%z%I%(%[%4L: %-23,23f%]%) %s\n"] 7)
  (defvar gnus-format-specs (byte-code "ÄBÅÆ BÇÈ\nEÉÊ EËÌE¯?"
[gnus-summary-line-format-spec gnus-summary-dummy-line-format-spec
gnus-group-line-format-spec emacs-version version gnus-version
gnus-continuum-version group "%M%S%p%P%5y: %(%g%)%l\n" summary-dummy "*  %(:
:%) %S\n" summary "%U%R%z%I%(%[%4L: %-23,23f%]%) %s\n"] 7) ("d:\\Program
Files\\XEmacs\\xemacs-packages\\ognus-0.07\\lisp\\gnus-spec.elc" . 2590))
  load-internal("gnus-spec" nil t nil binary)
  load("gnus-spec" nil t nil)
  require(gnus-spec)
  byte-code("..." [require gnus gnus-win gnus-int gnus-spec gnus-range
gnus-util message] 2)
  load-internal("gnus-start" nil nil nil binary)
  load("gnus-start" nil nil nil)
  gnus-1(nil nil nil)
  gnus(nil)
  call-interactively(gnus)
  command-execute(gnus t)
  execute-extended-command(nil)
  call-interactively(execute-extended-command)

Looks like it has something to do with my attempt to customize the summary
line, which is like this:

(setq gnus-summary-line-format "%U%R%z%I%(%[%4L: %-20,20n%]%) %d %(%s%)\n")
(setq gnus-group-line-format "%M%S%p%P%3y: %(%g%)%l %uA\n")

(defun gnus-user-format-function-A (header)
  (if (string-match "nnml:\\(.*\\)" gnus-tmp-group)
      (let ((directory (nnmail-group-pathname
                        (match-string 1 gnus-tmp-group)
                        "D:\\home\\mail")))
        (concat "(" (int-to-string
                     ( - (length (directory-files directory)) 3))
                                        ; . .. .overview
                ")"))
    ""))

;; From: Colin Walters <walters@cis.ohio-state.edu>
(defun pd/gnus-set-summary-line-format ()
  (interactive)
  (setq gnus-summary-line-format
        (cond ((string-match "todo" gnus-newsgroup-name)
               "todo: %d: %S\n")
              ((string-match "notes" gnus-newsgroup-name)
               "Note: %d: %S\n")
              (t
               "%U%R%z%I%(%[%4L: %-20,20n%]%) %d %s\n"))))

(add-hook 'gnus-summary-mode-hook 'pd/gnus-set-summary-line-format)