removed remnant check on an EVAL_ERROR for a deleted eval

diff --git a/lib/Perl/Tidy.pm b/lib/Perl/Tidy.pm
index 7673b0b4698bf8c7d28d1b59ec94d3bfc6adb90e..792dd77ed4dae9ff193b420e486632e697bdfef0 100644 (file)
--- a/lib/Perl/Tidy.pm
+++ b/lib/Perl/Tidy.pm
@@ -878,8 +878,7 @@ EOM
                     if ( $input_file =~ /^\'(.+)\'$/ ) { $input_file = $1 }
                     if ( $input_file =~ /^\"(.+)\"$/ ) { $input_file = $1 }
                     my $pattern = fileglob_to_re($input_file);
-                    ##eval "/$pattern/";
-                    if ( !$@ && opendir( DIR, './' ) ) {
+                    if ( opendir( DIR, './' ) ) {
                         my @files =
                           grep { /$pattern/ && !-d $_ } readdir(DIR);
                         closedir(DIR);