[Emacs-diffs] emacs/lisp/gnus ChangeLog nnrss.el

[Stefan Monnier]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Stefan Monnier <monnier>        09/08/27 05:19:43

Modified files:
        lisp/gnus      : ChangeLog nnrss.el 

Log message:
        (nnrss-request-article): Avoid default-fill-column.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/gnus/ChangeLog?cvsroot=emacs&r1=1.816&r2=1.817
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/gnus/nnrss.el?cvsroot=emacs&r1=1.28&r2=1.29

Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/gnus/ChangeLog,v
retrieving revision 1.816
retrieving revision 1.817
diff -u -b -r1.816 -r1.817
--- ChangeLog   25 Aug 2009 07:03:49 -0000      1.816
+++ ChangeLog   27 Aug 2009 05:19:42 -0000      1.817
@@ -1,3 +1,7 @@
+2009-08-27  Stefan Monnier  <address@hidden>
+
+       * nnrss.el (nnrss-request-article): Avoid default-fill-column.
+
 2009-08-25  Glenn Morris  <address@hidden>
 
        * nnir.el (top-level): Don't require cl at run-time.

Index: nnrss.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/gnus/nnrss.el,v
retrieving revision 1.28
retrieving revision 1.29
diff -u -b -r1.28 -r1.29
--- nnrss.el    17 Jul 2009 10:15:54 -0000      1.28
+++ nnrss.el    27 Aug 2009 05:19:43 -0000      1.29
@@ -272,7 +272,7 @@
                      (replace-match "\n")
                    (replace-match "\n\n")))
                (unless (eobp)
-                 (let ((fill-column default-fill-column)
+                 (let ((fill-column (default-value 'fill-column))
                        (window (get-buffer-window nntp-server-buffer)))
                    (when window
                      (setq fill-column