Changeset 29076 for main/trunk
- Timestamp:
- 2014-05-22T10:10:23+12:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone3/web/WEB-INF/cgi/file-download.pl
r28193 r29076 44 44 my $collect_dir = $gsdl_cgi->get_collection_dir($site); 45 45 46 my $dir = &util::filename_cat($collect_dir,$c,"index /assoc");46 my $dir = &util::filename_cat($collect_dir,$c,"index","assoc"); 47 47 48 my $download_file = "$dir\\$assoc\\$filename";48 my $download_file = &util::filename_cat($dir,$assoc,$filename); 49 49 50 open(DOWNLOAD_FILE, "<$download_file") or die " $!";50 open(DOWNLOAD_FILE, "<$download_file") or die "Failed to open file $download_file\n $!"; 51 51 binmode DOWNLOAD_FILE; 52 52 @fileholder = <DOWNLOAD_FILE>;
Note:
See TracChangeset
for help on using the changeset viewer.