update_available: use a different mirror for now

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

diff --git a/pkg/trunk/update_available b/pkg/trunk/update_available
index 72887dc249624ffc48e7e1f4a51c7ade52d0e635..cc993764f1d6af3fcde5cf129977f11c4c008856 100755 (executable)
--- a/pkg/trunk/update_available
+++ b/pkg/trunk/update_available
@@ -1,8 +1,10 @@
 #!/usr/bin/env r
+#mirror <- 'http://cran.uk.r-project.org/'
+mirror <- 'http://cran.r-project.org/'
 message('updating list of available R packages...')
-available <- available.packages(contrib.url('http://cran.uk.r-project.org/'))
+available <- available.packages(contrib.url(mirror))
 available <- rbind(available,available.packages(contrib.url('http://www.bioconductor.org/')))
 message('updating list of available R task views...')
 library(ctv)
-ctv.available <- available.views(repo='http://cran.uk.r-project.org/')
+ctv.available <- available.views(repo=mirror)
 save(available, ctv.available, file='var/cache/available.cache.Rd',eval.promises=T)