comparison lisp/vc-bzr.el @ 95077:e7ce20fce4c4

(vc-bzr-after-dir-status): Remove unused binding.
author Dan Nicolaescu <dann@ics.uci.edu>
date Sun, 18 May 2008 07:13:08 +0000
parents 66788c63a40a
children 451f4028c096
comparison
equal deleted inserted replaced
95076:50d2e5b7b987 95077:e7ce20fce4c4
573 (vc-default-prettify-state-info 'Bzr file))) 573 (vc-default-prettify-state-info 'Bzr file)))
574 574
575 ;; XXX: this needs testing, it's probably incomplete. 575 ;; XXX: this needs testing, it's probably incomplete.
576 (defun vc-bzr-after-dir-status (update-function) 576 (defun vc-bzr-after-dir-status (update-function)
577 (let ((status-str nil) 577 (let ((status-str nil)
578 (file nil)
579 (translation '(("+N" . added) 578 (translation '(("+N" . added)
580 ("-D" . removed) 579 ("-D" . removed)
581 (" M" . edited) 580 (" M" . edited)
582 ;; XXX: what about ignored files? 581 ;; XXX: what about ignored files?
583 (" D" . missing) 582 (" D" . missing)