(Saving Articles): Addition.

[gnus] / texi / gnus-news.el

diff --git a/texi/gnus-news.el b/texi/gnus-news.el
index 0a07685..3c25d99 100644 (file)
--- a/texi/gnus-news.el
+++ b/texi/gnus-news.el
@@ -27,15 +27,13 @@
 
 (defvar gnus-news-header-disclaimer
 "GNUS NEWS -- history of user-visible changes.
-Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006 Free Software Foundation, Inc.
+Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005,
+   2006 Free Software Foundation, Inc.
 See the end for copying conditions.
 
 Please send Gnus bug reports to bugs\@gnus.org.
 For older news, see Gnus info node \"New Features\".
 
-\f
-* Changes in No Gnus
-
 ")
 
 (defvar gnus-news-trailer
@@ -45,7 +43,8 @@ For older news, see Gnus info node \"New Features\".
 ----------------------------------------------------------------------
 Copyright information:
 
-Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005 Free Software Foundation, Inc.
+Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005,
+   2006 Free Software Foundation, Inc.
 
    Permission is granted to anyone to make or distribute verbatim copies
    of this document as received, in any medium, provided that the
@@ -61,7 +60,7 @@ paragraph-separate: \"[       \f]*$\"\nend:\n")
 
 (defvar gnus-news-makeinfo-command "makeinfo")
 
-(defvar gnus-news-fill-column 72)
+(defvar gnus-news-fill-column 80)
 
 (defvar gnus-news-makeinfo-switches
   (concat " --no-headers --paragraph-indent=0"
@@ -98,6 +97,9 @@ paragraph-separate: \"[       \f]*$\"\nend:\n")
       (goto-char (point-min))
       (save-excursion
        (while (re-search-forward "^   \\* " nil t)
+         (replace-match "\f\n* ")))
+      (save-excursion
+       (while (re-search-forward "^        \\* " nil t)
          (replace-match "** ")))
       (save-excursion
        (while (re-search-forward "^     " nil t)