diff options
author | jao <jao@gnu.org> | 2021-10-05 14:37:49 +0100 |
---|---|---|
committer | jao <jao@gnu.org> | 2021-10-05 14:37:49 +0100 |
commit | 4f16d1635a8a34864500be57939f71a7c398cf96 (patch) | |
tree | 92779c737d5beb76813287b7d00f65e9e92149c4 | |
parent | ba95ee504371c7a30f67e080a77e9a4d316e0bfb (diff) | |
download | elibs-4f16d1635a8a34864500be57939f71a7c398cf96.tar.gz elibs-4f16d1635a8a34864500be57939f71a7c398cf96.tar.bz2 |
nits
-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 |