procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

lisp/vc/: documentation fixes

Browse source 
* lisp/vc/vc.el (vc-region-history): Clarify documentation.
* lisp/vc/add-log.el (change-log-get-method-definition):
Indent documentation.
This commit is contained in:
Charles A. Roelli 2018-02-17 16:49:02 +01:00
parent f21f8e6135
commit e5a29330aa
2 changed files with 5 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/vc/add-log.el
View file

@ -1163,7 +1163,7 @@ Has a preference of looking backwards."
(goto-char (match-end 0))) (goto-char (match-end 0)))
(defun change-log-get-method-definition () (defun change-log-get-method-definition ()
"For Objective C, return the method name if we are in a method." "For Objective C, return the method name if we are in a method."
(let ((change-log-get-method-definition-md "[")) (let ((change-log-get-method-definition-md "["))
(save-excursion (save-excursion
(if (re-search-backward "^@implementation\\s-*\\([A-Za-z_]*\\)" nil t) (if (re-search-backward "^@implementation\\s-*\\([A-Za-z_]*\\)" nil t)

5
lisp/vc/vc.el
View file

@ -2415,7 +2415,10 @@ When called interactively with a prefix argument, prompt for REMOTE-LOCATION."
;;;###autoload ;;;###autoload
(defun vc-region-history (from to) (defun vc-region-history (from to)
"Show the history of the region FROM..TO." "Show the history of the region between FROM and TO.
If called interactively, show the history between point and
mark."
(interactive "r") (interactive "r")
(let* ((lfrom (line-number-at-pos from)) (let* ((lfrom (line-number-at-pos from))
(lto (line-number-at-pos (1- to))) (lto (line-number-at-pos (1- to)))