diff --git a/ChangeLog b/ChangeLog
index b14c2c2a93..bff49da611 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,9 +1,13 @@
+Tue May  6 23:20:12 EST 2008 Jim Meyering <meyering@redhat.com>
+
+	* build-aux/vc-list-files: Add support for bzr.
+	Patch by Soren Hansen.
+
 Mon May  5 15:57:28 EST 2008 Daniel P. Berrange <berrange@redhat.com>
 
 	* configure.in: Check in /usr/sbin for iptables too, for SUSE
 	distros (Jim Fehlig)
 
-
 Thu May  1 14:10:28 EST 2008 Daniel P. Berrange <berrange@redhat.com>
 
 	* src/remote_internal.c: Cope with NULL from qparam_get_query
diff --git a/build-aux/vc-list-files b/build-aux/vc-list-files
index 63b403a116..abb0c40239 100755
--- a/build-aux/vc-list-files
+++ b/build-aux/vc-list-files
@@ -75,6 +75,9 @@ if test -d .git; then
   eval exec git ls-files '"$dir"' $postprocess
 elif test -d .hg; then
   eval exec hg locate '"$dir/*"' $postprocess
+elif test -d .bzr; then
+  test "$postprocess" = '' && postprocess="| sed 's|^\./||'"
+  eval exec bzr ls --versioned '"$dir"' $postprocess
 elif test -d CVS; then
   test "$postprocess" = '' && postprocess="| sed 's|^\./||'"
   if test -x build-aux/cvsu; then