From 0ee7615036d372729054828c4ff5aa2ea8be91f0 Mon Sep 17 00:00:00 2001
From: Tomas Cohen Arazi <tomascohen@gmail.com>
Date: Tue, 26 May 2015 14:16:50 -0300
Subject: [PATCH] Revert "Bug 6679: Fix 6 perlcritic violations in
 C4/Reports/Guided.pm"

This reverts commit e592536d97483b88dceabedfaec9fefcefbcda2f.

Signed-off-by: Tomas Cohen Arazi <tomascohen@gmail.com>
---
 C4/Reports/Guided.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/C4/Reports/Guided.pm b/C4/Reports/Guided.pm
index 6c5a47764e..97a41c7b9b 100644
--- a/C4/Reports/Guided.pm
+++ b/C4/Reports/Guided.pm
@@ -880,7 +880,7 @@ sub _get_column_defs {
     my ($theme, $lang, $availablethemes) = C4::Templates::themelanguage($htdocs, 'about.tt', $section, $cgi);
 
     my $full_path_to_columns_def_file="$htdocs/$theme/$lang/$columns_def_file";
-    open (my $fh, '<', $full_path_to_columns_def_file);
+    open (my $fh, $full_path_to_columns_def_file);
     while ( my $input = <$fh> ){
         chomp $input;
         if ( $input =~ m|<field name="(.*)">(.*)</field>| ) {
-- 
2.39.5