diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2014-04-21 10:34:49 -0400 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2014-04-21 10:34:49 -0400 |
| commit | 9253f7af873a4a343b46c219bbba8daa6ad73fe6 (patch) | |
| tree | 56bab8edfc634480464eb07b528ca1fb7ef77abb /lisp/image-mode.el | |
| parent | b53a667a5aa8d09635c7b8c3cae32b91b7ef75a6 (diff) | |
| download | emacs-9253f7af873a4a343b46c219bbba8daa6ad73fe6.tar.gz | |
* lisp/image-mode.el (image-mode-window-put): Don't assume there's a `t'
entry in image-mode-winprops-alist.
Diffstat (limited to 'lisp/image-mode.el')
| -rw-r--r-- | lisp/image-mode.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/image-mode.el b/lisp/image-mode.el index 98fc3857f41..b75946475dd 100644 --- a/lisp/image-mode.el +++ b/lisp/image-mode.el @@ -90,9 +90,8 @@ otherwise it defaults to t, used for times when the buffer is not displayed." (defun image-mode-window-put (prop val &optional winprops) (unless (consp winprops) (setq winprops (image-mode-winprops winprops))) - (setcdr (assq t image-mode-winprops-alist) - (cons (cons prop val) - (delq (assq prop (cdr winprops)) (cdr winprops)))) + (unless (eq t (car winprops)) + (image-mode-window-put prop val t)) (setcdr winprops (cons (cons prop val) (delq (assq prop (cdr winprops)) (cdr winprops))))) |