Changeset 30305 for gs2-extensions
- Timestamp:
- 2015-10-12T11:23:27+13:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
gs2-extensions/parallel-building/trunk/src/perllib/dbutil/gdbmserver.pm
r27179 r30305 36 36 use Fcntl qw(:flock); 37 37 38 use FileUtils; 38 39 use GDBMClient; 39 40 use util; … … 57 58 58 59 my $tmp_dir = &util::filename_cat($ENV{'GSDLHOME'},'tmp'); 59 if (! & util::dir_exists($tmp_dir)) {60 & util::mk_dir($tmp_dir,1);60 if (! &FileUtils::directoryExists($tmp_dir)) { 61 &FileUtils::makeDirectory($tmp_dir, 1); 61 62 } 62 63 … … 206 207 { 207 208 my $tmp_collect_dir = &util::filename_cat($ENV{'GSDLCOLLECTDIR'},'tmp'); 208 if (! & util::dir_exists($tmp_collect_dir)) {209 & util::mk_dir($tmp_collect_dir,1);209 if (! &FileUtils::directoryExists($tmp_collect_dir)) { 210 &FileUtils::makeDirectory($tmp_collect_dir, 1); 210 211 } 211 212
Note:
See TracChangeset
for help on using the changeset viewer.