Revision: 358
          http://rpy.svn.sourceforge.net/rpy/?rev=358&view=rev
Author:   warnes
Date:     2007-10-17 18:36:48 -0700 (Wed, 17 Oct 2007)

Log Message:
-----------
Apply patch [ 1808836 ] Install-script tweaking for Windows

Modified Paths:
--------------
    trunk/rpy/rpy_wintools.py

Modified: trunk/rpy/rpy_wintools.py
===================================================================
--- trunk/rpy/rpy_wintools.py   2007-10-18 01:26:34 UTC (rev 357)
+++ trunk/rpy/rpy_wintools.py   2007-10-18 01:36:48 UTC (rev 358)
@@ -11,8 +11,12 @@
                                           0,
                                           0)
     Rdir = os.path.join(program_files,"R")
-    Rprogs = os.listdir(Rdir)
-    Rhomes = map( lambda(x): os.path.join(Rdir, x), Rprogs)
+    Rhomes = []
+    if os.path.exists(Rdir):
+        Rprogs = os.listdir(Rdir)
+        Rhomes = map( lambda(x): os.path.join(Rdir, x), Rprogs)
+    if os.environ.get('RHOME', None):
+        Rhomes.insert(0, os.environ.get('RHOME', None))
     return Rhomes
 
 


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

-------------------------------------------------------------------------
This SF.net email is sponsored by: Splunk Inc.
Still grepping through log files to find problems?  Stop.
Now Search log events and configuration files using AJAX and a browser.
Download your FREE copy of Splunk now >> http://get.splunk.com/
_______________________________________________
rpy-list mailing list
rpy-list@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/rpy-list

Reply via email to