Changeset 15943
- Timestamp:
- 2008-06-09T17:56:06+12:00 (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
greenstone3/trunk/web/WEB-INF/cgi/gliserver4gs3.pl
r15942 r15943 119 119 } 120 120 elsif ($cmd eq "file-exists") { 121 &file_exists($gsdl_cgi );122 } 121 &file_exists($gsdl_cgi, $site); 122 } 123 123 else { 124 124 $gsdl_cgi->generate_error("Unrecognised command: '$cmd'"); … … 550 550 sub file_exists 551 551 { 552 my ($gsdl_cgi, $username, $timestamp) = @_;553 554 552 my ($gsdl_cgi) = @_; 555 553 … … 564 562 $file =~ s/\|/&util::get_dirsep()/eg; # Convert the '|' characters into whatever is right for this OS 565 563 566 # Not necessary: checking whether the user is authenticated to query existance of the file 567 #&authenticate_user($gsdl_cgi, $username, $collection); 568 569 my $collection_directory = &util::filename_cat($ENV{'GSDL3SRCHOME'}, "web", "sites", "localsite", "collect", $collection); 564 # Not necessary to check whether the user is authenticated to query existence of the file 565 566 my $collection_directory = &util::filename_cat($ENV{'GSDLHOME'}, "collect", $collection); 567 if(defined $ENV{'GSDL3SRCHOME'}) { # GS3 case 568 $collection_directory = &util::filename_cat($ENV{'GSDL3SRCHOME'}, "web", "sites", $site, "collect", $collection); 569 } 570 570 $gsdl_cgi->checked_chdir($collection_directory); 571 571 … … 577 577 } 578 578 } 579 579 580 580 581 sub download_collection_file
Note:
See TracChangeset
for help on using the changeset viewer.