From: bw1 <redacted>
Date: Wed, 27 Feb 2019 19:56:42 +0000 (+0100)
Subject: [scripthelp] bug fix
X-Git-Url: http://git.99rst.org/?a=commitdiff_plain;h=851d44fc45ec4e25a53d9573e3d0ee55638de74e;p=irssi-scripts.irssi.org.git

[scripthelp] bug fix
---

diff --git a/scripts/scripthelp.pl b/scripts/scripthelp.pl
index 0bdca01..7591e92 100644
--- a/scripts/scripthelp.pl
+++ b/scripts/scripthelp.pl
@@ -2,14 +2,14 @@ use strict;
 use Irssi;
 
 use vars qw($VERSION %IRSSI %HELP);
-$VERSION = "0.9";
+$VERSION = "0.10";
 %IRSSI = (
 	authors         => "Maciek \'fahren\' Freudenheim",
 	contact         => "fahren\@bochnia.pl",
 	name            => "Scripts help",
 	description     => "Provides access to script\'s help",
 	license         => "GNU GPLv2 or later",
-	changed         => "Sat Apr 13 02:23:37 CEST 2002"
+	changed         => "2019-02-27"
 );
 $HELP{scripthelp} = "
 Provides help for irssi's perl scripts.
@@ -26,6 +26,7 @@ sub cmd_help {
 
 	# from scriptinfo.pl
 	for (sort grep s/::$//, keys %Irssi::Script::) {
+		no strict 'refs';
 		my $help = ${ "Irssi::Script::${_}::HELP" }{$args};
 		if ($help) {
 			Irssi::signal_stop();