[Emacs-diffs] Changes to emacs/lisp/gnus/gnus.el

[Miles Bader]

Index: emacs/lisp/gnus/gnus.el
diff -c emacs/lisp/gnus/gnus.el:1.37 emacs/lisp/gnus/gnus.el:1.38
*** emacs/lisp/gnus/gnus.el:1.37        Wed Feb  9 15:50:37 2005
--- emacs/lisp/gnus/gnus.el     Sun Feb 13 08:47:44 2005
***************
*** 326,332 ****
    (defvar gnus-mode-line-image-cache t)
    (if (fboundp 'find-image)
        (defun gnus-mode-line-buffer-identification (line)
!       (let ((str (car-safe line)))
          (if (and (stringp str)
                   (string-match "^Gnus:" str))
              (progn (add-text-properties
--- 326,333 ----
    (defvar gnus-mode-line-image-cache t)
    (if (fboundp 'find-image)
        (defun gnus-mode-line-buffer-identification (line)
!       (let ((str (car-safe line))
!             (load-path (mm-image-load-path)))
          (if (and (stringp str)
                   (string-match "^Gnus:" str))
              (progn (add-text-properties
***************
*** 875,881 ****
     ((and
       (fboundp 'find-image)
       (display-graphic-p)
!      (let* ((data-directory (nnheader-find-etc-directory "gnus"))
            (image (find-image
                    `((:type xpm :file "gnus.xpm"
                             :color-symbols
--- 876,882 ----
     ((and
       (fboundp 'find-image)
       (display-graphic-p)
!      (let* ((data-directory (nnheader-find-etc-directory "images/gnus"))
            (image (find-image
                    `((:type xpm :file "gnus.xpm"
                             :color-symbols