diff options
| -rw-r--r-- | lib/eos/jao-afio.el | 8 | ||||
| -rw-r--r-- | org.org | 2 |
2 files changed, 6 insertions, 4 deletions
diff --git a/lib/eos/jao-afio.el b/lib/eos/jao-afio.el index f62c314..e6fce03 100644 --- a/lib/eos/jao-afio.el +++ b/lib/eos/jao-afio.el @@ -20,6 +20,8 @@ ;;; Code: +(require 'cl-lib) + (defvar jao-open-doc-fun 'find-file) (defvar jao-afio-mail-function 'gnus) (defvar jao-afio-use-w3m nil) @@ -81,9 +83,9 @@ (interactive) (delete-other-windows) (split-window-right) - (let ((docs (remove-if-not (lambda (b) - (with-current-buffer b (jao-doc-view--is-pdf))) - (buffer-list)))) + (let ((docs (cl-remove-if-not (lambda (b) + (with-current-buffer b (jao-doc-view--is-pdf))) + (buffer-list)))) (if (car docs) (progn (switch-to-buffer (car docs)) (switch-to-buffer-other-window (or (cadr docs) (car docs)))) @@ -60,7 +60,7 @@ org-agenda-show-all-dates t org-agenda-skip-deadline-if-done t org-agenda-skip-scheduled-if-done nil - org-agenda-span 7 + org-agenda-span 14 org-agenda-start-on-weekday nil org-agenda-window-setup 'current-window) #+end_src |