Re: Doc View Page Problems

[Ian D <dunni@gnu.org>]

Stefan Monnier <monnier@IRO.UMontreal.CA> writes:

>>        One more thing that I noticed is that image-mode itself doesn't
>>        setup the default window configuration, so I've included a patch
>>        that will do this.
>
> Not sure if that's the right way to do it.
> How 'bout the patch below instead?
>
>
>         Stefan
>
>
> === modified file 'lisp/image-mode.el'
> --- lisp/image-mode.el	2014-04-17 03:58:25 +0000
> +++ lisp/image-mode.el	2014-04-20 02:46:54 +0000
> @@ -90,9 +90,8 @@
>  
>  (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)))))
>  
>

        That seems to do the trick.  I say go for it.

Ian D