From 2312bb41838b266b5632a0d1ab5d1ba0b5c67cbe Mon Sep 17 00:00:00 2001 From: Dave Love Date: Tue, 6 Jun 2000 13:47:36 +0000 Subject: [PATCH] (gnus-add-minor-mode): Make it an alias if add-minor-mode is available. (gnus-article-display-xface): Don't specify string for insert-image. --- lisp/gnus-ems.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/lisp/gnus-ems.el b/lisp/gnus-ems.el index 5377ee169..9410b9229 100644 --- a/lisp/gnus-ems.el +++ b/lisp/gnus-ems.el @@ -156,9 +156,9 @@ (boundp 'mark-active) mark-active)) -(defun gnus-add-minor-mode (mode name map) - (if (fboundp 'add-minor-mode) - (add-minor-mode mode name map) +(if (fboundp 'add-minor-mode) + (defalias 'gnus-add-minor-mode 'add-minor-mode) + (defun gnus-add-minor-mode (mode name map) (set (make-local-variable mode) t) (unless (assq mode minor-mode-alist) (push `(,mode ,name) minor-mode-alist)) @@ -249,7 +249,7 @@ for XEmacs." (when image (goto-char (point-min)) (re-search-forward "^From:" nil 'move) - (insert-image image " "))))) + (insert-image image))))) (provide 'gnus-ems) -- 2.25.1