From: Charles A. Roelli <charles@aurox.ch>
Date: Sat, 17 Feb 2018 15:49:02 +0000 (+0100)
Subject: lisp/vc/: documentation fixes
X-Git-Tag: emacs-26.1-rc1~194
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e5a2933;p=emacs.git

lisp/vc/: documentation fixes

* lisp/vc/vc.el (vc-region-history): Clarify documentation.
* lisp/vc/add-log.el (change-log-get-method-definition):
Indent documentation.
---

diff --git a/lisp/vc/add-log.el b/lisp/vc/add-log.el
index ec9299a947a..773930f32ff 100644
--- a/lisp/vc/add-log.el
+++ b/lisp/vc/add-log.el
@@ -1163,7 +1163,7 @@ Has a preference of looking backwards."
   (goto-char (match-end 0)))
 
 (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 "["))
     (save-excursion
       (if (re-search-backward "^@implementation\\s-*\\([A-Za-z_]*\\)" nil t)
diff --git a/lisp/vc/vc.el b/lisp/vc/vc.el
index a0b4cc92719..93e9c25cbfd 100644
--- a/lisp/vc/vc.el
+++ b/lisp/vc/vc.el
@@ -2415,7 +2415,10 @@ When called interactively with a prefix argument, prompt for REMOTE-LOCATION."
 
 ;;;###autoload
 (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")
   (let* ((lfrom (line-number-at-pos from))
          (lto   (line-number-at-pos (1- to)))