fix(tazjin/emacs): allow jumping to front of workspace history

Classic off-by-one error.

Change-Id: I53e143d900f1d3751ad16b3b33532f32e2c6b411
Reviewed-on: https://cl.tvl.fyi/c/depot/+/5245
Reviewed-by: tazjin <tazjin@tvl.su>
Autosubmit: tazjin <tazjin@tvl.su>
Tested-by: BuildkiteCI
This commit is contained in:
Vincent Ambo 2022-02-07 22:09:09 +03:00 committed by clbot
parent d522e75554
commit f82f459e2c

View file

@ -207,7 +207,7 @@ in-progress."
"Switch to the next workspace in the MRU workspace list." "Switch to the next workspace in the MRU workspace list."
(interactive) (interactive)
(if (<= *workspace-history-position* 1) (if (= *workspace-history-position* 0)
(message "No next workspace in history!") (message "No next workspace in history!")
(let* (;; The next workspace is one position further up in the (let* (;; The next workspace is one position further up in the
;; history. This always exists unless someone messed with ;; history. This always exists unless someone messed with