From 286f819461ff93f6b56f8f7d1b5689a84b32896f Mon Sep 17 00:00:00 2001
From: Reini Urban <rurban@x-ray.at>
Date: Wed, 8 Feb 2012 17:58:21 -0600
Subject: add Cygwin::sync_winenv [perl #110190]

Cygwin::sync_winenv should fix [CPAN #65052], ADODB missing
%COMMONPROGRAMFILES%.
sync_winenv code and solution by Chris Day.
---
 cygwin/cygwin.c | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'cygwin')

diff --git a/cygwin/cygwin.c b/cygwin/cygwin.c
index 0f5fe1d7fc..9419e83aa7 100644
--- a/cygwin/cygwin.c
+++ b/cygwin/cygwin.c
@@ -538,6 +538,8 @@ XS(XS_Cygwin_is_binmount)
     XSRETURN(1);
 }
 
+XS(XS_Cygwin_sync_winenv){ cygwin_internal(CW_SYNC_WINENV); }
+
 void
 init_os_extras(void)
 {
@@ -553,6 +555,7 @@ init_os_extras(void)
     newXSproto("Cygwin::mount_table", XS_Cygwin_mount_table, file, "");
     newXSproto("Cygwin::mount_flags", XS_Cygwin_mount_flags, file, "$");
     newXSproto("Cygwin::is_binmount", XS_Cygwin_is_binmount, file, "$");
+    newXS("Cygwin::sync_winenv", XS_Cygwin_sync_winenv, file);
 
     /* Initialize Win32CORE if it has been statically linked. */
     handle = dlopen(NULL, RTLD_LAZY);
-- 
cgit v1.2.1