Implementation of RegisterNLSInfoChanged.

if1632/ole2nls.spec

@@ -9,6 +9,7 @@ type	win16
 6 stub LCMAPSTRINGA
 7 pascal16 GetStringTypeA(long long str word ptr) GetStringType16
 8 pascal16 CompareStringA(long long str word str word) CompareString16
-#9 WEP
-10 stub LIBMAIN
-11 stub NOTIFYWINDOWPROC
+9 pascal16 RegisterNLSInfoChanged(ptr) RegisterNLSInfoChanged16
+#10 stub WEP
+11 stub LIBMAIN
+12 stub NOTIFYWINDOWPROC

ole/ole2nls.c

@@ -32,6 +32,8 @@ struct NLS_langlocale {
 	} locvars[150];
 };
 
+static LPVOID lpNLSInfo = NULL;
+
 #define LANG_BEGIN(l,s)	{	MAKELANGID(l,s), {
 
 #define LOCVAL(type,value)					{type,value},
@@ -257,7 +259,7 @@ LANG_END
 	    };
 
 
-/* Locale name to id map. used by EnumSystemLocales, GetLocalInfoA 
+/* Locale name to id map. used by EnumSystemLocales, GetLocaleInfoA 
  * MUST contain all #defines from winnls.h
  * last entry has NULL name, 0 id.
  */ 
@@ -2477,6 +2479,30 @@ UINT WINAPI CompareStringW(DWORD lcid, DWORD fdwStyle,
 }
 
 /******************************************************************************
+ *      RegisterNLSInfoChanged  [OLE2NLS.10]
+ */
+BOOL16 WINAPI RegisterNLSInfoChanged16(LPVOID/*FIXME*/ lpNewNLSInfo)
+{
+	FIXME_(ole)("Fully implemented, but doesn't effect anything.\n");
+
+	if (!lpNewNLSInfo)
+	{
+		lpNLSInfo = NULL;
+		return TRUE;
+	}
+	else
+	{
+		if (!lpNLSInfo)
+		{
+			lpNLSInfo = lpNewNLSInfo;
+			return TRUE;
+		}
+	}
+
+	return FALSE; /* ptr not set */
+} 
+
+/******************************************************************************
  *		OLE_GetFormatA	[Internal]
  *
  * FIXME