Alistair Leslie-Hughes : mshtml: Implement IHTMLCurrentStyle_get_borderTopStyle.

Alexandre Julliard julliard at winehq.org
Fri Feb 20 12:49:49 CST 2009


Module: wine
Branch: master
Commit: 88be0330f9ffb186a576174f5944714c1d161c0b
URL:    http://source.winehq.org/git/wine.git/?a=commit;h=88be0330f9ffb186a576174f5944714c1d161c0b

Author: Alistair Leslie-Hughes <leslie_alistair at hotmail.com>
Date:   Fri Feb 20 20:37:48 2009 +1100

mshtml: Implement IHTMLCurrentStyle_get_borderTopStyle.

---

 dlls/mshtml/htmlcurstyle.c |    4 ++--
 dlls/mshtml/tests/dom.c    |    5 +++++
 2 files changed, 7 insertions(+), 2 deletions(-)

diff --git a/dlls/mshtml/htmlcurstyle.c b/dlls/mshtml/htmlcurstyle.c
index 65266b6..f167630 100644
--- a/dlls/mshtml/htmlcurstyle.c
+++ b/dlls/mshtml/htmlcurstyle.c
@@ -251,8 +251,8 @@ static HRESULT WINAPI HTMLCurrentStyle_get_borderBottomColor(IHTMLCurrentStyle *
 static HRESULT WINAPI HTMLCurrentStyle_get_borderTopStyle(IHTMLCurrentStyle *iface, BSTR *p)
 {
     HTMLCurrentStyle *This = HTMLCURSTYLE_THIS(iface);
-    FIXME("(%p)->(%p)\n", This, p);
-    return E_NOTIMPL;
+    TRACE("(%p)->(%p)\n", This, p);
+    return get_nsstyle_attr(This->nsstyle, STYLEID_BORDER_TOP_STYLE, p);
 }
 
 static HRESULT WINAPI HTMLCurrentStyle_get_borderRightStyle(IHTMLCurrentStyle *iface, BSTR *p)
diff --git a/dlls/mshtml/tests/dom.c b/dlls/mshtml/tests/dom.c
index 2d7d8ee..1fb54a3 100644
--- a/dlls/mshtml/tests/dom.c
+++ b/dlls/mshtml/tests/dom.c
@@ -2403,6 +2403,11 @@ static void test_current_style(IHTMLCurrentStyle *current_style)
     ok(hres == S_OK, "get_fontVariant failed: %08x\n", hres);
     ok(!strcmp_wa(str, "normal"), "get_fontVariant returned %s\n", dbgstr_w(str));
     SysFreeString(str);
+
+    hres = IHTMLCurrentStyle_get_borderTopStyle(current_style, &str);
+    ok(hres == S_OK, "get_borderTopStyle failed: %08x\n", hres);
+    ok(!strcmp_wa(str, "none"), "get_borderTopStyle returned %s\n", dbgstr_w(str));
+    SysFreeString(str);
 }
 
 static void test_style2(IHTMLStyle2 *style2)




More information about the wine-cvs mailing list