[Emacs-diffs] emacs/lisp ChangeLog vc-bzr.el

[Chong Yidong]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Chong Yidong <cyd>      09/12/06 23:27:58

Modified files:
        lisp           : ChangeLog vc-bzr.el 

Log message:
        * vc-bzr.el (vc-bzr-annotate-command): Handle the case where the
        author field is too short.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.16848&r2=1.16849
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/vc-bzr.el?cvsroot=emacs&r1=1.90&r2=1.91

Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.16848
retrieving revision 1.16849
diff -u -b -r1.16848 -r1.16849
--- ChangeLog   6 Dec 2009 22:18:03 -0000       1.16848
+++ ChangeLog   6 Dec 2009 23:27:55 -0000       1.16849
@@ -1,3 +1,8 @@
+2009-12-06  Óscar Fuentes  <address@hidden>
+
+       * vc-bzr.el (vc-bzr-annotate-command): Handle the case where the
+       author field is too short.
+
 2009-12-06  Dan Nicolaescu  <address@hidden>
 
        * vc-git.el (vc-git-print-log): Handle a limit argument.  Display

Index: vc-bzr.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/vc-bzr.el,v
retrieving revision 1.90
retrieving revision 1.91
diff -u -b -r1.90 -r1.91
--- vc-bzr.el   6 Dec 2009 20:22:19 -0000       1.90
+++ vc-bzr.el   6 Dec 2009 23:27:58 -0000       1.91
@@ -574,7 +574,8 @@
               (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)