/* Modified by the GLib Team and others 1997-2000. See the AUTHORS file for a list of people on the GLib Team. See the ChangeLog files for a list of changes. These files are distributed with GLib at  */
static void set_error(const gchar *format,...)
/* Modified by the GLib Team and others 1997-2000. See the AUTHORS file for a list of people on the GLib Team. See the ChangeLog files for a list of changes. These files are distributed with GLib at  */
static void set_error(const gchar *format,...)
{
  gchar *error;
  gchar *detail;
  gchar *message;
  va_list args;
  error = g_win32_error_message (GetLastError ());
  va_start (args, format);
  detail = g_strdup_vprintf (format, args);
  va_end (args);
  message = g_strconcat (detail, error, NULL);
  g_module_set_error (message);
  g_free (message);
  g_free (detail);
  g_free (error);
}