X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FStem%2FEvent%2FSignal.pm;fp=lib%2FStem%2FEvent%2FSignal.pm;h=95e10238a0d537001e3475da42095d978066934e;hb=4932dd97955faf49e7777420bb2fb196db7cb92a;hp=c9d723ef5663d1c36b36919def77ad6b8909bbe8;hpb=4536f6551e07988483a419d1094bdbe80a77b322;p=urisagit%2FStem.git diff --git a/lib/Stem/Event/Signal.pm b/lib/Stem/Event/Signal.pm index c9d723e..95e1023 100644 --- a/lib/Stem/Event/Signal.pm +++ b/lib/Stem/Event/Signal.pm @@ -32,7 +32,8 @@ sub _build { $SIG{ $signal } = $cached_handlers{$signal} ||= sub { - mark_not_empty() ; + Stem::Event::Queue::queue_has_event() ; + #print "HIT $signal\n"; push @signal_queue, $signal } ; @@ -42,6 +43,12 @@ sub _build { $signal2event{$signal} = $self ; #print "$signal = $SIG{ $signal }\n" ; + +# make sure the event queue is set up so we can handle signals in the +# event loop + + Stem::Event::Queue::_init_event_queue() ; + return ; }