Changeset 30575


Ignore:
Timestamp:
2016-06-17T16:05:31+12:00 (5 years ago)
Author:
ak19
Message:

Important correction to previous commit: forgot file output character when opening file handle for writing.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • main/trunk/greenstone2/perllib/util.pm

    r30574 r30575  
    258258       
    259259        my $tmp_test_file = &FileUtils::filenameConcatenate($tmp_dirname, "writability_test.tmp");
    260         if (open (FOUT, $tmp_test_file)) {
     260        if (open (FOUT, ">$tmp_test_file")) {
    261261            close(FOUT);
    262262            &FileUtils::removeFiles($tmp_test_file);
Note: See TracChangeset for help on using the changeset viewer.