(gnus-add-minor-mode): Make it an alias if
authorDave Love <fx@gnu.org>
Tue, 6 Jun 2000 13:47:36 +0000 (13:47 +0000)
committerDave Love <fx@gnu.org>
Tue, 6 Jun 2000 13:47:36 +0000 (13:47 +0000)
add-minor-mode is available.
(gnus-article-display-xface): Don't specify string for
insert-image.

lisp/gnus-ems.el

index 5377ee1..9410b92 100644 (file)
        (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)