From: blundellc <blundellc@edb9625f-4e0d-4859-8d74-9fd3b1da38cb>
Date: Sat, 13 Sep 2008 13:19:44 +0000 (+0000)
Subject: cran2deb: small bug fixes.
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=73eb9e2e343dde76916d6c55767d2319f3ab207e;p=cran2deb.git

cran2deb: small bug fixes.

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

diff --git a/pkg/trunk/exec/diagnose_ctv b/pkg/trunk/exec/diagnose_ctv
index 665ff8c..b1f995d 100755
--- a/pkg/trunk/exec/diagnose_ctv
+++ b/pkg/trunk/exec/diagnose_ctv
@@ -1,2 +1,2 @@
 #!/usr/bin/env rc
-{for (x in ctv/*) {echo;echo;echo $x: ; cd $x && ../../diagnose && cd ../..}} >ctv.results
+{for (x in ctv/*) {echo;echo;echo $x: ; cd $x && cran2deb diagnose && cd ../..}} >ctv.results
diff --git a/pkg/trunk/exec/update_cache b/pkg/trunk/exec/update_cache
index ec20ccb..ef91f13 100755
--- a/pkg/trunk/exec/update_cache
+++ b/pkg/trunk/exec/update_cache
@@ -1,6 +1,10 @@
 #!/usr/bin/env Rscript
 library(cran2deb)
 library(ctv)
+
+argv <- commandArgs()
+argv <- argv[-(1:match("--args", argv))]
+
 #mirror <- 'http://cran.uk.r-project.org/'
 mirror <- 'http://cran.r-project.org/'