merged and cleaned up event tests
[urisagit/Stem.git] / t / event / event_test.pl
index 4f54906..a1d18c9 100644 (file)
@@ -62,7 +62,6 @@ sub test_plain_events {
 sub triggered {
 
        my( $self ) = @_ ;
-
        ok( 1, 'plain - event triggered' ) ;
 }
 
@@ -82,11 +81,9 @@ sub test_signal_events {
 
                ok( ref $event, 'signal - event created' ) ;
 
-               $self->{'sig_event'} = $event ;
-
                kill 'INT', $$ ;
 
-#print "kill INT\n" ;
+               $self->{'sig_event'} = $event ;
 
                Stem::Event::start_loop() ;
 
@@ -103,6 +100,7 @@ sub sig_int_handler {
        ok( 1, 'signal - event triggered' ) ;
 
        $self->{'sig_event'}->cancel() ;
+
        Stem::Event::stop_loop() ;
 }