From 63b7658a29809249d7aeb0423bf8c5a693eee0c7 Mon Sep 17 00:00:00 2001
From: Werner Koch <wk@gnupg.org>
Date: Thu, 1 Aug 2013 14:02:50 +0200
Subject: [PATCH] w32: Remove unused code.

* jnlib/w32-reg.c (write_w32_registry_string): Remove.
---
 common/w32-reg.c | 98 ------------------------------------------------
 1 file changed, 98 deletions(-)

diff --git a/common/w32-reg.c b/common/w32-reg.c
index 3ef7a0ae9..428705ce9 100644
--- a/common/w32-reg.c
+++ b/common/w32-reg.c
@@ -223,102 +223,4 @@ read_w32_registry_string (const char *root, const char *dir, const char *name)
 }
 
 
-/* Note: This code is not well tested.  However, it is not used in
-   GnuPG.  */
-#if 0
-int
-write_w32_registry_string (const char *root, const char *dir,
-                           const char *name, const char *value)
-{
-  HKEY root_key, reg_key;
-#ifdef HAVE_W32CE_SYSTEM
-  wchar_t *wdir, *wname, *wvalue;
-  DWORD disp;
-
-  if ( !(root_key = get_root_key(root) ) )
-    return -1;
-
-  wdir = utf8_to_wchar (dir);
-  if (!wdir)
-    return -1;
-
-  if (RegOpenKeyEx (root_key, wdir, 0, 0, &reg_key))
-    {
-      jnlib_free (wdir);
-      return -1;
-    }
-  jnlib_free (wdir);
-
-  if (name)
-    {
-      wname = utf8_to_wchar (name);
-      if (!wname)
-        return -1;
-    }
-  else
-    wname = NULL;
-
-  wvalue = utf8_to_wchar (value);
-  if (wvalue)
-    {
-      jnlib_free (wname);
-      return -1;
-    }
-
-  if (RegSetValueEx (reg_key, wname, 0, REG_SZ,
-                     (BYTE *)wvalue, wcslen (wvalue)) != ERROR_SUCCESS )
-    {
-
-      if (RegCreateKeyEx (root_key, wname, 0, NULL, 0, 0, NULL,
-                          &reg_key, &disp) != ERROR_SUCCESS)
-        {
-          RegCloseKey(reg_key);
-          jnlib_free (wname);
-          jnlib_free (wvalue);
-          return -1;
-        }
-      if (RegSetValueEx (reg_key, wname, 0, REG_SZ,
-                         (BYTE *)wvalue, wcslen (wvalue)) != ERROR_SUCCESS )
-        {
-          RegCloseKey(reg_key);
-          jnlib_free (wname);
-          jnlib_free (wvalue);
-          return -1;
-        }
-    }
-
-  jnlib_free (wname);
-  jnlib_free (wvalue);
-  RegCloseKey (reg_key);
-  return 0;
-#else /*!HAVE_W32CE_SYSTEM*/
-
-  if ( !(root_key = get_root_key(root) ) )
-    return -1;
-
-  if ( RegOpenKeyEx( root_key, dir, 0, KEY_WRITE, &reg_key )
-       != ERROR_SUCCESS )
-    return -1;
-
-  if ( RegSetValueEx (reg_key, name, 0, REG_SZ, (BYTE *)value,
-                      strlen( value ) ) != ERROR_SUCCESS )
-    {
-      if ( RegCreateKey( root_key, name, &reg_key ) != ERROR_SUCCESS )
-        {
-          RegCloseKey(reg_key);
-          return -1;
-        }
-      if ( RegSetValueEx (reg_key, name, 0, REG_SZ, (BYTE *)value,
-                          strlen( value ) ) != ERROR_SUCCESS )
-        {
-          RegCloseKey(reg_key);
-          return -1;
-        }
-    }
-
-  RegCloseKey (reg_key);
-  return 0;
-#endif /*!HAVE_W32CE_SYSTEM*/
-}
-#endif /*0*/
 #endif /*HAVE_W32_SYSTEM*/