diff options
| -rw-r--r-- | lisp/vc/add-log.el | 2 | ||||
| -rw-r--r-- | 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." | |||
| 1163 | (goto-char (match-end 0))) | 1163 | (goto-char (match-end 0))) |
| 1164 | 1164 | ||
| 1165 | (defun change-log-get-method-definition () | 1165 | (defun change-log-get-method-definition () |
| 1166 | "For Objective C, return the method name if we are in a method." | 1166 | "For Objective C, return the method name if we are in a method." |
| 1167 | (let ((change-log-get-method-definition-md "[")) | 1167 | (let ((change-log-get-method-definition-md "[")) |
| 1168 | (save-excursion | 1168 | (save-excursion |
| 1169 | (if (re-search-backward "^@implementation\\s-*\\([A-Za-z_]*\\)" nil t) | 1169 | (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." | |||
| 2415 | 2415 | ||
| 2416 | ;;;###autoload | 2416 | ;;;###autoload |
| 2417 | (defun vc-region-history (from to) | 2417 | (defun vc-region-history (from to) |
| 2418 | "Show the history of the region FROM..TO." | 2418 | "Show the history of the region between FROM and TO. |
| 2419 | |||
| 2420 | If called interactively, show the history between point and | ||
| 2421 | mark." | ||
| 2419 | (interactive "r") | 2422 | (interactive "r") |
| 2420 | (let* ((lfrom (line-number-at-pos from)) | 2423 | (let* ((lfrom (line-number-at-pos from)) |
| 2421 | (lto (line-number-at-pos (1- to))) | 2424 | (lto (line-number-at-pos (1- to))) |