Mercurial > emacs
comparison lisp/vc-bzr.el @ 94847:5e64dca662f0
Remove assumption about what nil means as a first arument to vc-do-command.
author | Eric S. Raymond <esr@snark.thyrsus.com> |
---|---|
date | Sat, 10 May 2008 13:27:16 +0000 |
parents | bf91c987049c |
children | 66788c63a40a |
comparison
equal
deleted
inserted
replaced
94846:1a6e4ea4e517 | 94847:5e64dca662f0 |
---|---|
90 `LC_MESSAGES=C' to the environment." | 90 `LC_MESSAGES=C' to the environment." |
91 (let ((process-environment | 91 (let ((process-environment |
92 (list* "BZR_PROGRESS_BAR=none" ; Suppress progress output (bzr >=0.9) | 92 (list* "BZR_PROGRESS_BAR=none" ; Suppress progress output (bzr >=0.9) |
93 "LC_MESSAGES=C" ; Force English output | 93 "LC_MESSAGES=C" ; Force English output |
94 process-environment))) | 94 process-environment))) |
95 (apply 'vc-do-command buffer okstatus vc-bzr-program | 95 (apply 'vc-do-command (or buffer "*vc*") okstatus vc-bzr-program |
96 file-or-list bzr-command args))) | 96 file-or-list bzr-command args))) |
97 | 97 |
98 | 98 |
99 ;;;###autoload | 99 ;;;###autoload |
100 (defconst vc-bzr-admin-dirname ".bzr" | 100 (defconst vc-bzr-admin-dirname ".bzr" |