diff options
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/eos/jao-tracking.el | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/lib/eos/jao-tracking.el b/lib/eos/jao-tracking.el index f695b3e..fdb156b 100644 --- a/lib/eos/jao-tracking.el +++ b/lib/eos/jao-tracking.el @@ -137,13 +137,14 @@ (defun jao-tracking-next-buffer () (interactive) (if jao-tracking-use-scratch - (let ((n (jao-afio-frame-no))) - (unless (eq 0 n) (setq jao-tracking--start-frame n)) + (let ((k (if (numberp jao-tracking-use-scratch) jao-tracking-use-scratch 0)) + (n (jao-afio-frame-no))) + (unless (eq k n) (setq jao-tracking--start-frame n)) (cond (tracking-buffers (let ((bs tracking-buffers)) - (if (eq 0 n) + (if (eq k n) (tracking-next-buffer) - (jao-afio-goto-scratch) + (jao-afio-goto-nth k) (when (and (car bs) (not (memq (current-buffer) bs))) (pop-to-buffer (car bs))) (tracking-remove-visible-buffers)))) |