From 884e57101de6baf92d6d4e6c2c3476c7c3498185 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?S=C5=82awomir=20Grochowski?= Date: Sat, 3 Feb 2024 19:30:03 +0100 Subject: [PATCH] lisp/org-colview.el: [refactor] replace anonym. function with `forward-char * org-colview.el: [refactor] Replace an anonymous function with a named function `forward-char'. TINYCHANGE --- lisp/org-colview.el | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/lisp/org-colview.el b/lisp/org-colview.el index d0af89b61..81254c483 100644 --- a/lisp/org-colview.el +++ b/lisp/org-colview.el @@ -188,10 +188,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))) -- 2.30.2