Mercurial > emacs
comparison lisp/vc-bzr.el @ 102876:e38631d95db3
* vc-bzr.el (vc-bzr-log-view-mode): Fix last fix.
author | Chong Yidong <cyd@stupidchicken.com> |
---|---|
date | Tue, 07 Apr 2009 04:06:39 +0000 |
parents | b6ee4b011032 |
children | b4e12b7edf39 |
comparison
equal
deleted
inserted
replaced
102875:fae9460dc1e1 | 102876:e38631d95db3 |
---|---|
452 (remove-hook 'log-view-mode-hook 'vc-bzr-log-view-mode) ;Deactivate the hack. | 452 (remove-hook 'log-view-mode-hook 'vc-bzr-log-view-mode) ;Deactivate the hack. |
453 (require 'add-log) | 453 (require 'add-log) |
454 (set (make-local-variable 'log-view-per-file-logs) nil) | 454 (set (make-local-variable 'log-view-per-file-logs) nil) |
455 (set (make-local-variable 'log-view-file-re) "^Working file:[ \t]+\\(.+\\)") | 455 (set (make-local-variable 'log-view-file-re) "^Working file:[ \t]+\\(.+\\)") |
456 (set (make-local-variable 'log-view-message-re) | 456 (set (make-local-variable 'log-view-message-re) |
457 "^\\(?:revno: \\([0-9.]+\\)\\|merged: .+\\)") | 457 "^ *\\(?:revno: \\([0-9.]+\\)\\|merged: .+\\)") |
458 (set (make-local-variable 'log-view-font-lock-keywords) | 458 (set (make-local-variable 'log-view-font-lock-keywords) |
459 ;; log-view-font-lock-keywords is careful to use the buffer-local | 459 ;; log-view-font-lock-keywords is careful to use the buffer-local |
460 ;; value of log-view-message-re only since Emacs-23. | 460 ;; value of log-view-message-re only since Emacs-23. |
461 (append `((,log-view-message-re . 'log-view-message-face)) | 461 (append `((,log-view-message-re . 'log-view-message-face)) |
462 ;; log-view-font-lock-keywords | 462 ;; log-view-font-lock-keywords |