sharpetronics/QGIS
1
0
Fork 0
mirror of https://github.com/qgis/QGIS.git synced 2025-04-15 00:04:00 -04:00
Code Issues Packages Projects Releases Wiki Activity

Detect R installation

Browse Source
This commit is contained in:
Stefan Blumentrath 2016-01-28 11:57:38 +01:00
parent 70d390727c
commit 1ce66b75d8
1 changed files with 20 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
python/plugins/processing/algs/r/RUtils.py
View File

@ -47,7 +47,26 @@ class RUtils:
def RFolder(): def RFolder():
folder = ProcessingConfig.getSetting(RUtils.R_FOLDER) folder = ProcessingConfig.getSetting(RUtils.R_FOLDER)
if folder is None: if folder is None:
folder = '' if isWindows():
if "ProgramW6432" in os.environ.keys() and os.path.isdir(os.path.join(os.environ["ProgramW6432"],'R')):
testfolder = os.path.join(os.environ["ProgramW6432"],'R')
elif "PROGRAMFILES(x86)" in os.environ.keys() and os.path.isdir(os.path.join(os.environ["PROGRAMFILES(x86)"],'R')):
testfolder = os.path.join(os.environ["PROGRAMFILES(x86)"],'R')
elif "PROGRAMFILES" in os.environ.keys() and os.path.isdir(os.path.join(os.environ["PROGRAMFILES"],'R')):
testfolder = os.path.join(os.environ["PROGRAMFILES"],'R')
else:
testfolder = 'C:\\R'
if os.path.isdir(testfolder):
subfolders = os.listdir(testfolder)
subfolders.sort(reverse=True)
for subfolder in subfolders:
if subfolder.startswith('R-'):
folder = os.path.join(testfolder, subfolder)
break
else:
folder = ''
else:
folder = ''
return os.path.abspath(unicode(folder)) return os.path.abspath(unicode(folder))