From c8295475004d41bf3e35cf42793a2d8dd0dc647e Mon Sep 17 00:00:00 2001
From: Don Armstrong <don@donarmstrong.com>
Date: Tue, 24 Jan 2012 16:41:06 -0800
Subject: [PATCH] change to results directory

---
 trunk/R/build.R | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/trunk/R/build.R b/trunk/R/build.R
index 7c4f617..1839e01 100644
--- a/trunk/R/build.R
+++ b/trunk/R/build.R
@@ -128,21 +128,21 @@ needs_build <- function(name,version) {
 }
 
 build_debian_srcpkg <- function(pkg) {
-#    wd <- getwd()
+    wd <- getwd()
     #notice(paste("Now in path ",wd,"\n",sep=""))
-#    setwd(pkg$path)
-    
+    setwd(pbuilder_results)
+   
     notice('building Debian source package',pkg$debname,paste('(',pkg$debversion,')',sep=''),'in',getwd(),'...')
 
     cmd = paste('dpkg-source','-b',pkg$path)
     notice(paste("Executing ",'"',cmd,'"'," from directory '",getwd(),"'.\n",sep=""))
     ret = log_system(cmd)
-#    setwd(wd)
+    setwd(wd)
     if (ret != 0) {
         fail('Failed to build package.')
     }
     return(ret);
-}
+ls}
 
 build_debian <- function(pkg) {
     wd <- getwd()
-- 
2.39.2