add build_all script

git-svn-id: svn://svn.r-forge.r-project.org/svnroot/cran2deb@284 edb9625f-4e0d-4859-8d74-9fd3b1da38cb

diff --git a/trunk/exec/build_all b/trunk/exec/build_all
new file mode 100644 (file)
index 0000000..d8d275c
--- /dev/null
+++ b/trunk/exec/build_all
@@ -0,0 +1,16 @@
+#!/usr/bin/env r
+## DOC: cran2deb build_all
+## DOC:                build all packages again
+## DOC:
+
+suppressPackageStartupMessages(library(cran2deb))
+
+if (exists('argv')) { # check for littler
+    db_update_package_versions()
+    pkgs <- dimnames(available)[1]
+    build_order <- r_dependency_closure(pkgs)
+    notice('build order',paste(build_order,collapse=', '))
+    for (pkg in build_order) {
+        build(pkg,c())
+    }
+}

diff --git a/trunk/exec/cran_pkgs b/trunk/exec/cran_pkgs
index b8a2dcb4dd94b042bad60fca23839d9fd12afe2d..201f968d829c59c34118ecd74c436c9d4e0bfa78 100755 (executable)
--- a/trunk/exec/cran_pkgs
+++ b/trunk/exec/cran_pkgs
@@ -10,7 +10,7 @@
 library(cran2deb)
 
 if (length(argv) == 1) {
-    writeLines(sample(dimnames(available)[[1]],800))
+    writeLines(dimnames(available)[[1]])
 } else {
     argv = argv[2:length(argv)]
     if (argv[1] == 'query') {