comparison src/w32.c @ 100192:038d7d21b786

* w32.c (init_environment): Don't free handle to library shell32.dll.

100191:56005ec017c3

    if (stat ("C:/.emacs", &ignored) < 0)
    {
      HRESULT profile_result;
      /* Dynamically load ShGetFolderPath, as it won't exist on versions
	 of Windows 95 and NT4 that have not been updated to include
	 MSIE 5.  Also we don't link with shell32.dll by default.  */
      HMODULE shell32_dll;
      ShGetFolderPath_fn get_folder_path;
      shell32_dll = GetModuleHandle ("shell32.dll");
      get_folder_path = (ShGetFolderPath_fn)
	GetProcAddress (shell32_dll, "SHGetFolderPathA");

      if (get_folder_path != NULL)
	{
	  profile_result = get_folder_path (NULL, CSIDL_APPDATA, NULL,
					    0, default_home);

	  /* If we can't get the appdata dir, revert to old behavior.  */
	  if (profile_result == S_OK)
	    env_vars[0].def_value = default_home;
	}

      /* Unload shell32.dll, it is not needed anymore.  */
      FreeLibrary (shell32_dll);
    }

  /* Get default locale info and use it for LANG.  */
  if (GetLocaleInfo (LOCALE_USER_DEFAULT,
                     LOCALE_SABBREVLANGNAME | LOCALE_USE_CP_ACP,

100192:038d7d21b786

    if (stat ("C:/.emacs", &ignored) < 0)
    {
      HRESULT profile_result;
      /* Dynamically load ShGetFolderPath, as it won't exist on versions
	 of Windows 95 and NT4 that have not been updated to include
	 MSIE 5.  */
      ShGetFolderPath_fn get_folder_path;
      get_folder_path = (ShGetFolderPath_fn)
	GetProcAddress (GetModuleHandle ("shell32.dll"), "SHGetFolderPathA");

      if (get_folder_path != NULL)
	{
	  profile_result = get_folder_path (NULL, CSIDL_APPDATA, NULL,
					    0, default_home);

	  /* If we can't get the appdata dir, revert to old behavior.  */
	  if (profile_result == S_OK)
	    env_vars[0].def_value = default_home;
	}
    }

  /* Get default locale info and use it for LANG.  */
  if (GetLocaleInfo (LOCALE_USER_DEFAULT,
                     LOCALE_SABBREVLANGNAME | LOCALE_USE_CP_ACP,