# HG changeset patch
# User Nick Roberts <nickrob@snap.net.nz>
# Date 1262156027 -46800
# Node ID 232c05e79d96b4aa1fe398e64ca5b16f55f51288
# Parent  17778dd7f114bbcb1e3034e68cab34fe33564d34
(vc-hg-working-revision): Tweak previous change.

diff -r 17778dd7f114 -r 232c05e79d96 lisp/vc-hg.el
--- a/lisp/vc-hg.el	Wed Dec 30 15:22:45 2009 +1300
+++ b/lisp/vc-hg.el	Wed Dec 30 19:53:47 2009 +1300
@@ -209,11 +209,11 @@
 			;; Ignore all errors.
 			(process-file
 			 "hg" nil t nil
-			 "parent" "--template" "\"{rev}\"" (file-relative-name file)))
+			 "parent" "--template" "{rev}" (file-relative-name file)))
                     ;; Some problem happened.  E.g. We can't find an `hg'
                     ;; executable.
                     (error nil)))))))
-    (when (eq 0 status) (read out))))
+    (when (eq 0 status) out)))
 
 ;;; History functions