[nongnu] elpa/with-editor e4080a8ea8: Update .orgconfig

[ELPA Syncer]

branch: elpa/with-editor
commit e4080a8ea853e5b8a626f993952c29b5ed583cea
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>

    Update .orgconfig
---
 docs/.orgconfig | 16 ++++++++++++----
 1 file changed, 12 insertions(+), 4 deletions(-)

diff --git a/docs/.orgconfig b/docs/.orgconfig
index c72bd72472..bdaba4a855 100644
--- a/docs/.orgconfig
+++ b/docs/.orgconfig
@@ -1,10 +1,18 @@
 # -*- mode:org -*-
+# Copyright (C) 2021-2024 Jonas Bernoulli
+# SPDX-License-Identifier: GPL-3.0-or-later
+# URL: https://github.com/emacscollective/org-macros
+# Visit that to see these macros in a human-readable format.
+
+#+language: en
 
 #+options: H:4 num:3 toc:2 compact-itemx:t
 #+property: header-args :eval never
 
-#+macro: kbd (eval (let ((case-fold-search nil) (regexp (regexp-opt '("SPC" 
"RET" "LFD" "TAB" "BS" "ESC" "DELETE" "SHIFT" "Ctrl" "Meta" "Alt" "Cmd" "Super" 
"UP" "LEFT" "RIGHT" "DOWN") 'words))) (format 
"@@texinfo:@kbd{@@%s@@texinfo:}@@" (replace-regexp-in-string regexp 
"@@texinfo:@key{@@\\&@@texinfo:}@@" $1 t))))
 #+macro: year (eval (format-time-string "%Y"))
-#+macro: version (eval (if-let ((tag (ignore-errors (car (process-lines "git" 
"describe" "--exact-match"))))) (concat "version " (substring tag 1)) (or 
(ignore-errors (car (process-lines "git" "describe"))) "version (unknown)")))
-
-#+language: en
+#+macro: version (eval (if-let ((tag (ignore-errors (car (process-lines "git" 
"describe" "--exact-match"))))) (concat "version " (substring tag 1)) (or 
(ignore-errors (car (process-lines "git" "describe"))) (concat "version " (or 
$1 "<unknown>")))))
+#+macro: kbd (eval (format "@@texinfo:@kbd{@@%s@@texinfo:}@@" (let 
(case-fold-search) (replace-regexp-in-string (regexp-opt '("BS" "TAB" "RET" 
"ESC" "SPC" "DEL" "LFD" "DELETE" "SHIFT" "Ctrl" "Meta" "Alt" "Cmd" "Super" "UP" 
"LEFT" "RIGHT" "DOWN") 'words) "@@texinfo:@key{@@\\&@@texinfo:}@@" $1 t))))
+#+macro: kbdvar (eval (format "@@texinfo:@kbd{@@%s@@texinfo:}@@" (let 
(case-fold-search) (replace-regexp-in-string "<\\([a-zA-Z-]+\\)>" 
"@@texinfo:@var{@@\\1@@texinfo:}@@" (replace-regexp-in-string (regexp-opt 
'("BS" "TAB" "RET" "ESC" "SPC" "DEL" "LFD" "DELETE" "SHIFT" "Ctrl" "Meta" "Alt" 
"Cmd" "Super" "UP" "LEFT" "RIGHT" "DOWN") 'words) 
"@@texinfo:@key{@@\\&@@texinfo:}@@" $1 t) t))))
+#+macro: codevar (eval (format "@@texinfo:@code{@@%s@@texinfo:}@@" (let 
(case-fold-search) (replace-regexp-in-string "\\([A-Z][A-Z-]+\\)" 
"@@texinfo:@var{@@\\&@@texinfo:}@@" $1 t))))
+#+macro: var @@texinfo:@var{@@$1@@texinfo:}@@
+#+macro: dfn @@texinfo:@dfn{@@$1@@texinfo:}@@