From 8b7ef9d91cb3c5519dbe6d34e7d05c6709044e75 Mon Sep 17 00:00:00 2001
From: xeruf <27jf@pm.me>
Date: Mon, 16 May 2022 23:53:27 +0200
Subject: [PATCH] config/doom: fix id property defaults

---
 .config/doom/config.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/.config/doom/config.el b/.config/doom/config.el
index d788b5d..7fe9d51 100644
--- a/.config/doom/config.el
+++ b/.config/doom/config.el
@@ -210,6 +210,8 @@ Version 2019-11-04 2021-02-16"
         )
   :config
 
+  ; the value does not matter, see https://emacs.stackexchange.com/questions/71774/pass-default-value-to-org-set-property/71777#71777
+  (add-to-list 'org-global-properties-fixed '("ID_ALL" . "id"))
   (map! :map org-mode-map
         :leader
         "\\" 'org-ctrl-c-ctrl-c
@@ -227,7 +229,7 @@ Version 2019-11-04 2021-02-16"
         "ra" 'org-change-tag-in-region
         "lk" 'counsel-org-link
         "gR" 'org-mode-restart
-        :desc "Set ID property" "lI" (lambda () (interactive) (org-set-property "ID" (org-read-property-value "id" nil (downcase (s-replace-regexp "[^[:alnum:][:digit:]]\+"  "-" (org-get-heading))))))
+        :desc "Set ID property" "lI" (lambda () (interactive) (org-set-property "ID" (org-read-property-value "ID" nil (downcase (s-replace-regexp "[^[:alnum:][:digit:]]\+"  "-" (org-get-heading))))))
         :desc "Set Roam Aliases" "la" (lambda () (interactive) (org-set-property "ROAM_ALIASES" nil))
         :desc "Add tag" "mt" 'org-roam-tag-add
         :desc "Remove tag" "mT" 'org-roam-tag-remove