From 2f2f5242243fdc427357c304b5fb880c04171542 Mon Sep 17 00:00:00 2001 From: Chong Yidong Date: Sun, 6 Dec 2009 23:27:55 +0000 Subject: [PATCH] * vc-bzr.el (vc-bzr-annotate-command): Handle the case where the author field is too short. --- lisp/ChangeLog | 5 +++++ lisp/vc-bzr.el | 3 ++- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 605f395ab43..9d17dff0d72 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2009-12-06 Óscar Fuentes + + * vc-bzr.el (vc-bzr-annotate-command): Handle the case where the + author field is too short. + 2009-12-06 Dan Nicolaescu * vc-git.el (vc-git-print-log): Handle a limit argument. Display diff --git a/lisp/vc-bzr.el b/lisp/vc-bzr.el index 233cdb171ee..70989ee56e7 100644 --- a/lisp/vc-bzr.el +++ b/lisp/vc-bzr.el @@ -574,7 +574,8 @@ property containing author and date information." (unless tag (setq tag (propertize - (concat rev " " (substring author 0 7)) + (concat rev " " (substring (concat author " ") + 0 7)) 'help-echo (format "Revision: %d, author: %s, date: %s" (string-to-number rev) author date) -- 2.39.5