bug#18813: 25.0.50; gnus start fails unless image.el is loaded in advance.

[Katsumi Yamaoka]

On Fri, 24 Oct 2014 15:32:23 +0900, enami tsugutomo wrote:
> gnus start (i.e. M-x gnus) fails unless image.el is loaded in advance.
> Here is a backtrace (with through cat -v and some sensitive data is
> replaced with `...').  It looks like
> gnus-mode-line-buffer-identification shadows load-path.

Enami-san, thanks for tracking it down.  I've changed the function
in question as follows:

--- a/lisp/gnus.el
+++ b/lisp/gnus.el
@@ -326,7 +326,7 @@ be set in `.emacs' instead."
   (if (fboundp 'find-image)
       (defun gnus-mode-line-buffer-identification (line)
        (let ((str (car-safe line))
-             (load-path (mm-image-load-path)))
+             (load-path (append (mm-image-load-path) load-path)))
          (if (and (stringp str)
                   (string-match "^Gnus:" str))
              (progn (add-text-properties

I think it would not be a matter even if it causes finding another
gnus-pointer.