From 40f2eee5acdbe92aca68f47ffc6ee15aa3035f7e Mon Sep 17 00:00:00 2001 From: pcanterino <> Date: Mon, 30 Mar 2009 17:58:58 +0000 Subject: [PATCH] Added new configurtaion option for hiding dot files. When new option "hide_dot_files" is set to 1, every file or directory beginning with a "." is not shown in the directory listing. But you can still access the file / directory by typing its name into the "Go to directory/file" box. This option is also available in the user-dependent configuration. --- devedit.conf | 16 +++++++++------- modules/Command.pm | 2 ++ modules/Config/DevEdit.pm | 10 ++++++---- 3 files changed, 17 insertions(+), 11 deletions(-) diff --git a/devedit.conf b/devedit.conf index 0da399c..ffe3ca2 100644 --- a/devedit.conf +++ b/devedit.conf @@ -3,15 +3,17 @@ # # Please don't use quotation marks around the keys and values! -fileroot = D:/WWW/dokumente/devedit-test -httproot = /devedit-test/ +fileroot = D:/WWW/dokumente/devedit-test +httproot = /devedit-test/ -max_file_size = 100000 +max_file_size = 100000 -timeformat = %d.%m.%Y %H:%M -use_gmt = 0 +timeformat = %d.%m.%Y %H:%M +use_gmt = 0 -error_file = errors.conf -template_file = templates.conf +hide_dot_files = 0 + +error_file = errors.conf +template_file = templates.conf # End of configuration file \ No newline at end of file diff --git a/modules/Command.pm b/modules/Command.pm index 2905545..a35abd4 100644 --- a/modules/Command.pm +++ b/modules/Command.pm @@ -132,6 +132,7 @@ sub exec_show($$) foreach my $dir(@$dirs) { + next if($config->{'hide_dot_files'} && substr($dir,0,1) eq '.'); next unless(dos_wildcard_match($filter1,$dir)); my $phys_path = $physical.'/'.$dir; @@ -159,6 +160,7 @@ sub exec_show($$) foreach my $file(@$files) { + next if($config->{'hide_dot_files'} && substr($file,0,1) eq '.'); next unless(dos_wildcard_match($filter1,$file)); my $phys_path = $physical.'/'.$file; diff --git a/modules/Config/DevEdit.pm b/modules/Config/DevEdit.pm index bc93cfe..8d9d503 100644 --- a/modules/Config/DevEdit.pm +++ b/modules/Config/DevEdit.pm @@ -66,12 +66,14 @@ sub read_config($) my $new_conf = $userconf->{$ENV{'REMOTE_USER'}}; - $config->{'fileroot'} = $new_conf->{'fileroot'} if($new_conf->{'fileroot'}); - $config->{'httproot'} = $new_conf->{'httproot'} if($new_conf->{'httproot'}); + $config->{'fileroot'} = $new_conf->{'fileroot'} if($new_conf->{'fileroot'}); + $config->{'httproot'} = $new_conf->{'httproot'} if($new_conf->{'httproot'}); - $config->{'forbidden'} = $new_conf->{'forbidden'} if(defined $new_conf->{'forbidden'}); + $config->{'forbidden'} = $new_conf->{'forbidden'} if(defined $new_conf->{'forbidden'}); - $config->{'user_config'} = 1; + $config->{'hide_dot_files'} = $new_conf->{'hide_dot_files'} if(defined $new_conf->{'hide_dot_files'}); + + $config->{'user_config'} = 1; } } -- 2.34.1