From 1a29a3d55e28afbf0e91fdfc422c9dac0a058c11 Mon Sep 17 00:00:00 2001 From: Anachronist Date: Tue, 17 Jul 2012 00:04:38 -0700 Subject: [PATCH] Compatibility for rebranded XChat-WDK, HexChat. --- mpc.hc.np.pl | 9 +++------ 1 file changed, 3 insertions(+), 6 deletions(-) diff --git a/mpc.hc.np.pl b/mpc.hc.np.pl index 4c0a5d9..4c5f4b6 100644 --- a/mpc.hc.np.pl +++ b/mpc.hc.np.pl @@ -14,11 +14,7 @@ ############################################################################# -Xchat::hook_command("np", "mpchc"); - -############################################################################# - -sub mpchc { +Xchat::hook_command("np", sub { my $browser = LWP::UserAgent->new; # Create A session! my $url = 'http://localhost:13579/info.html'; # HTML File Here! $browser->timeout(3); # How Long to Wait! @@ -46,5 +42,6 @@ sub mpchc { Xchat::command("say $mpchcnp"); } return Xchat::EAT_ALL; -} +}); + ############################################################################# \ No newline at end of file