diff --git a/bean-query-goofy-daemon.plx b/bean-query-goofy-daemon.plx
index b1e8593..08c8b79 100755
--- a/bean-query-goofy-daemon.plx
+++ b/bean-query-goofy-daemon.plx
@@ -225,8 +225,9 @@ while (1) {
     $query{fifoName} = $fifoFileName;
     my $getAllOutput = $query{getAllOutput};
     (tied %query)->shunlock;
+    print STDERR "unlocked tied query..." if $VERBOSE > 2;
     open(my $fifoFH, ">", $fifoFileName);
-    print STDERR "and beginning write to it." if $VERBOSE > 2;
+    print STDERR "and began write to fifo." if $VERBOSE > 2;
     my($seenSeperator, $prevLine) =  ( ((defined $getAllOutput) and $getAllOutput), "");
     my $rbcOut = $runningBeanQuery->before();
     foreach my $line (split /\n/, $rbcOut) {