# HG changeset patch
# User Bill Wohler <wohler@newt.com>
# Date 1141589513 0
# Node ID 0b84cb235f62bdfd86115596937d70371de2a546
# Parent  287868e8ac6fc3e4a226da07f076df80bd2a5d94
* mh-folder.el (mh-folder-mode): Drop 'load-path argument when calling
mh-image-load-path-for-library since this is the default.

* mh-letter.el (mh-letter-mode): Ditto.

* mh-utils.el (mh-logo-display): Ditto.

diff -r 287868e8ac6f -r 0b84cb235f62 lisp/mh-e/ChangeLog
--- a/lisp/mh-e/ChangeLog	Sun Mar 05 13:12:42 2006 +0000
+++ b/lisp/mh-e/ChangeLog	Sun Mar 05 20:11:53 2006 +0000
@@ -1,3 +1,12 @@
+2006-03-05  Bill Wohler  <wohler@newt.com>
+
+	* mh-folder.el (mh-folder-mode): Drop 'load-path argument when
+	calling mh-image-load-path-for-library since this is the default.
+
+	* mh-letter.el (mh-letter-mode): Ditto.
+
+	* mh-utils.el (mh-logo-display): Ditto.
+
 2006-03-04  Bill Wohler  <wohler@newt.com>
 
 	* mh-compat.el (mh-image-load-path-for-library): Move here from
diff -r 287868e8ac6f -r 0b84cb235f62 lisp/mh-e/mh-folder.el
--- a/lisp/mh-e/mh-folder.el	Sun Mar 05 13:12:42 2006 +0000
+++ b/lisp/mh-e/mh-folder.el	Sun Mar 05 20:11:53 2006 +0000
@@ -591,8 +591,7 @@
 \\{mh-folder-mode-map}"
   (mh-do-in-gnu-emacs
     (unless mh-folder-buttons-init-flag
-      (let ((load-path (mh-image-load-path-for-library
-                        "mh-e" "mh-logo.xpm" 'load-path))
+      (let ((load-path (mh-image-load-path-for-library "mh-e" "mh-logo.xpm"))
             (image-load-path (mh-image-load-path-for-library
                               "mh-e" "mh-logo.xpm" 'image-load-path)))
         (mh-tool-bar-folder-buttons-init)
diff -r 287868e8ac6f -r 0b84cb235f62 lisp/mh-e/mh-letter.el
--- a/lisp/mh-e/mh-letter.el	Sun Mar 05 13:12:42 2006 +0000
+++ b/lisp/mh-e/mh-letter.el	Sun Mar 05 20:11:53 2006 +0000
@@ -313,8 +313,7 @@
   (make-local-variable 'mh-sent-from-msg)
   (mh-do-in-gnu-emacs
     (unless mh-letter-buttons-init-flag
-      (let ((load-path (mh-image-load-path-for-library
-                        "mh-e" "mh-logo.xpm" 'load-path))
+      (let ((load-path (mh-image-load-path-for-library "mh-e" "mh-logo.xpm"))
             (image-load-path (mh-image-load-path-for-library
                               "mh-e" "mh-logo.xpm" 'image-load-path)))
         (mh-tool-bar-letter-buttons-init)
diff -r 287868e8ac6f -r 0b84cb235f62 lisp/mh-e/mh-utils.el
--- a/lisp/mh-e/mh-utils.el	Sun Mar 05 13:12:42 2006 +0000
+++ b/lisp/mh-e/mh-utils.el	Sun Mar 05 20:11:53 2006 +0000
@@ -131,8 +131,7 @@
 (defun mh-logo-display ()
   "Modify mode line to display MH-E logo."
   (mh-do-in-gnu-emacs
-    (let ((load-path (mh-image-load-path-for-library
-                      "mh-e" "mh-logo.xpm" 'load-path))
+    (let ((load-path (mh-image-load-path-for-library "mh-e" "mh-logo.xpm"))
           (image-load-path (mh-image-load-path-for-library
                             "mh-e" "mh-logo.xpm" 'image-load-path)))
       (add-text-properties