Re: [bug]Malformed -*- line

[Kenichi Handa]

In article <address@hidden>, Leo <address@hidden> writes:

>>> Gnus in emacs unicode-branch-2 writes a malformed -*- line to
>>> .newsrc.eld. The backtrace is:
> >
>>> ,----
>>> | Debugger entered--Lisp error: (error "Malformed -*- line")
>>> |   signal(error ("Malformed -*- line"))
>>> |   error("Malformed -*- line")
> >
> > Please send me that problematic .newsrc.eld (by base64 or uuencode).
> >

> I have sent the file to you but not to the list.

Thank you.  I found what is wrong.  Gnus (of
emacs-unicode-2) writes a header line as this

;; -*- emacs-lisp; coding:utf-8-emacs;-*-

but it should be:

;; -*- mode:emacs-lisp; coding:utf-8-emacs;-*-

If you directly read that file, fix the header, and save it,
gnus should start working.

Anyay, I've just installed the attached change.

---
Kenichi Handa
address@hidden


Index: gnus-start.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/gnus/gnus-start.el,v
retrieving revision 1.21.6.20
retrieving revision 1.21.6.21
diff -u -r1.21.6.20 -r1.21.6.21
--- gnus-start.el       19 Jul 2006 00:42:55 -0000      1.21.6.20
+++ gnus-start.el       25 Sep 2006 04:46:22 -0000      1.21.6.21
@@ -2803,7 +2803,7 @@
 
 (defun gnus-gnus-to-quick-newsrc-format (&optional minimal name &rest 
specific-variables)
   "Print Gnus variables such as `gnus-newsrc-alist' in Lisp format."
-    (princ (format ";; -*- emacs-lisp; coding: %s;-*-\n"
+    (princ (format ";; -*- mode:emacs-lisp; coding: %s; -*-\n"
                   gnus-ding-file-coding-system))
     (if name
        (princ (format ";; %s\n" name))