Mercurial > octave
comparison scripts/pkg/pkg.m @ 31195:776446acdc7b
pkg.m: Show URL of source tarball(s) in verbose mode.
* scripts/pkg/pkg.m: If downloading source tarballs with the "-forge" option,
show the URL where they are downloaded from if verbose mode is on.
author | Markus Mützel <markus.muetzel@gmx.de> |
---|---|
date | Fri, 19 Aug 2022 08:54:05 +0200 |
parents | 65c4d98352d3 |
children | 96f751f8392c |
comparison
equal
deleted
inserted
replaced
31194:e859837e620d | 31195:776446acdc7b |
---|---|
532 unwind_protect | 532 unwind_protect |
533 | 533 |
534 if (octave_forge) | 534 if (octave_forge) |
535 [urls, local_files] = cellfun ("get_forge_download", files, | 535 [urls, local_files] = cellfun ("get_forge_download", files, |
536 "uniformoutput", false); | 536 "uniformoutput", false); |
537 if (verbose) | |
538 fprintf ("downloading tarball(s) from:%s\n", ... | |
539 sprintf ("\n- %s", urls{:})); | |
540 endif | |
537 [files, succ] = cellfun ("urlwrite", urls, local_files, | 541 [files, succ] = cellfun ("urlwrite", urls, local_files, |
538 "uniformoutput", false); | 542 "uniformoutput", false); |
539 succ = [succ{:}]; | 543 succ = [succ{:}]; |
540 if (! all (succ)) | 544 if (! all (succ)) |
541 i = find (! succ, 1); | 545 i = find (! succ, 1); |