diff options
author | jao <jao@gnu.org> | 2021-04-15 22:37:22 +0100 |
---|---|---|
committer | jao <jao@gnu.org> | 2021-04-15 22:37:22 +0100 |
commit | 38646b8a1f9f5c4ce9d8554f66b272f2d08a4e18 (patch) | |
tree | 2e34d671707cba7ba24002315020080a8fd91904 /lib/eos | |
parent | ddd39156cf91e9b042be2b2e9c1597c626f1ed9e (diff) | |
download | elibs-38646b8a1f9f5c4ce9d8554f66b272f2d08a4e18.tar.gz elibs-38646b8a1f9f5c4ce9d8554f66b272f2d08a4e18.tar.bz2 |
integration of zathura with pdf sessions
Diffstat (limited to 'lib/eos')
-rw-r--r-- | lib/eos/jao-afio.el | 25 |
1 files changed, 13 insertions, 12 deletions
diff --git a/lib/eos/jao-afio.el b/lib/eos/jao-afio.el index d031e59..90abc7f 100644 --- a/lib/eos/jao-afio.el +++ b/lib/eos/jao-afio.el @@ -131,18 +131,19 @@ (defvar jao-afio-switch-hook nil) (defun jao-afio--goto-frame (next &optional reset) - (let ((next-cfg (when (not reset) (get-register next)))) - (window-configuration-to-register jao-afio--current-config) - (setq jao-afio--current-config next) - (if next-cfg - (jump-to-register next) - (delete-other-windows) - (cl-case next - (?w (jao-afio-open-www)) - (?g (jao-afio-open-gnus)) - (?p (jao-afio-open-doc)) - (?s (delete-other-windows)))) - (run-hooks 'jao-afio-switch-hook))) + (when (or reset (not (eq next jao-afio--current-config))) + (let ((next-cfg (when (not reset) (get-register next)))) + (window-configuration-to-register jao-afio--current-config) + (setq jao-afio--current-config next) + (if next-cfg + (jump-to-register next) + (delete-other-windows) + (cl-case next + (?w (jao-afio-open-www)) + (?g (jao-afio-open-gnus)) + (?p (jao-afio-open-doc)) + (?s (delete-other-windows)))) + (run-hooks 'jao-afio-switch-hook)))) (defun jao-afio--goto-main (&optional reset) (interactive "P") |