Function: kmacro-menu-do-flagged-delete
kmacro-menu-do-flagged-delete is an interactive and byte-compiled
function defined in kmacro.el.gz.
Signature
(kmacro-menu-do-flagged-delete)
Documentation
Delete keyboard macros flagged via kmacro-menu-flag-for-deletion.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/kmacro.el.gz
;;;; Commands that Modify the Ring
(defun kmacro-menu-do-flagged-delete ()
"Delete keyboard macros flagged via `kmacro-menu-flag-for-deletion'."
(declare (modes kmacro-menu-mode))
(interactive nil kmacro-menu-mode)
(kmacro-menu--query-revert)
(let ((res)
(num-deletes 0))
(kmacro-menu--map-ids (lambda (id)
(if (alist-get (kmacro-menu--id-position id)
kmacro-menu--deletion-flags)
(setq num-deletes (1+ num-deletes))
(push (kmacro-menu--id-kmacro id) res))))
(when (yes-or-no-p (if (= 1 num-deletes)
"Delete 1 flagged keyboard macro?"
(format "Delete %d flagged keyboard macros?"
num-deletes)))
(kmacro-menu--replace-all
(nreverse res))
(tabulated-list-revert))))