fix: string as value

2023-09-26 22:08:22 +08:00 · 2023-09-26 22:08:22 +08:00 · 3eb5ab539f
commit 3eb5ab539f
parent 4df8fac72b
1 changed files with 3 additions and 1 deletions
--- a/lisp/init-pre.el
+++ b/lisp/init-pre.el
@ -52,7 +52,9 @@ Version: 2023-09-24"
 		   (t (error "Unsupported operating system")))))
    (cl-loop for (os-id . value) in values
 	     when (eq os os-id)
-	     do (set var (eval value)))))
+	     do (set var (if (functionp value)
+                            (funcall value)
+                          value)))))


 (defun my-check-for-executable (executable-name executable-file &optional message)