+static int
+ensure_unicows_dll (void)
+{
+ OSVERSIONINFO os_ver;
+ HMODULE h;
+
+ ZeroMemory (&os_ver, sizeof (OSVERSIONINFO));
+ os_ver.dwOSVersionInfoSize = sizeof (OSVERSIONINFO);
+ if (!GetVersionEx (&os_ver))
+ return 0;
+
+ if (os_ver.dwPlatformId == VER_PLATFORM_WIN32_WINDOWS)
+ {
+ h = LoadLibrary ("Unicows.dll");
+ if (!h)
+ {
+ int button;
+
+ button = MessageBox (NULL,
+ "Emacs cannot load the UNICOWS.DLL library.\n"
+ "This library is essential for using Emacs\n"
+ "on this system. You need to install it.\n\n"
+ "However, you can still use Emacs by invoking\n"
+ "it with the '-nw' command-line option.\n\n"
+ "Emacs will exit when you click OK.",
+ "Emacs cannot load UNICOWS.DLL",
+ MB_ICONERROR | MB_TASKMODAL
+ | MB_SETFOREGROUND | MB_OK);
+ switch (button)
+ {
+ case IDOK:
+ default:
+ return 0;
+ }
+ }
+ FreeLibrary (h);
+ return 1;
+ }
+ return 1;
+}