awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-01 12:17:25 -05:00
Code Issues Packages Projects Releases 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