org-colview: Replace anonymous function with `forward-char'

* lisp/org-colview.el (org-defkey): Do not use anonymous function as a
binding.
This commit is contained in:
Sławomir Grochowski 2024-02-03 19:30:03 +01:00 committed by Ihor Radchenko
parent 0a58a53eda
commit 0938795fd7
No known key found for this signature in database
GPG Key ID: 6470762A7DA11D8B
1 changed files with 2 additions and 4 deletions

View File

@ -183,10 +183,8 @@ See `org-columns-summary-types' for details.")
(org-defkey org-columns-map "\M-b" #'backward-char)
(org-defkey org-columns-map "a" #'org-columns-edit-allowed)
(org-defkey org-columns-map "s" #'org-columns-edit-attributes)
(org-defkey org-columns-map "\M-f"
(lambda () (interactive) (goto-char (1+ (point)))))
(org-defkey org-columns-map [right]
(lambda () (interactive) (goto-char (1+ (point)))))
(org-defkey org-columns-map "\M-f" #'forward-char)
(org-defkey org-columns-map [right] #'forward-char)
(org-defkey org-columns-map [down]
(lambda () (interactive)
(let ((col (current-column)))