commit e877f8ba3306be0c76476c1f841d6f5388b675b7
author Guido van Rossum <guido@python.org> Wed Oct 24 20:13:15 2001 +0000
committer Guido van Rossum <guido@python.org> Wed Oct 24 20:13:15 2001 +0000
tree 58535b7aab583873d072c7f76849ccbc7141f852
parent 622cc03f0b5ba8e8e51aaa73c137350fe81564a8

SF patch #474590 -- RISC OS support

RISCOS/Modules/getpath_riscos.c

diff --git a/RISCOS/Modules/getpath_riscos.c b/RISCOS/Modules/getpath_riscos.c
index 8b36952..8705e2c 100644
--- a/RISCOS/Modules/getpath_riscos.c
+++ b/RISCOS/Modules/getpath_riscos.c
@@ -5,7 +5,7 @@
 
 static void
 calculate_path()
-{ char *pypath=Py_GETENV("Python$Path");
+{ char *pypath=getenv("Python$Path");
   if(pypath)
   { module_search_path=malloc(strlen(pypath)+1);
     if (module_search_path) sprintf(module_search_path,"%s",pypath);
@@ -16,9 +16,9 @@
     }
   }
   if(!module_search_path) module_search_path = "<Python$Dir>.Lib";
-  prefix="";
+  prefix="<Python$Dir>";
   exec_prefix=prefix;
-  progpath="<Python$Dir>";
+  progpath=Py_GetProgramName();
 }
 
 /* External interface */