A feature-rich, modular AOL Instant Messenger client written chiefly by Bill Atkins and Dan Chokola in their high school days.
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
|
package Bark; |
|
|
|
use Milkbone; |
|
|
|
register_hook("msg_in", sub { |
|
return if hook("protocol_away_status"); |
|
return if $ARGS{-msg} eq "BARK!"; |
|
hook("protocol_send_im", -dest => $ARGS{-user}, -msg => "BARK!"); |
|
}); |
|
|
|
1;
|
|
|
