Skip to content

Instantly share code, notes, and snippets.

@mardukbp

mardukbp/ebib-delete-filter.el

Created September 11, 2013 19:24
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save mardukbp/6528535 to your computer and use it in GitHub Desktop.
Save mardukbp/6528535 to your computer and use it in GitHub Desktop.
Download ZIP
Delete saved filter in ebib
Raw
ebib-delete-filter.el
(defun ebib-delete-filter ()
(interactive)
(let ((filter-name (completing-read (format "Choose a saved filter: ")
(mapcar #'(lambda(x)
(cons x 0))
(filter-all-names))
nil t)))
(setq filters-alist (delq (filter-get-filter filter-name) filters-alist))
(filter-write-file)
(message "Filter %s deleted" filter-name)
(setq filters-alist nil)
(setq filters-already-loaded nil)))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment