New revision in http://www-verimag.imag.fr/~moy/bzr/dvc/moy/
------------------------------------------------------------
revno: 562
revision-id: [email protected]
parent: [email protected]
committer: Matthieu Moy <[email protected]>
branch nick: moy
timestamp: Fri 2009-08-21 11:00:02 +0200
message:
  xgit-show: default to HEAD on empty input


=== modified file 'lisp/xgit.el'
--- a/lisp/xgit.el      2009-08-21 08:47:03 +0000
+++ b/lisp/xgit.el      2009-08-21 09:00:02 +0000
@@ -630,13 +630,14 @@
 files changed in the revision is passed to
 `xgit-show-filter-filename-func' and result is used."
   (interactive (list default-directory
-                     (read-string "Revision: "
+                     (read-string "Revision (default: HEAD): "
                                   (let ((candidate (thing-at-point
                                                     'word)))
                                     (when (and candidate
                                                (string-match "[0-9a-f]"
                                                              candidate))
-                                      candidate)))))
+                                      candidate))
+                                  nil "HEAD")))
   (if (and (null files) xgit-show-filter-filename-func)
       (setq files (funcall xgit-show-filter-filename-func
                            (xgit-changed-files dir rev))))


_______________________________________________
Dvc-dev mailing list
[email protected]
https://mail.gna.org/listinfo/dvc-dev

Reply via email to