gnus-diary: Fix gnus-completing-read call.

[gnus] / lisp / mml2015.el

diff --git a/lisp/mml2015.el b/lisp/mml2015.el
index 391517f..55ebf8c 100644 (file)
--- a/lisp/mml2015.el
+++ b/lisp/mml2015.el
@@ -28,8 +28,8 @@
 
 ;;; Code:
 
-;; For Emacs < 22.2.
 (eval-and-compile
+  ;; For Emacs <22.2 and XEmacs.
   (unless (fboundp 'declare-function) (defmacro declare-function (&rest r)))
 
   (if (locate-library "password-cache")
@@ -56,11 +56,7 @@
                           'epg)
                       (error))
                     (progn
-                      (ignore-errors
-                       ;; Avoid the "Recursive load suspected" error
-                       ;; in Emacs 21.1.
-                       (let ((recursive-load-depth-limit 100))
-                         (require 'pgg)))
+                      (ignore-errors (require 'pgg))
                       (and (fboundp 'pgg-sign-region)
                            'pgg))
                     (progn (ignore-errors