vc-mtn-find-revision handle null rev.

* lisp/vc/vc-mtn.el (vc-mtn-find-revision): handle null rev

diff --git a/lisp/vc/vc-mtn.el b/lisp/vc/vc-mtn.el
index 944a83ebc69d8ff43866bd69524d83f1ea2e83b9..685ef3b6742cd6f5ebfdccbd886d62d5b52ace98 100644 (file)
--- a/lisp/vc/vc-mtn.el
+++ b/lisp/vc/vc-mtn.el
@@ -207,7 +207,10 @@ switches."
                                          comment))))
 
 (defun vc-mtn-find-revision (file rev buffer)
-  (vc-mtn-command buffer 0 file "cat" "-r" rev))
+  ;; null rev means latest revision
+  (if rev
+      (vc-mtn-command buffer 0 file "cat" "-r" rev)
+    (vc-mtn-command buffer 0 file "cat")))
 
 ;; (defun vc-mtn-checkout (file &optional rev)
 ;;   )