X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/131a3a12c4b0171c71c122c3330f85fc19e9bb8f..7e09ef09a479731d01b1ca46e94ddadd73ac98e3:/lisp/gnus/gnus.el diff --git a/lisp/gnus/gnus.el b/lisp/gnus/gnus.el index 206f5a502f..30c89f5906 100644 --- a/lisp/gnus/gnus.el +++ b/lisp/gnus/gnus.el @@ -1,6 +1,6 @@ ;;; gnus.el --- a newsreader for GNU Emacs -;; Copyright (C) 1987-1990, 1993-1998, 2000-2014 Free Software +;; Copyright (C) 1987-1990, 1993-1998, 2000-2015 Free Software ;; Foundation, Inc. ;; Author: Masanobu UMEDA @@ -326,8 +326,9 @@ 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))) - (if (and (stringp str) + (load-path (append (mm-image-load-path) load-path))) + (if (and (display-graphic-p) + (stringp str) (string-match "^Gnus:" str)) (progn (add-text-properties 0 5