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 ec9299a947abac8b4f3568119ead1a8083583f4b..773930f32ff2f5757a122230abdf07f5392ebdfb 100644 (file)
--- 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 a0b4cc92719355b4d8b6b116b395a3efbc712757..93e9c25cbfd6382a59e5c535e573533d180bb058 100644 (file)
--- 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)))