diff options
| author | Tom Feist <shabble@metavore.org> | 2011-04-22 02:27:12 +0000 |
|---|---|---|
| committer | Tom Feist <shabble@metavore.org> | 2011-04-22 02:27:12 +0000 |
| commit | fe6e50a76dba36899782fdda0f97590ee5f02a3c (patch) | |
| tree | a8ae7406048f00807ba54aecb5dfcd9c0dd08944 /scrolled-reminder | |
| parent | removed docs/ from dev branch, since they're all in their own repo (well, wiki) (diff) | |
| parent | feature-tests/key_sig: test to see if there's any useful info in the 'keyboard (diff) | |
| download | irssi-scripts-fe6e50a76dba36899782fdda0f97590ee5f02a3c.tar.gz irssi-scripts-fe6e50a76dba36899782fdda0f97590ee5f02a3c.zip | |
Merge branch 'master' into dev
Diffstat (limited to '')
| -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')) { |