[Sciviews-commits] r75 - pkg/svMisc/R

[noreply at r-forge.r-project.org]

Author: romain
Date: 2008-11-19 17:19:44 +0100 (Wed, 19 Nov 2008)
New Revision: 75

Modified:
   pkg/svMisc/R/descFun.R
Log:
using the zip.file.extract to look into help files the same way help does so thatit extracts the file from Rhelp.zip if there the help pages are zipped

Modified: pkg/svMisc/R/descFun.R
===================================================================
--- pkg/svMisc/R/descFun.R	2008-11-19 16:16:18 UTC (rev 74)
+++ pkg/svMisc/R/descFun.R	2008-11-19 16:19:44 UTC (rev 75)
@@ -78,7 +78,7 @@
 	File. <- file( File, encoding = enc, open = "r" )
 	
 	# Read content of the text file
-	Data <- scan(File., what = character(), sep = "\n" )
+	Data <- scan(File., what = character(), sep = "\n", quiet = TRUE )
 	close( File. )
 	
 	# Get the Arguments: section