From bd38cf619887e4cf747188a7d8a00e521ff8d90f Mon Sep 17 00:00:00 2001
From: "Bradley M. Kuhn" <bkuhn@ebb.org>
Date: Wed, 23 Sep 2020 16:46:11 -0700
Subject: [PATCH] More verbosity around the FIFO creation.

---
 bean-query-goofy-daemon.plx | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

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) {