Commit a0902360 authored by Dan Nicolaescu's avatar Dan Nicolaescu
Browse files

(log-view-toggle-mark-entry): Add docstring.

(log-view-get-marked): Likewise.
parent 0d182a34
......@@ -5,6 +5,9 @@
2007-08-26 Dan Nicolaescu <dann@ics.uci.edu>
* log-view.el (log-view-toggle-mark-entry): Add docstring.
(log-view-get-marked): Likewise.
* vc-hooks.el (vc-registered): Use mapc instead of mapcar.
(vc-delete-automatic-version-backups): Likewise.
......
......@@ -238,6 +238,11 @@ The match group number 1 should match the revision number itself.")
rev))))))
(defun log-view-toggle-mark-entry ()
"Toggle the marked state for the log entry at point.
Individual log entries can be marked and unmarked. The marked
entries are denoted by changing their background color.
`log-view-get-marked' returns the list of tags for the marked
log entries."
(interactive)
(save-excursion
(forward-line 1)
......@@ -265,6 +270,7 @@ The match group number 1 should match the revision number itself.")
(overlay-put ov 'log-view-marked tag))))))))
(defun log-view-get-marked ()
"Return the list of tags for the marked log entries."
(save-excursion
(let ((pos (point-min))
marked-list ov)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment