[med-svn] r22130 - in trunk/packages/R/r-cran-doparallel/trunk/debian: . patches

[Gordon Ball]

Author: chronitis-guest
Date: 2016-06-13 10:11:38 +0000 (Mon, 13 Jun 2016)
New Revision: 22130

Added:
   trunk/packages/R/r-cran-doparallel/trunk/debian/patches/
   trunk/packages/R/r-cran-doparallel/trunk/debian/patches/series
   trunk/packages/R/r-cran-doparallel/trunk/debian/patches/unittest-no-report.patch
Log:
Patch out the test suite trying to write a report to disk

Added: trunk/packages/R/r-cran-doparallel/trunk/debian/patches/series
===================================================================
--- trunk/packages/R/r-cran-doparallel/trunk/debian/patches/series	                        (rev 0)
+++ trunk/packages/R/r-cran-doparallel/trunk/debian/patches/series	2016-06-13 10:11:38 UTC (rev 22130)
@@ -0,0 +1 @@
+unittest-no-report.patch

Added: trunk/packages/R/r-cran-doparallel/trunk/debian/patches/unittest-no-report.patch
===================================================================
--- trunk/packages/R/r-cran-doparallel/trunk/debian/patches/unittest-no-report.patch	                        (rev 0)
+++ trunk/packages/R/r-cran-doparallel/trunk/debian/patches/unittest-no-report.patch	2016-06-13 10:11:38 UTC (rev 22130)
@@ -0,0 +1,20 @@
+Description: don't write a test summary in a read-only directory
+Author: Gordon Ball <gordon at chronitis.net>
+
+--- a/tests/doRUnit.R
++++ b/tests/doRUnit.R
+@@ -48,14 +48,6 @@
+   ## Report to stdout and text files
+   cat("------------------- UNIT TEST SUMMARY ---------------------\n\n")
+   printTextProtocol(tests, showDetails=FALSE)
+-  printTextProtocol(tests, showDetails=FALSE,
+-                    fileName=paste(pathReport, "Summary.txt", sep=""))
+-  printTextProtocol(tests, showDetails=TRUE,
+-                    fileName=paste(pathReport, ".txt", sep=""))
+- 
+-  ## Report to HTML file
+-  printHTMLProtocol(tests, fileName=paste(pathReport, ".html", sep=""))
+-#  printHTMLProtocol(tests, fileName=file.path(dirname(dirname(getwd())),pkg,"gsDesign-RUnit-Test-Summary.html")) #paste(pathReport, ".html", sep=""))  
+  
+   ## Return stop() to cause R CMD check stop in case of
+   ##  - failures i.e. FALSE to unit tests or