Mercurial > emacs
comparison lisp/vc-bzr.el @ 108010:4ae75c6f19d6
vc-bzr.el (vc-bzr-checkin): Undo spurious `async' arg change.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Tue, 20 Apr 2010 22:10:50 -0400 |
parents | 17d3324f96dd |
children | bace4ba4c137 |
comparison
equal
deleted
inserted
replaced
108009:17d3324f96dd | 108010:4ae75c6f19d6 |
---|---|
455 | 455 |
456 (defun vc-bzr-checkin (files rev comment) | 456 (defun vc-bzr-checkin (files rev comment) |
457 "Check FILE in to bzr with log message COMMENT. | 457 "Check FILE in to bzr with log message COMMENT. |
458 REV non-nil gets an error." | 458 REV non-nil gets an error." |
459 (if rev (error "Can't check in a specific revision with bzr")) | 459 (if rev (error "Can't check in a specific revision with bzr")) |
460 (apply 'vc-bzr-command "commit" nil 'async | 460 (apply 'vc-bzr-command "commit" nil 0 |
461 files (cons "-m" (log-edit-extract-headers '(("Author" . "--author") | 461 files (cons "-m" (log-edit-extract-headers '(("Author" . "--author") |
462 ("Fixes" . "--fixes")) | 462 ("Fixes" . "--fixes")) |
463 comment)))) | 463 comment)))) |
464 | 464 |
465 (defun vc-bzr-find-revision (file rev buffer) | 465 (defun vc-bzr-find-revision (file rev buffer) |