emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

nit(org): make activate function suffixes consistent

Browse source
This commit is contained in:
Liam Hupfer 2023-09-19 21:39:59 -05:00 • committed by Henrik Lissner
parent 54c67acf2a
commit c3342a8011
2 changed files with 4 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

4
modules/lang/org/autoload/org-link.el
View file

@ -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)))))

4
modules/lang/org/config.el
View file

@ -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