From: pcanterino <> Date: Tue, 9 Nov 2004 16:05:38 +0000 (+0000) Subject: Stupid bug X-Git-Tag: version_2_2~12 X-Git-Url: https://git.p6c8.net/devedit.git/commitdiff_plain/3ec59b333d0ac48bb1ae8c8a27e4d74626455203 Stupid bug --- diff --git a/modules/Command.pm b/modules/Command.pm index 79b944d..abff136 100644 --- a/modules/Command.pm +++ b/modules/Command.pm @@ -6,7 +6,7 @@ package Command; # Execute Dev-Editor's commands # # Author: Patrick Canterino -# Last modified: 2004-11-04 +# Last modified: 2004-11-09 # use strict; @@ -100,7 +100,7 @@ sub exec_show($$) return error($config->{'errors'}->{'no_dir_access'},upper_path($virtual)) unless(-r $physical && -x $physical); my $direntries = dir_read($physical); - return error($config->{'dir_read_failed'},upper_path($virtual),{DIR => '$virtual'}) unless($direntries); + return error($config->{'dir_read_failed'},upper_path($virtual),{DIR => $virtual}) unless($direntries); my $files = $direntries->{'files'}; my $dirs = $direntries->{'dirs'};