bug#6333: VC-dir shows added dirs twice

[Stefan Monnier]

Package: Emacs
Version: 24.0.50

Under Bzr at least, VC-dir shows added dirs twice (once as added
element, and once as parent of some other element, I guess), as
`test/indent' below:

                         ./
                         lisp/emacs-lisp/
    edited               lisp/emacs-lisp/smie.el
                         test/
    added                test/indent/
                         test/indent/
    added                test/indent/Makefile
    added                test/indent/prolog.prolog


-- Stefan





In GNU Emacs 24.0.50.1 (i686-pc-linux-gnu, GTK+ Version 2.20.1)
 of 2010-06-02 on pastel
Windowing system distributor `The X.Org Foundation', version 11.0.10707000
configured using `configure  '--enable-maintainer-mode' 'CFLAGS=-Wall 
-Wno-pointer-sign -DUSE_LISP_UNION_TYPE -DSYNC_INPUT -DENABLE_CHECKING 
-DXASSERTS -DFONTSET_DEBUG -g -O1 -I/usr/include/GNUstep' 
'LDFLAGS=-L/home/monnier/src/Xaw3d' 'CPPFLAGS=-I/home/monnier/src/Xaw3d' 
'--with-x-toolkit=gtk''

Important settings:
  value of $LC_ALL: nil
  value of $LC_COLLATE: nil
  value of $LC_CTYPE: nil
  value of $LC_MESSAGES: nil
  value of $LC_MONETARY: nil
  value of $LC_NUMERIC: nil
  value of $LC_TIME: nil
  value of $LANG: fr_CH.UTF-8
  value of $XMODIFIERS: nil
  locale-coding-system: utf-8-unix
  default enable-multibyte-characters: t

Major mode: Minibuffer-Area

Minor modes in effect:
  diff-auto-refine-mode: t
  url-handler-mode: t
  global-reveal-mode: t
  reveal-mode: t
  auto-insert-mode: t
  savehist-mode: t
  minibuffer-electric-default-mode: t
  mouse-wheel-mode: t
  file-name-shadow-mode: t
  global-font-lock-mode: t
  auto-composition-mode: t
  auto-encryption-mode: t
  auto-compression-mode: t
  line-number-mode: t
  transient-mark-mode: t

Recent input:
<select-window> C-u C-x v = s u b <tab> <return> <return> 
M-x c d <return> <M-backspace> <M-backspace> <M-backspace> 
<M-backspace> t r <tab> <return> <switch-frame> <select-window> 
<switch-frame> <select-window> <down-mouse-1> <mouse-movement> 
<mouse-1> <M-return> <switch-frame> <select-window> 
<switch-frame> <select-window> C-c C-a <switch-frame> 
<select-window> <switch-frame> <select-window> <down-mouse-1> 
<mouse-movement> <mouse-1> <M-backspace> T O D O C-a 
C-x C-s <help-echo> <switch-frame> <select-window> 
<switch-frame> <select-window> <switch-frame> <select-window> 
<switch-frame> <select-window> <switch-frame> <select-window> 
<switch-frame> <select-window> <switch-frame> <select-window> 
<switch-frame> <select-window> <switch-frame> <select-window> 
<switch-frame> <select-window> <switch-frame> <select-window> 
<switch-frame> <select-window> <switch-frame> <select-window> 
<switch-frame> <select-window> <down-mouse-1> <mouse-movement> 
<mouse-1> C-c C-a <down-mouse-5> <mouse-5> <double-down-mouse-5> 
<double-mouse-5> <down-mouse-1> <mouse-1> C-c C-a C-c 
C-a <switch-frame> <select-window> <switch-frame> <select-window> 
C-x C-s <switch-frame> <select-window> <switch-frame> 
<select-window> <switch-frame> <select-window> <switch-frame> 
<select-window> <switch-frame> <select-window> <switch-frame> 
<select-window> <switch-frame> <select-window> <switch-frame> 
<switch-frame> <switch-frame> <select-window> <switch-frame> 
<select-window> <switch-frame> <select-window> <switch-frame> 
<select-window> <switch-frame> <switch-frame> <select-window> 
<switch-frame> <select-window> <switch-frame> <select-window> 
<switch-frame> <select-window> <switch-frame> <switch-frame> 
<select-window> <switch-frame> <select-window> <switch-frame> 
<select-window> <switch-frame> <select-window> <switch-frame> 
<select-window> <switch-frame> <select-window> <switch-frame> 
<select-window> <switch-frame> <select-window> <switch-frame> 
<select-window> <switch-frame> <select-window> <switch-frame> 
<select-window> <switch-frame> <switch-frame> <select-window> 
<switch-frame> <select-window> <switch-frame> <select-window> 
<switch-frame> <select-window> <switch-frame> <select-window> 
<switch-frame> <select-window> <switch-frame> <select-window> 
<switch-frame> <switch-frame> <select-window> <switch-frame> 
<select-window> <switch-frame> <select-window> <switch-frame> 
<select-window> <switch-frame> <select-window> <switch-frame> 
<select-window> <switch-frame> <select-window> <switch-frame> 
<switch-frame> <select-window> <switch-frame> <select-window> 
<switch-frame> <select-window> <switch-frame> <select-window> 
<switch-frame> <select-window> <switch-frame> <select-window> 
<switch-frame> <select-window> <switch-frame> <select-window> 
<switch-frame> <switch-frame> <select-window> <switch-frame> 
<select-window> <switch-frame> <select-window> <switch-frame> 
<select-window> <switch-frame> <select-window> <switch-frame> 
<select-window> <switch-frame> <switch-frame> <switch-frame> 
<switch-frame> <switch-frame> <switch-frame> <switch-frame> 
<switch-frame> <select-window> <switch-frame> <select-window> 
<switch-frame> <select-window> <switch-frame> <select-window> 
M-x v c - d i r <return> <M-backspace> <M-backspace> 
<M-backspace> <M-backspace> t r <tab> <return> <switch-frame> 
<select-window> <switch-frame> <select-window> <switch-frame> 
<select-window> <switch-frame> <switch-frame> <select-window> 
<switch-frame> <select-window> <help-echo> <switch-frame> 
<select-window> <switch-frame> <select-window> <switch-frame> 
g <help-echo> <switch-frame> <select-window> <switch-frame> 
<select-window> <switch-frame> <switch-frame> <select-window> 
<help-echo> <switch-frame> <select-window> <help-echo> 
<switch-frame> <switch-frame> <select-window> <switch-frame> 
<select-window> M-x v c - <M-backspace> r e p o - e 
m - b <tab> <return>

Recent messages:
Ispell process killed
Starting new Ispell process [american] ...
Ispell process killed
Starting new Ispell process [american] ...
Ispell process killed
Starting new Ispell process [american] ...
Ispell process killed
Starting new Ispell process [american] ...
Ispell process killed
Starting new Ispell process [american] ...

Load-path shadows:
/usr/share/emacs23/site-lisp/bbdb/bbdb hides 
/usr/share/emacs/site-lisp/bbdb/lisp/bbdb
/usr/share/emacs23/site-lisp/bbdb/bbdb-whois hides 
/usr/share/emacs/site-lisp/bbdb/lisp/bbdb-whois
/usr/share/emacs23/site-lisp/bbdb/bbdb-w3 hides 
/usr/share/emacs/site-lisp/bbdb/lisp/bbdb-w3
/usr/share/emacs23/site-lisp/bbdb/bbdb-vm hides 
/usr/share/emacs/site-lisp/bbdb/lisp/bbdb-vm
/usr/share/emacs23/site-lisp/bbdb/bbdb-snarf hides 
/usr/share/emacs/site-lisp/bbdb/lisp/bbdb-snarf
/usr/share/emacs23/site-lisp/bbdb/bbdb-sc hides 
/usr/share/emacs/site-lisp/bbdb/lisp/bbdb-sc
/usr/share/emacs23/site-lisp/bbdb/bbdb-rmail hides 
/usr/share/emacs/site-lisp/bbdb/lisp/bbdb-rmail
/usr/share/emacs23/site-lisp/bbdb/bbdb-print hides 
/usr/share/emacs/site-lisp/bbdb/lisp/bbdb-print
/usr/share/emacs23/site-lisp/bbdb/bbdb-migrate hides 
/usr/share/emacs/site-lisp/bbdb/lisp/bbdb-migrate
/usr/share/emacs23/site-lisp/bbdb/bbdb-mhe hides 
/usr/share/emacs/site-lisp/bbdb/lisp/bbdb-mhe
/usr/share/emacs23/site-lisp/bbdb/bbdb-merge hides 
/usr/share/emacs/site-lisp/bbdb/lisp/bbdb-merge
/usr/share/emacs23/site-lisp/bbdb/bbdb-gui hides 
/usr/share/emacs/site-lisp/bbdb/lisp/bbdb-gui
/usr/share/emacs23/site-lisp/bbdb/bbdb-gnus hides 
/usr/share/emacs/site-lisp/bbdb/lisp/bbdb-gnus
/usr/share/emacs23/site-lisp/bbdb/bbdb-ftp hides 
/usr/share/emacs/site-lisp/bbdb/lisp/bbdb-ftp
/usr/share/emacs23/site-lisp/bbdb/bbdb-com hides 
/usr/share/emacs/site-lisp/bbdb/lisp/bbdb-com
/usr/share/emacs23/site-lisp/bbdb/bbdb-hooks hides 
/usr/share/emacs/site-lisp/bbdb/lisp/bbdb-hooks

Features:
(shadow sort gnus-util mail-extr message sendmail rfc822 mml mml-sec
mm-decode mm-bodies mm-encode mail-parse rfc2231 rfc2047 rfc2045
ietf-drums mail-utils gmm-utils mailheader emacsbug vc-sccs vc-svn
vc-rcs vc-dir find-func cl-specs edebug make-mode prolog which-func
imenu coq coq-abbrev coq-syntax mule-util coq-db holes coq-local-vars
local-vars-list proof proof-shell pg-user pg-goals pg-response
proof-toolbar pp smerge-mode pcvs pcvs-parse pcvs-info pcvs-defs
pcvs-util ewoc parse-time vc-cvs pg-assoc proof-script proof-menu
cus-edit cus-start cus-load wid-edit span proof-auxmodes proof-splash
pg-custom proof-utils scomint proof-syntax bufhist proof-config
proof-faces proof-useropts proof-compat dabbrev macroexp sml-mode
sml-defs sml-util warnings byte-opt compile comint derived ring bytecomp
byte-compile bbdb-gui debug bbdb-com mailabbrev bbdb timezone smie
multi-isearch executable copyright skeleton whitespace diff-mode vc
vc-dispatcher vc-bzr sha1 hex-util filecache server noutline outline
easy-mmode flyspell ispell eldoc checkdoc regexp-opt thingatpt help-mode
easymenu view prog-mode url-handlers url-parse url-vars mm-util
mail-prsvr reveal autoinsert uniquify advice help-fns advice-preload
savehist minibuf-eldef cl cl-19 cl-loaddefs proof-site proof-autoloads
pg-vars bbdb-autoloads agda2 tooltip ediff-hook vc-hooks lisp-float-type
mwheel x-win x-dnd tool-bar dnd fontset image fringe lisp-mode register
page newcomment menu-bar rfn-eshadow timer select scroll-bar mldrag
mouse jit-lock font-lock syntax font-core frame cham georgian utf-8-lang
misc-lang vietnamese tibetan thai tai-viet lao korean japanese hebrew
greek romanian slovak czech european ethiopic indian cyrillic chinese
case-table epa-hook jka-cmpr-hook help simple abbrev minibuffer loaddefs
button faces cus-face files text-properties overlay md5 base64 format
env code-pages mule custom widget hashtable-print-readable backquote
make-network-process dbusbind dynamic-setting system-font-setting
font-render-setting gtk x-toolkit x multi-tty emacs)