*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Fri, 10 Aug 2018 16:57:15 +0200
changeset 23274 acec2dba4092
parent 23273 937be20520a7
child 23275 1e851692e326
*** empty log message ***
Win32OperatingSystem.st
--- a/Win32OperatingSystem.st	Fri Aug 10 13:31:47 2018 +0200
+++ b/Win32OperatingSystem.st	Fri Aug 10 16:57:15 2018 +0200
@@ -4474,6 +4474,15 @@
 	lpParameters:nil
 	lpDirectory:nil
 	nShowCmd:#SW_SHOWNORMAL
+
+     self
+	shellExecute:nil
+	lpOperation:'open'
+	lpFile:'http://www.exept.de'
+	lpParameters:nil
+	lpDirectory:nil
+	nShowCmd:#SW_SHOWNORMAL
+
     self
 	shellExecute:nil
 	lpOperation:'explore'
@@ -18286,7 +18295,7 @@
 
 	if( resRemoteName != nil ) {
 #ifdef USE_ANSI_NETWORKRESOURCES
-	    __sp = __stringVal(resRemoteName);
+	    __sp =  __stringVal(resRemoteName);
 	    __sz = strlen(__sp);
 #else
 	    __sp = __unicode16StringVal(resRemoteName);
@@ -18325,7 +18334,7 @@
 	    __sp = __stringVal(resProvider);
 	    __sz = strlen(__sp);
 #else
-	    __sp = __unicode16StringVal(resProvider);
+	    __sp = (wchar_t*)__unicode16StringVal(resProvider);
 	    __sz = __unicode16StringSize(resProvider);
 #endif
 	    for( __lpnetRes->lpProvider = __cp; __sz > 0; --__sz ) { * __cp++ = * __sp++; }