help-gnu-emacs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Convert strings to appropriate symbols


From: Heime
Subject: Convert strings to appropriate symbols
Date: Wed, 27 Mar 2024 14:23:39 +0000

How can I ensure that the text strings from completing-read
are properly transformed to the symbols required by 
outline-minor-mode-highlight ?

(defun outl-flock (actm)
  "Set font-lock rules for 'outline-minor-mode'.
  (interactive
   (let ( (cseq '("append" "t" "nil" "override")) )
     (list
       (completing-read "Font-Lock Rules: " cseq nil t "override"))))

  (setq outline-minor-mode-highlight
         (if (equal actm "t")
             t
           (intern actm)))  ) 




reply via email to

[Prev in Thread] Current Thread [Next in Thread]