Changeset 32130
- Timestamp:
- 2018-02-13T11:18:58+13:00 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/common-src/cgi-bin/gliserver.pl
r29730 r32130 914 914 { 915 915 my $site_dir_path= &util::filename_cat($sites_directory,$sites_dir); 916 $gsdl_cgi->checked_chdir($site_dir_path); 917 opendir(DIR,$site_dir_path); 918 @site_dir=readdir(DIR); 919 closedir(DIR); 920 921 foreach $sub_dir_file(@site_dir) 922 { 923 if ($sub_dir_file eq "siteConfig.xml"){ 924 print STDOUT "$sites_dir" . "-----"; 916 if (-d $site_dir_path) { 917 $gsdl_cgi->checked_chdir($site_dir_path); 918 opendir(DIR,$site_dir_path); 919 @site_dir=readdir(DIR); 920 closedir(DIR); 921 922 foreach $sub_dir_file(@site_dir) 923 { 924 if ($sub_dir_file eq "siteConfig.xml"){ 925 print STDOUT "$sites_dir" . "-----"; 926 last; 927 } 925 928 } 926 929 }
Note:
See TracChangeset
for help on using the changeset viewer.