Bugfix: i3-wsbar: properly catch errors when writing to child process

This comes at the expense of having Try::Tiny as additional dependency,
but I think Try::Tiny is widely available.

diff --git a/i3-wsbar b/i3-wsbar
index 3c76864e053950b341f81d602c0c31e3ec922710..5536e92cc082c54f787773cfbcd72e74483b82d6 100755 (executable)
--- a/i3-wsbar
+++ b/i3-wsbar
@@ -7,6 +7,7 @@ use warnings;
 use Getopt::Long;
 use Pod::Usage;
 use IPC::Run qw(start pump);
+use Try::Tiny;
 use AnyEvent::I3;
 use AnyEvent;
 use v5.10;
@@ -204,7 +205,12 @@ sub update_output {
         $out .= "\n";
 
         $outputs->{$name}->{cmd_input} = $out;
-        pump $outputs->{$name}->{cmd} while length $outputs->{$name}->{cmd_input};
+        try {
+            pump $outputs->{$name}->{cmd} while length $outputs->{$name}->{cmd_input};
+        } catch {
+            warn "Could not write to dzen2";
+            exit 1;
+        }
     }
 }