From e5a29330aae4491fd384bacaff6f453c6434d322 Mon Sep 17 00:00:00 2001 From: "Charles A. Roelli" Date: Sat, 17 Feb 2018 16:49:02 +0100 Subject: [PATCH] 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. --- lisp/vc/add-log.el | 2 +- lisp/vc/vc.el | 5 ++++- 2 files changed, 5 insertions(+), 2 deletions(-) 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))) -- 2.39.2