a tweaked version of:

[p5sagit/p5-mst-13.2.git] / perlenv.h

diff --git a/perlenv.h b/perlenv.h
index 6f4211e..07cce76 100644 (file)
--- a/perlenv.h
+++ b/perlenv.h
@@ -5,9 +5,12 @@
 
 #include "ipenv.h"
 
-#define PerlEnv_putenv(str) piENV->Putenv((str), ErrorNo())
-#define PerlEnv_getenv(str) piENV->Getenv((str), ErrorNo())
-#define PerlEnv_lib_path       piENV->LibPath
+#define PerlEnv_putenv(str)        piENV->Putenv((str), ErrorNo())
+#define PerlEnv_getenv(str)        piENV->Getenv((str), ErrorNo())
+#ifdef WIN32
+#define PerlEnv_lib_path(str)      piENV->LibPath((str))
+#define PerlEnv_sitelib_path(str)   piENV->SiteLibPath((str))
+#endif
 #else
 #define PerlEnv_putenv(str) putenv((str))
 #define PerlEnv_getenv(str) getenv((str))