From d707da591a371427bf67e9eb1a7a2993c5730c55 Mon Sep 17 00:00:00 2001
From: martin f. krafft
Date: Wed, 15 Feb 2017 22:20:06 +0100
Subject: Switch to 3-arg open calls

Signed-off-by: martin f. krafft <madduck@madduck.net>
---
 scripts/ctrlact.pl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'scripts')

diff --git a/scripts/ctrlact.pl b/scripts/ctrlact.pl
index c35a2c4..534b00a 100644
--- a/scripts/ctrlact.pl
+++ b/scripts/ctrlact.pl
@@ -361,10 +361,10 @@ sub get_mappings_fh {
 	my ($filename) = @_;
 	my $fh;
 	if (-e $filename) {
-		open($fh, $filename) || croak "Cannot open mappings file: $!";
+		open($fh, '<', $filename) || croak "Cannot open mappings file: $!";
 	}
 	else {
-		open($fh, "+>$filename") || croak "Cannot create mappings file: $!";
+		open($fh, '+>', $filename) || croak "Cannot create mappings file: $!";
 
 		my $ftw = from_data_level($fallback_window_threshold);
 		my $ftc = from_data_level($fallback_channel_threshold);
-- 
cgit v1.2.3