1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
|
Author: Andreas Tille <tille@debian.org>
Last-Update: Tue, 07 Sep 2021 14:40:48 +0200
Origin: https://lists.debian.org/debian-r/2021/09/msg00040.html
Description: Prevent RUnit from writing to /usr
--- a/tests/doRUnit.R
+++ b/tests/doRUnit.R
@@ -22,12 +22,12 @@ if( require( "RUnit", quietly=TRUE ) ) {
pathReport <- file.path( path, "report" )
- 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="" ) )
+ #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="" ) )
- printHTMLProtocol( tests, fileName=paste( pathReport, ".html", sep="" ) )
+ #printHTMLProtocol( tests, fileName=paste( pathReport, ".html", sep="" ) )
tmp <- getErrors( tests )
if( tmp$nFail > 0 | tmp$nErr > 0 ){
|
