summaryrefslogtreecommitdiffstats
path: root/scripts/quitrand.pl
diff options
context:
space:
mode:
authorDavid Leadbeater2014-10-20 22:46:12 +0100
committerDavid Leadbeater2014-10-20 22:46:12 +0100
commit5d2811af5d3d29b524936ac95e7b1b3d5144a9ce (patch)
tree0f0b84efd10e9288695d86b69de324c467fe4e7b /scripts/quitrand.pl
parent263a56d196da657b72ccf2b195b50008d6a988dc (diff)
parentdd80027b51b3ee71027a2612595aee38e38c0d6e (diff)
downloadscripts.irssi.org-5d2811af5d3d29b524936ac95e7b1b3d5144a9ce.tar.bz2
Merge pull request #81 from obfuscoder/perlcritic-m-r
Fix perlcritic issues for all scripts starting with m to r
Diffstat (limited to 'scripts/quitrand.pl')
-rw-r--r--scripts/quitrand.pl2
1 files changed, 1 insertions, 1 deletions
diff --git a/scripts/quitrand.pl b/scripts/quitrand.pl
index 8d9e53b..cfa1b38 100644
--- a/scripts/quitrand.pl
+++ b/scripts/quitrand.pl
@@ -20,7 +20,7 @@ my $quitfile = glob "~/.irssi/irssi.quit";
sub cmd_quit {
my ($data, $server, $channel) = @_;
- open(f,$quitfile);
+ open(f,"<",$quitfile);
my @contenido = <f>;
close(f);