Commit 6efbb10c authored by Dan Nicolaescu's avatar Dan Nicolaescu

(vc-bzr-state): Use when instead of if.

parent 5a84a937
2008-04-04 Dan Nicolaescu <dann@ics.uci.edu>
* vc-bzr.el (vc-bzr-state): Use when instead of if.
* vc.el (vc-default-status-fileinfo-extra): New function.
(vc-status-mark-buffer-changed): Use it.
(vc-update-vc-status-buffer): Allow for partial updates.
......
......@@ -267,8 +267,8 @@ If any error occurred in running `bzr status', then return nil."
(defun vc-bzr-state (file)
(lexical-let ((result (vc-bzr-status file)))
(when (consp result)
(if (cdr result)
(message "Warnings in `bzr' output: %s" (cdr result)))
(when (cdr result)
(message "Warnings in `bzr' output: %s" (cdr result)))
(cdr (assq (car result)
'((added . added)
(kindchanged . edited)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment