From c3342a80113c7711ae9b7c0f65423232c8166f7e Mon Sep 17 00:00:00 2001 From: Liam Hupfer Date: Tue, 19 Sep 2023 21:39:59 -0500 Subject: [PATCH] nit(org): make activate function suffixes consistent --- modules/lang/org/autoload/org-link.el | 4 ++-- modules/lang/org/config.el | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/modules/lang/org/autoload/org-link.el b/modules/lang/org/autoload/org-link.el index ebccbfead..69fd98c7c 100644 --- a/modules/lang/org/autoload/org-link.el +++ b/modules/lang/org/autoload/org-link.el @@ -124,7 +124,7 @@ exist, and `org-link' otherwise." fn))))) ;;;###autoload -(defun +org-link--face-link-activate-face (start end face _bracketed-p) +(defun +org-link--face-link-activate-fn (start end face _bracketed-p) (when buffer-read-only (add-text-properties start end @@ -156,7 +156,7 @@ exist, and `org-link' otherwise." (concat prefix (and prefix " ") key-text))) ;;;###autoload -(defun +org-link--command-link-activate-command (start end command _bracketed-p) +(defun +org-link--command-link-activate-fn (start end command _bracketed-p) (when buffer-read-only (add-text-properties start end (list 'display (+org-link--command-keys command))))) diff --git a/modules/lang/org/config.el b/modules/lang/org/config.el index 58bde72ad..9d2e1be52 100644 --- a/modules/lang/org/config.el +++ b/modules/lang/org/config.el @@ -557,12 +557,12 @@ relative to `org-directory', unless it is an absolute path." (org-link-set-parameters "face" :follow (-call-interactively #'describe-face) - :activate-func #'+org-link--face-link-activate-face + :activate-func #'+org-link--face-link-activate-fn :face '(font-lock-type-face underline)) (org-link-set-parameters "cmd" :follow (-call-interactively #'describe-command) - :activate-func #'+org-link--command-link-activate-command + :activate-func #'+org-link--command-link-activate-fn :face 'help-key-binding :help-echo #'+org-link-doom--help-echo-from-textprop) (org-link-set-parameters