Function: org-agenda-bulk-mark-regexp
org-agenda-bulk-mark-regexp is an interactive and byte-compiled
function defined in org-agenda.el.gz.
Signature
(org-agenda-bulk-mark-regexp REGEXP)
Documentation
Mark entries matching REGEXP for future agenda bulk action.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/org/org-agenda.el.gz
(defun org-agenda-bulk-mark-regexp (regexp)
"Mark entries matching REGEXP for future agenda bulk action."
(interactive "sMark entries matching regexp: ")
(let ((entries-marked 0) txt-at-point)
(save-excursion
(goto-char (point-min))
(goto-char (next-single-property-change (point) 'org-hd-marker))
(while (and (re-search-forward regexp nil t)
(setq txt-at-point
(get-text-property (match-beginning 0) 'txt)))
(if (get-char-property (point) 'invisible)
(forward-line 1)
(when (string-match-p regexp txt-at-point)
(setq entries-marked (1+ entries-marked))
(call-interactively 'org-agenda-bulk-mark)))))
(unless entries-marked
(message "No entry matching this regexp."))))