vc-mtn-find-revision handle null rev.

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

1 files changed, 4 insertions, 1 deletions

diff --git a/lisp/vc/vc-mtn.el b/lisp/vc/vc-mtn.el
index 944a83ebc69..685ef3b6742 100644
--- 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)
 ;;   )