From b1233fb40c7507e7a45418ce7308427d2e1a7122 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Fri, 29 Jun 2007 22:51:07 +0000
Subject: [PATCH] fix bug in get-text-extent on zero-length string when neither
 descent or vertical space is requested

svn: r6776
---
 src/wxwindow/src/msw/wx_dc.cxx | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/wxwindow/src/msw/wx_dc.cxx b/src/wxwindow/src/msw/wx_dc.cxx
index 00a5dc37e4..80b46aa511 100644
--- a/src/wxwindow/src/msw/wx_dc.cxx
+++ b/src/wxwindow/src/msw/wx_dc.cxx
@@ -2214,14 +2214,14 @@ void wxDC::GetTextExtent(const char *string, double *x, double *y,
     once = 0;
   }
 
-  if (descent || topSpace)
+  if (descent || topSpace || (!len && !ty))
     GetTextMetrics(dc, &tm);
 
   DoneDC(dc);
 
   *x = (double)tx;
   if (!len && !ty) {
-    *y = (double)tm.tmHeight;;
+    *y = (double)tm.tmHeight;
   } else {
     *y = (double)ty;
   }