Make the `kbd` macro work in both Emacs-26 and Emacs-28

This is so that elpa.gnu.org's Emacs-26 can successfully build the
Info version of it for the GNU ELPA package.

diff --git a/doc/misc/modus-themes.org b/doc/misc/modus-themes.org
index ed464e8465656b8793a9037fff6e9396770e97c9..9764a3467fa1ce69bff05e71661872fb6c830452 100644 (file)
--- a/doc/misc/modus-themes.org
+++ b/doc/misc/modus-themes.org
@@ -10,10 +10,7 @@
 #+macro: export-date (eval (format-time-string "%F %R %z" (current-time)))
 #+macro: file @@texinfo:@file{@@$1@@texinfo:}@@
 #+macro: space @@texinfo:@: @@
-# The "kbd" macro turns KBD into @kbd{KBD}.  Additionally, it
-# encloses case-sensitive special keys (SPC, RET...) within @key{...}.
-# I got this from the Org source code.
-#+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: kbd @@texinfo:@kbd{@@$1@@texinfo:}@@
 
 #+texinfo_filename: modus-themes.info
 #+texinfo_dir_category: Emacs misc features