diff options
| author | Paul Eggert | 2016-01-30 11:27:34 -0800 |
|---|---|---|
| committer | Paul Eggert | 2016-01-30 11:27:34 -0800 |
| commit | 82b089783e71b2aeef950eaecfe4cbc0735e64a2 (patch) | |
| tree | a826c20768071bda95a69b2632718c1641c6d0cc /lisp/doc-view.el | |
| parent | d27c8078ef766dae3587bc82b70128a70efaa223 (diff) | |
| parent | f7dc6d8b5bb318e02a4016d93f8b34de0716f4dc (diff) | |
| download | emacs-82b089783e71b2aeef950eaecfe4cbc0735e64a2.tar.gz emacs-82b089783e71b2aeef950eaecfe4cbc0735e64a2.zip | |
-
Diffstat (limited to 'lisp/doc-view.el')
| -rw-r--r-- | lisp/doc-view.el | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/lisp/doc-view.el b/lisp/doc-view.el index 286811358fb..06cf8dcef3a 100644 --- a/lisp/doc-view.el +++ b/lisp/doc-view.el | |||
| @@ -1714,7 +1714,8 @@ If BACKWARD is non-nil, jump to the previous match." | |||
| 1714 | ;; window-parameters in the window-state(s) and then restoring this | 1714 | ;; window-parameters in the window-state(s) and then restoring this |
| 1715 | ;; window-state should call us back (to interpret/use those parameters). | 1715 | ;; window-state should call us back (to interpret/use those parameters). |
| 1716 | (doc-view-goto-page page) | 1716 | (doc-view-goto-page page) |
| 1717 | (when slice (apply 'doc-view-set-slice slice))))) | 1717 | (when slice (apply 'doc-view-set-slice slice)) |
| 1718 | (current-buffer)))) | ||
| 1718 | 1719 | ||
| 1719 | (add-to-list 'desktop-buffer-mode-handlers | 1720 | (add-to-list 'desktop-buffer-mode-handlers |
| 1720 | '(doc-view-mode . doc-view-restore-desktop-buffer)) | 1721 | '(doc-view-mode . doc-view-restore-desktop-buffer)) |
| @@ -1788,9 +1789,7 @@ toggle between displaying the document or editing it as text. | |||
| 1788 | nil t) | 1789 | nil t) |
| 1789 | (add-hook 'clone-indirect-buffer-hook 'doc-view-clone-buffer-hook nil t) | 1790 | (add-hook 'clone-indirect-buffer-hook 'doc-view-clone-buffer-hook nil t) |
| 1790 | (add-hook 'kill-buffer-hook 'doc-view-kill-proc nil t) | 1791 | (add-hook 'kill-buffer-hook 'doc-view-kill-proc nil t) |
| 1791 | (when (and (boundp 'desktop-save-mode) | 1792 | (setq-local desktop-save-buffer 'doc-view-desktop-save-buffer) |
| 1792 | desktop-save-mode) | ||
| 1793 | (setq-local desktop-save-buffer 'doc-view-desktop-save-buffer)) | ||
| 1794 | 1793 | ||
| 1795 | (remove-overlays (point-min) (point-max) 'doc-view t) ;Just in case. | 1794 | (remove-overlays (point-min) (point-max) 'doc-view t) ;Just in case. |
| 1796 | ;; Keep track of display info ([vh]scroll, page number, overlay, | 1795 | ;; Keep track of display info ([vh]scroll, page number, overlay, |