diff options
| author | Bill Wohler <wohler@newt.com> | 2006-03-14 19:21:48 +0000 |
|---|---|---|
| committer | Bill Wohler <wohler@newt.com> | 2006-03-14 19:21:48 +0000 |
| commit | 44e3f44013ee5d526d2666e2ec8ed4962f9a6c77 (patch) | |
| tree | 159a8f63cdce362b039861c2e196fe0749ab38b4 /lisp/mh-e/mh-letter.el | |
| parent | 5248a565cad8ca4a489fb8e8cd1bd21a2cf8f006 (diff) | |
| download | emacs-44e3f44013ee5d526d2666e2ec8ed4962f9a6c77.tar.gz | |
* mh-compat.el (mh-image-load-path-for-library): Incorporate changes
from image-load-path-for-library, which are:
(image-load-path-for-library): Pass value of path rather than symbol.
Always return list of directories. Guarantee that image directory
comes first.
* mh-e.el (image-load-path): Define on those Emacsen that lack it to
avoid compile and run-time errors.
* mh-folder.el (mh-folder-mode): Use new idiom for setting
image-load-path.
* mh-letter.el (mh-letter-mode): Ditto.
* mh-utils.el (mh-logo-display): Ditto.
Diffstat (limited to 'lisp/mh-e/mh-letter.el')
| -rw-r--r-- | lisp/mh-e/mh-letter.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/mh-e/mh-letter.el b/lisp/mh-e/mh-letter.el index 9d28ee4ec95..a7290cf5ae9 100644 --- a/lisp/mh-e/mh-letter.el +++ b/lisp/mh-e/mh-letter.el @@ -313,9 +313,8 @@ order). (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")) - (image-load-path (mh-image-load-path-for-library - "mh-e" "mh-logo.xpm" 'image-load-path))) + (let* ((load-path (mh-image-load-path-for-library "mh-e" "mh-logo.xpm")) + (image-load-path (cons (car load-path) image-load-path))) (mh-tool-bar-letter-buttons-init) (setq mh-letter-buttons-init-flag t))) (set (make-local-variable 'tool-bar-map) mh-letter-tool-bar-map)) |