* vc-bzr.el (vc-bzr-annotate-command): More elegant form for last

change. Suggested by David Kastrup.

* vc-bzr.el (vc-bzr-annotate-command): More elegant form for last
change. Suggested by David Kastrup.
f82b1493 · Chong Yidong · 97cf5567 · f82b1493 · f82b1493
Commit f82b1493 authored Dec 07, 2009 by Chong Yidong
Show whitespace changes
Inline Side-by-side

Showing with 4 additions and 2 deletions

lisp/ChangeLog lisp/ChangeLog +3 -0

lisp/vc-bzr.el lisp/vc-bzr.el +1 -2

No files found.
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -6,6 +6,9 @@

 2009-12-07  Chong Yidong  <cyd@stupidchicken.com>

+	* vc-bzr.el (vc-bzr-annotate-command): More elegant form for last
+	change.  Suggested by David Kastrup.
+
 	* simple.el (compose-mail): Check for incompatibilities and warn.
 	(compose-mail-user-agent-warnings): New option.


--- a/lisp/vc-bzr.el
+++ b/lisp/vc-bzr.el
@@ -579,8 +579,7 @@ property containing author and date information."
 	       (unless tag
 		 (setq tag
 		       (propertize
-			(concat rev " " (substring (concat author "       ")
-						   0 7))
+			(format "%s %-7.7s" rev author)
 			'help-echo (format "Revision: %d, author: %s, date: %s"
 					   (string-to-number rev)
 					   author date)