From d84f1e1808b3252af83e4963eccfd1e4f19c5326 Mon Sep 17 00:00:00 2001
From: Obfuscoder
Date: Fri, 17 Oct 2014 22:54:13 +0200
Subject: Fix perlcritic issues for all scripts starting with e to l

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

(limited to 'scripts/fleech.pl')

diff --git a/scripts/fleech.pl b/scripts/fleech.pl
index 3443c28..935d803 100644
--- a/scripts/fleech.pl
+++ b/scripts/fleech.pl
@@ -744,7 +744,7 @@ sub print_dbg {
 	my ($txt, $mlvl) = @_;
 	my $lvl = Irssi::settings_get_int('fleech_verbose_level');
 if ($dbglog) {
-	if (not open (DBGLOG, ">> $dbglog")) {
+	if (not open (DBGLOG, ">>", $dbglog)) {
 		$dbglog = "";
 	} else {
 	#	print_dbg("fleech.pl $VERSION loaded");		
-- 
cgit v1.2.3