Lines Matching defs:marked
68 ;; - query the user for cvs-get-marked (for some cmds or if nothing's selected)
228 (let ((marked (cvs-get-marked)))
230 (when marked
238 (cvs-fileinfo->full-name (car marked)))
1223 marked instead. A directory can never be marked."
1232 (setf (cvs-fileinfo->marked f)
1233 (not (if (eq arg 'toggle) (cvs-fileinfo->marked f) arg)))
1238 (setf (cvs-fileinfo->marked fi)
1239 (not (if (eq arg 'toggle) (cvs-fileinfo->marked fi) arg)))
1261 (setf (cvs-fileinfo->marked cookie) t)))
1273 (cvs-mode-marked nil nil :read-only t :one t :noquery t))))
1286 (setf (cvs-fileinfo->marked fi) t)))
1295 (setf (cvs-fileinfo->marked cookie) t)))
1304 (setf (cvs-fileinfo->marked cookie) nil)
1313 (setf (cvs-fileinfo->marked (ewoc-data tin)) nil)
1355 (defun cvs-get-marked (&optional ignore-marks ignore-contents)
1357 If there are any marked tins, and IGNORE-MARKS is nil, return them.
1378 (ewoc-collect cvs-cookies 'cvs-fileinfo->marked))
1390 (defun* cvs-mode-marked (filter &optional cmd
1392 "Get the list of marked FIS.
1399 (let* ((fis (cvs-get-marked (or one (cvs-ignore-marks-p cmd read-only))
1417 (ignore-errors (cvs-mode-marked filter nil :read-only t :noquery t)))
1423 (apply 'cvs-mode-marked -cvs-mode-files-args)))))
1441 "Check in all marked files, or the current file.
1566 (cvs-mode-marked nil nil :read-only t :one t :noquery t))))
1585 "Add marked files to the cvs repository.
1588 (let ((fis (cvs-mode-marked 'add))
1648 This command can be used on files that are marked with \"Merged\"
1653 (let* ((marked (cvs-get-marked (cvs-ignore-marks-p "diff")))
1654 (fis (car (cvs-partition 'cvs-fileinfo->backup-file marked))))
1764 (let ((fi (cvs-mode-marked 'merge nil :one t :file t)))
1796 (let ((fi (cvs-mode-marked 'diff "idiff" :one t :file t)))
1810 (fis (cvs-mode-marked 'diff "idiff" :file t)))
1894 (cvs-mode-run cmd flags (cvs-mode-marked filter cmd)
1901 "Show cvs status for all marked files.
1912 (cvs-mode-run "status" (cons "-v" flags) (cvs-mode-marked nil "status")
1928 "Update all marked files.
1939 "Re-examine all marked files.
1953 (dolist (fi (cvs-mode-marked 'ignore))
2027 (fi (cvs-mode-marked nil nil :one t)))
2052 "Undo local changes to all marked files.
2080 (let* ((fis (cvs-mode-marked 'revert "revert" :file t))
2114 "Remove all marked files from the buffer."
2116 (dolist (fi (cvs-get-marked (cvs-ignore-marks-p "acknowledge") t))
2123 (let* ((files (cvs-mode-marked filter cmd :file t :read-only t))
2126 (cvs-mode-marked filter cmd))))
2163 "Remove all marked files.
2201 (let ((marked (cvs-get-marked (cvs-ignore-marks-p "byte-compile"))))
2202 (dolist (fi marked)
2212 (dolist (fi (cvs-mode-marked nil nil))