diff options
| author | richo <richo@psych0tik.net> | 2011-07-18 03:36:40 +0000 |
|---|---|---|
| committer | richo <richo@psych0tik.net> | 2011-07-18 03:36:40 +0000 |
| commit | e4b9ea15d7abdae8211d18737fa54933f3faf57b (patch) | |
| tree | fda4cc23faebfd1f130578b39fe161fe4c0ba1f8 /scrolled-reminder | |
| parent | Added goodnicks from richoH/richos-irssi (diff) | |
| parent | Only attempt join if channel exists (diff) | |
| download | irssi-scripts-e4b9ea15d7abdae8211d18737fa54933f3faf57b.tar.gz irssi-scripts-e4b9ea15d7abdae8211d18737fa54933f3faf57b.zip | |
Merge branch 'master' into richoH-dev
Diffstat (limited to 'scrolled-reminder')
| -rw-r--r-- | scrolled-reminder/scrolled_reminder.pl | 8 |
1 files changed, 1 insertions, 7 deletions
diff --git a/scrolled-reminder/scrolled_reminder.pl b/scrolled-reminder/scrolled_reminder.pl index 48da622..efe6630 100644 --- a/scrolled-reminder/scrolled_reminder.pl +++ b/scrolled-reminder/scrolled_reminder.pl @@ -82,13 +82,7 @@ our %IRSSI = # check we have prompt_info loaded. sub script_is_loaded { - my $name = shift; - print "Checking if $name is loaded" if DEBUG; - no strict 'refs'; - my $retval = defined %{ "Irssi::Script::${name}::" }; - use strict 'refs'; - - return $retval; + return exists($Irssi::Script::{$_[0] . '::'}) ; } unless (script_is_loaded('uberprompt')) { |