0
0
Fork 1
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-09-29 19:37:52 +00:00

Fix "Symbol’s function definition is void: case"

* lisp/org-macs.el (org-scroll): Use `cl-case' instead of `case'.
This commit is contained in:
Nicolas Goaziou 2020-04-14 16:48:27 +02:00
parent 62aa9d85d2
commit 0fadd06b72

View file

@ -1210,7 +1210,7 @@ window."
(let ((scrlup (if additional-keys '(?\s 22) 22))
(scrldn (if additional-keys `(?\d 134217846) 134217846)))
(eval
`(case ,key
`(cl-case ,key
;; C-n
(14 (if (not (pos-visible-in-window-p (point-max)))
(ignore-errors (scroll-up 1))