Function: viper-filter-alist

viper-filter-alist is an interactive and byte-compiled function defined in viper-util.el.gz.

Signature

(viper-filter-alist REGEXP ALST)

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/emulation/viper-util.el.gz
;; Filter ALIST using REGEXP.  Return alist whose elements match the regexp.
(defun viper-filter-alist (regexp alst)
  (interactive "s x")
  (let ((outalst) (inalst alst))
    (while (car inalst)
      (if (string-match regexp (car (car inalst)))
	  (setq outalst (cons (car inalst) outalst)))
      (setq inalst (cdr inalst)))
    outalst))