Using function passing face non-interactively

Using function passing face non-interactively

[carlmarcos--- via Users list for the GNU Emacs text editor]

I have the following function that works well in an interactive way.  What changes are needed to make the function works non-interactively as well?

(defun laxy-descface (facenm)
  "Describe the typeface properties of face name FACENM."

  (interactive
   (list
    (let* ( (cseq '("mode-line" "mode-line-inactive" "text-property")) )
      (completing-read "Face_property: " cseq nil t "text-property"))))

  (pcase facenm
    ("text-property"
        (describe-face (get-text-property (point) 'face)))
    ("mode-line"
        (describe-face (intern facenm)))
    ("mode-line-inactive"
        (describe-face (intern facenm)))))

Re: Using function passing face non-interactively

[Eli Zaretskii]

> Date: Wed, 10 Aug 2022 03:55:15 +0200 (CEST)
> From: carlmarcos--- via Users list for the GNU Emacs text editor <help-gnu-emacs@gnu.org>
> 
> 
> I have the following function that works well in an interactive way.  What changes are needed to make the function works non-interactively as well?

Why do you think you need any changes for that?  What goes wrong if
you use it non-interactively?