X-Git-Url: https://git.p6c8.net/devedit.git/blobdiff_plain/d3a034178ca60c1a856535f0ed57fbb54ada0ebb..75c789857e82f326c9f1948f4c04ba266ab511c2:/modules/Command.pm

diff --git a/modules/Command.pm b/modules/Command.pm
index f3a7158..d62643d 100644
--- a/modules/Command.pm
+++ b/modules/Command.pm
@@ -6,7 +6,7 @@ package Command;
 # Execute Dev-Editor's commands
 #
 # Author:        Patrick Canterino <patrick@patshaping.de>
-# Last modified: 2004-12-06
+# Last modified: 2004-12-10
 #
 
 use strict;
@@ -25,6 +25,8 @@ use HTML::Entities;
 use Output;
 use Template;
 
+use Data::Dumper;
+
 my $script = $ENV{'SCRIPT_NAME'};
 my $users  = eval("getpwuid(0)") && eval("getgrgid(0)");
 
@@ -174,7 +176,7 @@ sub exec_show($$)
    $ftpl->parse_if_block("readonly",not -w $phys_path);
 
    $ftpl->parse_if_block("viewable",-r $phys_path && -T $phys_path && not $too_large);
-   $ftpl->parse_if_block("editable",-r $phys_path && -w $phys_path && -T $phys_path && not $too_large && not $in_use);
+   $ftpl->parse_if_block("editable",(-r $phys_path && -w $phys_path && -T $phys_path && not $too_large) && not $in_use);
 
    $ftpl->parse_if_block("in_use",$in_use);
    $ftpl->parse_if_block("unused",not $in_use);