debug for button events - missed on last commit
wreis [Fri, 28 Aug 2009 00:33:10 +0000 (00:33 +0000)]
lib/Reaction/UI/ViewPort/Action.pm

index 84b127e..1fc3fbf 100644 (file)
@@ -68,6 +68,7 @@ after handle_events => sub {
     unless (exists $events->{$event} ) {
       # for <input type="image"... buttons
       if ( exists $events->{"${event}.x"} && exists $events->{"${event}.y"} ) {
+        $self->_dump_event($event, $events->{$event}) if DEBUG_EVENTS;
         $self->$event($events->{$event});
       }
     }