1. xemacs
  2. xemacs-devel

Source

xemacs-devel / eldoc.el

Diff from to

File eldoc.el

   :group 'eldoc)
 
 ;; Put this minor mode on the global minor-mode-alist.
-(or (assq 'eldoc-mode (default-value 'minor-mode-alist))
-    (setq-default minor-mode-alist
-                  (append (default-value 'minor-mode-alist)
-                          '((eldoc-mode eldoc-minor-mode-string)))))
+(if (fboundp 'add-minor-mode)
+    (add-minor-mode 'eldoc-mode " ElDoc")
+  (or (assq 'eldoc-mode (default-value 'minor-mode-alist))
+      (setq-default minor-mode-alist
+		    (append (default-value 'minor-mode-alist)
+			    '((eldoc-mode eldoc-minor-mode-string))))))
 
 (defcustom eldoc-argument-case 'upcase
   "Case to display argument names of functions, as a symbol.