From: Michael Stapelberg Date: Fri, 19 Mar 2010 21:35:19 +0000 (+0100) Subject: Add new constants X-Git-Tag: 4.14~14^2~47 X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=e3f0e5b01ca13080a6b89d6f3c7da16e70782230;p=i3%2Fi3 Add new constants --- diff --git a/lib/AnyEvent/I3.pm b/lib/AnyEvent/I3.pm index d2fae1c7..9c8cbbdc 100644 --- a/lib/AnyEvent/I3.pm +++ b/lib/AnyEvent/I3.pm @@ -59,9 +59,10 @@ our @EXPORT = qw(i3); use constant TYPE_COMMAND => 0; use constant TYPE_GET_WORKSPACES => 1; use constant TYPE_SUBSCRIBE => 2; +use constant TYPE_GET_OUTPUTS => 3; our %EXPORT_TAGS = ( 'all' => [ - qw(TYPE_COMMAND TYPE_GET_WORKSPACES TYPE_SUBSCRIBE) + qw(i3 TYPE_COMMAND TYPE_GET_WORKSPACES TYPE_SUBSCRIBE TYPE_GET_OUTPUTS) ] ); our @EXPORT_OK = ( @{ $EXPORT_TAGS{all} } ); @@ -72,6 +73,7 @@ my $magic = "i3-ipc"; my $event_mask = (1 << 31); my %events = ( workspace => ($event_mask | 0), + output => ($event_mask | 1), ); sub _bytelength {