Merge pull request #1467 from ScoreUnder/perl_warning_to_stderr

Print perl import warning to STDERR

(cherry picked from commit e732b601f7edd24b268051a8b6d62b8c7f1d9c82)

diff --git a/src/perl/common/Irssi.pm b/src/perl/common/Irssi.pm
index 786d0e5267ff3398c0333083c38a403a8dec17c2..bca0084b084d9998b19f562d0355bed389da670c 100644 (file)
--- a/src/perl/common/Irssi.pm
+++ b/src/perl/common/Irssi.pm
@@ -153,7 +153,7 @@ eval {
 $in_irssi = $@ ? 0 : 1;
 
 if (!in_irssi()) {
-  print "Warning: This script should be run inside irssi\n";
+  print STDERR "Warning: This script should be run inside irssi\n";
 } else {
   bootstrap Irssi $VERSION if (!$static);