* mailcap.el (mailcap-mime-data): Mark as risky.

* gnus.el (gnus-group, gnus-summary, gnus-summary-sort): Fix
custom-manual entries.

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 392962f5613448d4812f5cae227891b038d2a324..9e744952dc5d3f431bc24b43fa15e6048e1cbb26 100644 (file)
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,5 +1,10 @@
 2004-08-16  Reiner Steib  <Reiner.Steib@gmx.de>
 
+       * mailcap.el (mailcap-mime-data): Mark as risky.
+
+       * gnus.el (gnus-group, gnus-summary, gnus-summary-sort): Fix
+       custom-manual entries.
+
        * time-date.el: Removed.  Merged into ../calendar/time-date.el.
 
 2004-08-02  Reiner Steib  <Reiner.Steib@gmx.de>
@@ -11247,7 +11252,7 @@
 ;; coding: iso-2022-7bit
 ;; End:
 
-    Copyright (C) 2002 Free Software Foundation, Inc.
+    Copyright (C) 2002 2004 Free Software Foundation, Inc.
   Copying and distribution of this file, with or without modification,
   are permitted provided the copyright notice and this notice are preserved.
 

diff --git a/lisp/gnus/gnus.el b/lisp/gnus/gnus.el
index c4321929a2268f0a4c85f26a421e7cd888bd6100..99e14a4148bee85e3ab3f80051909a67aa2eec06 100644 (file)
--- a/lisp/gnus/gnus.el
+++ b/lisp/gnus/gnus.el
@@ -70,7 +70,7 @@
 ;; These belong to gnus-group.el.
 (defgroup gnus-group nil
   "Group buffers."
-  :link '(custom-manual "(gnus)The Group Buffer")
+  :link '(custom-manual "(gnus)Group Buffer")
   :group 'gnus)
 
 (defgroup gnus-group-foreign nil
@@ -111,7 +111,7 @@
 ;; These belong to gnus-sum.el.
 (defgroup gnus-summary nil
   "Summary buffers."
-  :link '(custom-manual "(gnus)The Summary Buffer")
+  :link '(custom-manual "(gnus)Summary Buffer")
   :group 'gnus)
 
 (defgroup gnus-summary-exit nil
@@ -155,7 +155,7 @@
 
 (defgroup gnus-summary-sort nil
   "Sorting the summary buffer."
-  :link '(custom-manual "(gnus)Sorting")
+  :link '(custom-manual "(gnus)Sorting the Summary Buffer")
   :group 'gnus-summary)
 
 (defgroup gnus-summary-visual nil

diff --git a/lisp/gnus/mailcap.el b/lisp/gnus/mailcap.el
index 1a21149ae2d84c3df1fdc39312a6849657f62373..db0ab6143e1de79b39c51525525ecb7c8f4fafeb 100644 (file)
--- a/lisp/gnus/mailcap.el
+++ b/lisp/gnus/mailcap.el
@@ -305,6 +305,7 @@ validity.  Otherwise, if it is a non-function Lisp symbol or list
 whose car is a symbol, it is `eval'led to yield the validity.  If it
 is a string or list of strings, it represents a shell command to run
 to return a true or false shell value for the validity.")
+(put 'mailcap-mime-data 'risky-local-variable t)
 
 (defcustom mailcap-download-directory nil
   "*Directory to which `mailcap-save-binary-file' downloads files by default.