Function: proced-do-mark

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

Signature

(proced-do-mark MARK &optional COUNT)

Documentation

Mark the current (or next COUNT) processes using MARK.

Source Code

;; Defined in /usr/src/emacs/lisp/proced.el.gz
(defun proced-do-mark (mark &optional count)
  "Mark the current (or next COUNT) processes using MARK."
  (or count (setq count 1))
  (let ((backward (< count 0))
	buffer-read-only)
    (setq count (1+ (if (<= 0 count) count
                      (min (1- (line-number-at-pos)) (abs count)))))
    (beginning-of-line)
    (while (not (or (zerop (setq count (1- count))) (eobp)))
      (proced-insert-mark mark backward))
    (proced-move-to-goal-column)))