Bah. more fixing of script_is_loaded.

shabble · Apr 1, 2011 · 9b4f3c2 · 9b4f3c2
1 parent 8fed96c
commit 9b4f3c2
Show file tree

Hide file tree

Showing 5 changed files with 5 additions and 5 deletions.
diff --git a/history-search/rl_history_search.pl b/history-search/rl_history_search.pl
@@ -81,7 +81,7 @@
 # check we have uberprompt loaded.
 
 sub script_is_loaded {
-    return exists($Irssi::Script::{shift . '::'}) ;
+    return exists($Irssi::Script::{$_[0] . '::'}) ;
 }
 
 if (not script_is_loaded('uberprompt')) {

diff --git a/ido-mode/ido_switcher.pl b/ido-mode/ido_switcher.pl
@@ -251,7 +251,7 @@ sub print_all_matches {
 }
 
 sub script_is_loaded {
-    return exists($Irssi::Script::{shift . '::'});
+    return exists($Irssi::Script::{$_[0] . '::'});
 }
 
 unless (script_is_loaded('uberprompt')) {

diff --git a/prompt_info/uberprompt.pl b/prompt_info/uberprompt.pl
@@ -100,7 +100,7 @@
 # # check we have uberprompt loaded.
 #
 # sub script_is_loaded {
-#    return exists($Irssi::Script::{shift . '::'});
+#    return exists($Irssi::Script::{$_[0] . '::'});
 # }
 #
 # if (not script_is_loaded('uberprompt')) {

diff --git a/quit-notify/notifyquit.pl b/quit-notify/notifyquit.pl
@@ -24,7 +24,7 @@
 
 
 sub script_is_loaded {
-    return exists($Irssi::Script::{shift . '::'});
+    return exists($Irssi::Script::{$_[0] . '::'});
 }
 
 if (script_is_loaded('uberprompt')) {

diff --git a/scrolled-reminder/scrolled_reminder.pl b/scrolled-reminder/scrolled_reminder.pl
@@ -82,7 +82,7 @@
 # check we have prompt_info loaded.
 
 sub script_is_loaded {
-    return exists($Irssi::Script::{shift . '::'}) ;
+    return exists($Irssi::Script::{$_[0] . '::'}) ;
 }
 
 unless (script_is_loaded('uberprompt')) {