diff options
Diffstat (limited to 'lib/eos')
| -rw-r--r-- | lib/eos/jao-afio.el | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/lib/eos/jao-afio.el b/lib/eos/jao-afio.el index 9e402a2..f6f07a3 100644 --- a/lib/eos/jao-afio.el +++ b/lib/eos/jao-afio.el @@ -22,6 +22,7 @@ (require 'multisession) (require 'cl-lib) (require 'jao-doc-session) +(require 'jao-pdf) (defvar jao-afio-use-frames (not window-system)) (defvar jao-afio-frame-parameters nil) @@ -115,14 +116,16 @@ (interactive) (dolist (doc (or docs (jao-doc-session))) (when (and (stringp doc) (file-exists-p doc)) - (if (jao-pdf-is-pdf-file doc) (jao-open-doc doc) (find-file doc)) + (if (jao-pdf-is-pdf-file doc) (funcall jao-open-doc-fun doc) (find-file doc)) (other-window 1))) (other-window 1)) +(defvar jao-afio-left-width nil) + (defun jao-afio-open-doc () (interactive) (delete-other-windows) - (split-window-right 80) + (split-window-right jao-afio-left-width) (let ((docs (cl-remove-if-not 'jao-doc-session-is-doc (buffer-list)))) (if (car docs) (progn (switch-to-buffer (car docs)) @@ -163,7 +166,7 @@ ;;;###autoload (defun jao-afio-open-gnus () (interactive) - (jao-org-agenda) + ;; (jao-org-agenda) (calendar) (find-file (expand-file-name "inbox.org" org-directory)) (delete-other-windows) |