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/paste-derwan.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'scripts/paste-derwan.pl')

diff --git a/scripts/paste-derwan.pl b/scripts/paste-derwan.pl
index bc4e89f..dd96dde 100644
--- a/scripts/paste-derwan.pl
+++ b/scripts/paste-derwan.pl
@@ -113,7 +113,7 @@ sub paste {
 		return;
 	};
 	if ($where =~ /^-s/) {
-		open (F, ">>$file") or do {
+		open (F, ">>", $file) or do {
 			$window->print("Paste: Cannot write savefile \"$file\"", $paste_use_level);
 			return;
 		};
-- 
cgit v1.2.3