Changeset 7951
- Timestamp:
- 2004-08-16T15:54:41+12:00 (20 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gsdl/bin/script/exportcol.pl
r7257 r7951 283 283 my $coletcdir = &util::filename_cat ($colldir, "etc"); 284 284 my $colimagesdir = &util::filename_cat ($colldir, "images"); 285 my $colmacrosdir = &util::filename_cat ($colldir, "macros"); 285 286 # new coll directory 286 287 my $newcoldir = &util::filename_cat ($collectdir, $c); … … 290 291 &util::cp_r ($coletcdir, $newcoldir); 291 292 &util::cp_r ($colimagesdir, $newcoldir) if (-e $colimagesdir); 293 &util::cp_r ($colmacrosdir, $newcoldir) if (-e $colmacrosdir); 292 294 293 295 # now we need to check the collect.cfg file to make sure it's public
Note:
See TracChangeset
for help on using the changeset viewer.