--- deliantra/server/lib/cf.pm 2006/03/31 22:09:36 1.13 +++ deliantra/server/lib/cf.pm 2006/03/31 22:47:35 1.14 @@ -69,12 +69,13 @@ my %command; sub inject_event { - my ($data) = @_; + my $extension = shift; + my $event_code = shift; - my $cb = $hook[$data->{event_code}]{$data->{extension}} + my $cb = $hook[$event_code]{$extension} or return; - $cb->($data) + &$cb } sub inject_global_event {