diff --git a/doc/Changelog b/doc/Changelog
index 45f46a90e..f836dc35b 100644
--- a/doc/Changelog
+++ b/doc/Changelog
@@ -14,6 +14,7 @@
 	  so that if a zone is bad on one server but not another, it is 
 	  likely to pick up the 'correct' one after a couple minutes,
 	  and if the TTL is big enough that solves validation for the zone.
+	- fixup unbound-control compilation on windows.
 
 17 October 2008: Wouter
 	- port Leopard/G5: fixup type conversion size_t/uint32.
diff --git a/smallapp/unbound-control.c b/smallapp/unbound-control.c
index 9d39334cd..232956869 100644
--- a/smallapp/unbound-control.c
+++ b/smallapp/unbound-control.c
@@ -302,6 +302,10 @@ int main(int argc, char* argv[])
 	int c, ret;
 	char* cfgfile = CONFIGFILE;
 	char* svr = NULL;
+#ifdef USE_WINSOCK
+	int r;
+	WSADATA wsa_data;
+#endif
 #ifdef USE_THREAD_DEBUG
 	/* stop the file output from unbound-control, overwites the servers */
 	extern int check_locking_order;