Mercurial > octave-nkf
comparison scripts/pkg/pkg.m @ 6020:f542445f6b7a
[project @ 2006-10-02 19:24:08 by dbateman]
author | dbateman |
---|---|
date | Mon, 02 Oct 2006 19:24:08 +0000 |
parents | 401ca0de8506 |
children | bb0c9f97fe4f |
comparison
equal
deleted
inserted
replaced
6019:f717f9e37d8f | 6020:f542445f6b7a |
---|---|
589 endif | 589 endif |
590 endif | 590 endif |
591 endfunction | 591 endfunction |
592 | 592 |
593 function copy_files (desc, packdir, bindir) | 593 function copy_files (desc, packdir, bindir) |
594 ## Create the installation directory | |
595 if (! exist (desc.dir, "dir")) | |
596 [status, output] = mkdir (desc.dir); | |
597 if (status != 1) | |
598 error("Couldn't create installation directory %s : %s\n", | |
599 desc.dir, output); | |
600 endif | |
601 endif | |
602 | |
594 ## Copy the files from "inst" to installdir | 603 ## Copy the files from "inst" to installdir |
595 if (! dirempty([packdir "inst"])) | 604 if (! dirempty([packdir "inst"])) |
596 if (! exist (desc.dir, "dir")) | |
597 [status, output] = mkdir (desc.dir); | |
598 if (status != 1) | |
599 error("Couldn't create installation directory %s : %s\n", | |
600 desc.dir, output); | |
601 endif | |
602 endif | |
603 [status, output] = system(["cp -R " packdir "inst/* " desc.dir]); | 605 [status, output] = system(["cp -R " packdir "inst/* " desc.dir]); |
604 if (status != 0) | 606 if (status != 0) |
605 rm_rf(desc.dir); | 607 rm_rf(desc.dir); |
606 error("Couldn't copy files to the installation directory\n"); | 608 error("Couldn't copy files to the installation directory\n"); |
607 endif | 609 endif |