Function: zone-remove-program

zone-remove-program is a byte-compiled function defined in zone.el.gz.

Signature

(zone-remove-program PGM)

Documentation

Remove a zone program PGM from zone-programs.

If PGM is a symbol, remove it from the zone-programs; if it is a string, assume it is a regular expression that will remove programs whose name matches the pattern.

Source Code

;; Defined in /usr/src/emacs/lisp/play/zone.el.gz
(defun zone-remove-program (pgm)
  "Remove a zone program PGM from `zone-programs'.
If PGM is a symbol, remove it from the `zone-programs'; if it is a
string, assume it is a regular expression that will remove programs
whose name matches the pattern."
  (setq zone-programs
        (vector (seq-remove
                 (lambda (v)
                   (cond
                    ((symbolp pgm)  (eq pgm v))
                    ((stringp pgm)  (string-match-p pgm (symbol-name v)))
                    (t              nil)))
                 zone-programs))))