diff --git a/lib/Simba/DA.pm b/lib/Simba/DA.pm
index 6893883..04a6a20 100644
--- a/lib/Simba/DA.pm
+++ b/lib/Simba/DA.pm
@@ -85,6 +85,7 @@ sub list {
     find({
 	    preprocess
                 => sub {
+                        $self->log(10, "list: in $File::Find::dir");
                         if ($self->{prune}{$File::Find::dir}) {
                             return ();
                         } else {