From: Reiner Steib <Reiner.Steib@gmx.de>
Date: Mon, 16 Aug 2004 10:13:58 +0000 (+0000)
Subject: * mailcap.el (mailcap-mime-data): Mark as risky.
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7f558a59c09e1b2b76a314f48cf9d40902c1587b;p=emacs.git

* 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 392962f5613..9e744952dc5 100644
--- 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 c4321929a22..99e14a4148b 100644
--- 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 1a21149ae2d..db0ab6143e1 100644
--- 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.