diff --git a/modules/ksb/Application.pm b/modules/ksb/Application.pm
index a9662a5..943ce70 100644
--- a/modules/ksb/Application.pm
+++ b/modules/ksb/Application.pm
@@ -216,6 +216,7 @@ DONE
 
             $self->{run_mode} = 'query';
             $auxOptions{query} = $arg;
+            $auxOptions{pretend} = 1; # Implied pretend mode
         },
         pretend => sub {
             # Set pretend mode but also force the build process to run.