diff options
| author | David Leadbeater | 2015-01-10 17:50:12 +0000 |
|---|---|---|
| committer | David Leadbeater | 2015-01-10 17:50:12 +0000 |
| commit | 3350aef6b04f0d33ad52b41179c6742a98d2aa1f (patch) | |
| tree | 287ac1dba07509317309acab3161f5da286958e9 /scripts/iMPD.pl | |
| parent | 1bae3cffef57d4d46d0230aa4f44cc52c7671b93 (diff) | |
| parent | 2d920d6f610e176bf121f9089f21956595df70e9 (diff) | |
| download | scripts.irssi.org-3350aef6b04f0d33ad52b41179c6742a98d2aa1f.tar.bz2 | |
Merge branch 'obfuscoder-perlcritic-e-l' into gh-pages
Diffstat (limited to 'scripts/iMPD.pl')
| -rw-r--r-- | scripts/iMPD.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/scripts/iMPD.pl b/scripts/iMPD.pl index 945a1bf..6078e55 100644 --- a/scripts/iMPD.pl +++ b/scripts/iMPD.pl @@ -262,7 +262,7 @@ sub addShufflePlay { sub cleanup { my ($file) = Irssi::get_irssi_dir."/iMPD.conf"; - open CONF, "> $file"; + open CONF, ">", $file; for my $net (sort keys %SAVE_VARS) { print CONF "$net\t$SAVE_VARS{$net}\n"; close CONF; @@ -489,7 +489,7 @@ print $mpd_help_advanced; sub load_settings { my ($file) = Irssi::get_irssi_dir."/iMPD.conf"; - open CONF, "< $file"; + open CONF, "<", $file; while (<CONF>) { my($net,$val) = split; if ($net && $val) { |