From d2b44a7bb135579368f93e7d4824480c000eaa64 Mon Sep 17 00:00:00 2001
From: Obfuscoder
Date: Fri, 17 Oct 2014 18:30:46 +0200
Subject: Fix perlcritic issues for all scripts starting with a

---
 scripts/away2web.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'scripts/away2web.pl')

diff --git a/scripts/away2web.pl b/scripts/away2web.pl
index 3077b9b..7414c23 100644
--- a/scripts/away2web.pl
+++ b/scripts/away2web.pl
@@ -35,7 +35,7 @@ use Irssi 20020324;
 sub catch_away {
 	my $server = shift;
 
-	open(STATUSFILE, '> '.$ENV{'HOME'}.'/.irssi/away2web-status') || die ("away2web.pl: Could not open file for writing:".$!);
+	open(STATUSFILE, q{>}, $ENV{'HOME'}.'/.irssi/away2web-status') || die ("away2web.pl: Could not open file for writing:".$!);
 
 	if ($server->{usermode_away}) {
 	    # User is offline.
-- 
cgit v1.2.3