From 8ae5f3fd0b57c3eb541749f585475aea78585e9c Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Tue, 17 Apr 2007 22:36:12 +0000
Subject: [PATCH] fix get-smoothing method of style-delta%

svn: r5970
---
 src/mred/wxs/wxs_styl.cxx | 2 +-
 src/mred/wxs/wxs_styl.xc  | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/mred/wxs/wxs_styl.cxx b/src/mred/wxs/wxs_styl.cxx
index 3d8e9a8ce1..7e3ccca333 100644
--- a/src/mred/wxs/wxs_styl.cxx
+++ b/src/mred/wxs/wxs_styl.cxx
@@ -3086,7 +3086,7 @@ static Scheme_Object *os_wxStyleGetSmoothing(int n,  Scheme_Object *p[])
   
   
   READY_TO_RETURN;
-  return WITH_REMEMBERED_STACK(bundle_symset_style(r));
+  return WITH_REMEMBERED_STACK(bundle_symset_smoothing(r));
 }
 
 static Scheme_Object *os_wxStyleGetStyle(int n,  Scheme_Object *p[])
diff --git a/src/mred/wxs/wxs_styl.xc b/src/mred/wxs/wxs_styl.xc
index 34dbd3ab48..b86dbc8105 100644
--- a/src/mred/wxs/wxs_styl.xc
+++ b/src/mred/wxs/wxs_styl.xc
@@ -186,7 +186,7 @@
 @ "get-size" : int GetSize();
 @ "get-weight" : SYM[weight] GetWeight();
 @ "get-style" : SYM[style] GetStyle();
-@ "get-smoothing" : SYM[style] GetSmoothing();
+@ "get-smoothing" : SYM[smoothing] GetSmoothing();
 @ "get-underlined" : bool GetUnderlined();
 @ "get-size-in-pixels" : bool GetSizeInPixels();
 @ "get-font" : wxFont! GetFont();