[R-gregmisc-users] SF.net SVN: r-gregmisc:[1448] trunk/gdata/R/xls2sep.R

[<ggr...@us...>]

Revision: 1448
          http://r-gregmisc.svn.sourceforge.net/r-gregmisc/?rev=1448&view=rev
Author:   ggrothendieck2
Date:     2010-07-08 12:36:48 +0000 (Thu, 08 Jul 2010)

Log Message:
-----------
findPerl call added to xls2sep

Modified Paths:
--------------
    trunk/gdata/R/xls2sep.R

Modified: trunk/gdata/R/xls2sep.R
===================================================================
--- trunk/gdata/R/xls2sep.R	2010-07-07 22:48:16 UTC (rev 1447)
+++ trunk/gdata/R/xls2sep.R	2010-07-08 12:36:48 UTC (rev 1448)
@@ -13,11 +13,16 @@
           perl=perl) 
 
 xls2sep <- function(xls, sheet=1, verbose=FALSE, ...,
-                    method=c("csv","tsv","tab"), perl="perl")
+                    method=c("csv","tsv","tab"), perl = perl)
   {
     
     method <- match.arg(method)
     
+	perl <- if (missing(perl))
+		findPerl(verbose = verbose)
+	else
+		findPerl(perl, verbose = verbose)
+
     ##
     ## directories
     package.dir <- .path.package('gdata')


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.