diff options
| author | Dan Nicolaescu | 2010-01-24 22:03:23 -0800 |
|---|---|---|
| committer | Dan Nicolaescu | 2010-01-24 22:03:23 -0800 |
| commit | 755da7fa2086d39e2f07262ff13e8ff015edbc7e (patch) | |
| tree | 99b3b0b72f270092d62f6929e1413a4cc92ecd59 | |
| parent | 6a6d15ab4f1f004498ad7ec8c28050edd3010146 (diff) | |
| download | emacs-755da7fa2086d39e2f07262ff13e8ff015edbc7e.tar.gz emacs-755da7fa2086d39e2f07262ff13e8ff015edbc7e.zip | |
(vc-bzr-print-log): Use the more compact --line option
for the short log.
(vc-bzr-log-view-mode): Adjust regexp for the above change.
| -rw-r--r-- | lisp/ChangeLog | 6 | ||||
| -rw-r--r-- | lisp/vc-bzr.el | 4 |
2 files changed, 8 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 84cfa2adcff..6e86aa2a94a 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,9 @@ | |||
| 1 | 2010-01-25 Dan Nicolaescu <dann@ics.uci.edu> | ||
| 2 | |||
| 3 | * vc-bzr.el (vc-bzr-print-log): Use the more compact --line option | ||
| 4 | for the short log. | ||
| 5 | (vc-bzr-log-view-mode): Adjust regexp for the above change. | ||
| 6 | |||
| 1 | 2010-01-25 Mark A. Hershberger <mah@everybody.org> | 7 | 2010-01-25 Mark A. Hershberger <mah@everybody.org> |
| 2 | 8 | ||
| 3 | * progmodes/python.el: Replace reference to obsolete | 9 | * progmodes/python.el: Replace reference to obsolete |
diff --git a/lisp/vc-bzr.el b/lisp/vc-bzr.el index b3bbc272faa..8861fef0388 100644 --- a/lisp/vc-bzr.el +++ b/lisp/vc-bzr.el | |||
| @@ -487,7 +487,7 @@ REV non-nil gets an error." | |||
| 487 | (set (make-local-variable 'log-view-file-re) "\\`a\\`") | 487 | (set (make-local-variable 'log-view-file-re) "\\`a\\`") |
| 488 | (set (make-local-variable 'log-view-message-re) | 488 | (set (make-local-variable 'log-view-message-re) |
| 489 | (if vc-short-log | 489 | (if vc-short-log |
| 490 | "^ *\\([0-9.]+\\) \\(.*?\\)[ \t]+\\([0-9]\\{4\\}-[0-9]\\{2\\}-[0-9]\\{2\\}\\)\\( \\[merge\\]\\)?" | 490 | "^ *\\([0-9.]+\\): \\(.*?\\)[ \t]+\\([0-9]\\{4\\}-[0-9]\\{2\\}-[0-9]\\{2\\}\\)\\( \\[merge\\]\\)?" |
| 491 | "^ *\\(?:revno: \\([0-9.]+\\)\\|merged: .+\\)")) | 491 | "^ *\\(?:revno: \\([0-9.]+\\)\\|merged: .+\\)")) |
| 492 | (set (make-local-variable 'log-view-font-lock-keywords) | 492 | (set (make-local-variable 'log-view-font-lock-keywords) |
| 493 | ;; log-view-font-lock-keywords is careful to use the buffer-local | 493 | ;; log-view-font-lock-keywords is careful to use the buffer-local |
| @@ -519,7 +519,7 @@ REV non-nil gets an error." | |||
| 519 | (with-current-buffer buffer | 519 | (with-current-buffer buffer |
| 520 | (apply 'vc-bzr-command "log" buffer 'async files | 520 | (apply 'vc-bzr-command "log" buffer 'async files |
| 521 | (append | 521 | (append |
| 522 | (when shortlog '("--short")) | 522 | (when shortlog '("--line")) |
| 523 | (when start-revision (list (format "-r..%s" start-revision))) | 523 | (when start-revision (list (format "-r..%s" start-revision))) |
| 524 | (when limit (list "-l" (format "%s" limit))) | 524 | (when limit (list "-l" (format "%s" limit))) |
| 525 | (if (stringp vc-bzr-log-switches) | 525 | (if (stringp vc-bzr-log-switches) |