Function: proced-mark-process-alist

proced-mark-process-alist is a byte-compiled function defined in proced.el.gz.

Signature

(proced-mark-process-alist PROCESS-ALIST &optional QUIET)

Documentation

Mark processes in PROCESS-ALIST.

If QUIET is non-nil suppress status message.

Source Code

;; Defined in /usr/src/emacs/lisp/proced.el.gz
(defun proced-mark-process-alist (process-alist &optional quiet)
  "Mark processes in PROCESS-ALIST.
If QUIET is non-nil suppress status message."
  (let ((count 0))
    (if process-alist
        (let (buffer-read-only)
          (save-excursion
            (goto-char (point-min))
            (while (not (eobp))
              (when (assq (proced-pid-at-point) process-alist)
                (insert proced-marker-char)
                (delete-char 1)
                (setq count (1+ count)))
              (forward-line)))))
    (unless quiet
      (proced-success-message "Marked" count))))