From dd80027b51b3ee71027a2612595aee38e38c0d6e Mon Sep 17 00:00:00 2001 From: Obfuscoder Date: Sun, 19 Oct 2014 11:54:16 +0200 Subject: Fix perlcritic issues for all scripts starting with m to r --- scripts/nm.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'scripts/nm.pl') diff --git a/scripts/nm.pl b/scripts/nm.pl index b26ab74..7aa9479 100644 --- a/scripts/nm.pl +++ b/scripts/nm.pl @@ -413,7 +413,7 @@ sub assert_colors() { # load colors from file sub load_colors() { - open(FID, "<".$ENV{HOME}."/.irssi/saved_colors") || return; + open(FID, "<", $ENV{HOME}."/.irssi/saved_colors") || return; while () { chomp; @@ -434,7 +434,7 @@ sub load_colors() { # save colors to file sub save_colors() { - open(FID, ">".$ENV{HOME}."/.irssi/saved_colors"); + open(FID, ">", $ENV{HOME}."/.irssi/saved_colors"); print FID $_.":".$saved_colors{$_}."\n" foreach (keys(%saved_colors)); -- cgit v1.2.3