]> code.delx.au - gnu-emacs/commitdiff
(vc-mtn-command): Avoid localization of messages.
authorStefan Monnier <monnier@iro.umontreal.ca>
Thu, 3 Apr 2008 02:22:55 +0000 (02:22 +0000)
committerStefan Monnier <monnier@iro.umontreal.ca>
Thu, 3 Apr 2008 02:22:55 +0000 (02:22 +0000)
lisp/ChangeLog
lisp/vc-mtn.el

index bb5dd122fb044a7c71beacb669ffe8bcf5ee2517..de6b0d711a47c9c46ab7f57c0eb90b1a106d21d2 100644 (file)
@@ -1,5 +1,7 @@
 2008-04-03  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+       * vc-mtn.el (vc-mtn-command): Avoid localization of messages.
+
        * vc-bzr.el (vc-bzr-checkout): Simplify.
 
        * image-mode.el (image-mode-fit-frame): New command.
index fd3f48f9105027aab86c437e764e535e45ae7a90..faa28964be74f4154e7b95ffa6b19cf405d4061a 100644 (file)
 
 (defun vc-mtn-command (buffer okstatus files &rest flags)
   "A wrapper around `vc-do-command' for use in vc-mtn.el."
-  (apply 'vc-do-command buffer okstatus vc-mtn-command files flags))
+  (let ((process-environment
+         ;; Avoid localization of messages so we can parse the output.
+         (cons "LC_MESSAGES=C" process-environment)))
+    (apply 'vc-do-command buffer okstatus vc-mtn-command files flags)))
 
 (defun vc-mtn-state (file)
   ;; If `mtn' fails or returns status>0, or if the search files, just