awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-05 12:37:33 -05:00
Code Issues Packages Projects Releases Wiki Activity

Use filter-return for downcase of uuidgen

Browse Source
This commit is contained in:
James Ravn
2020-04-07 10:22:05 +01:00
parent f7fa3f3a86
commit dd94bd67ac
1 changed files with 5 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
modules/lang/org/config.el
View File

@ -514,12 +514,12 @@ current workspace (and clean them up)."
(apply old-create-image file-or-data type data-p props))))) (apply old-create-image file-or-data type data-p props)))))
(apply orig-fn args))) (apply orig-fn args)))
(defadvice! +org--fix-inconsistent-uuidgen-case (orig-fn &rest args) (defadvice! +org--fix-inconsistent-uuidgen-case-a (uuid)
"Ensure uuidgen always produces lowercase output regardless of system." "Ensure uuidgen always produces lowercase output regardless of system."
:around #'org-id-new :filter-return #'org-id-new
(if (equal org-id-method 'uuid) (if (eq org-id-method 'uuid)
(downcase (apply orig-fn args)) (downcase uuid)
(apply orig-fn args)))) uuid)))
(defun +org-init-keybinds-h () (defun +org-init-keybinds-h ()