Michał Ziętek : wscript: Implemented Host_get_Application.

[Alexandre Julliard]

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

Author: Michał Ziętek <smierc.w.wenecji at gmail.com>
Date:   Tue Aug 23 15:16:19 2011 +0200

wscript: Implemented Host_get_Application.

---

 programs/wscript/host.c       |    6 ++++--
 programs/wscript/tests/run.js |    1 +
 2 files changed, 5 insertions(+), 2 deletions(-)

diff --git a/programs/wscript/host.c b/programs/wscript/host.c
index 82209ea..b7b94a2 100644
--- a/programs/wscript/host.c
+++ b/programs/wscript/host.c
@@ -110,8 +110,10 @@ static HRESULT WINAPI Host_get_Name(IHost *iface, BSTR *out_Name)
 
 static HRESULT WINAPI Host_get_Application(IHost *iface, IDispatch **out_Dispatch)
 {
-    WINE_FIXME("(%p)\n", out_Dispatch);
-    return E_NOTIMPL;
+    WINE_TRACE("(%p)\n", out_Dispatch);
+
+    *out_Dispatch = (IDispatch*)&host_obj;
+    return S_OK;
 }
 
 static HRESULT WINAPI Host_get_FullName(IHost *iface, BSTR *out_Path)
diff --git a/programs/wscript/tests/run.js b/programs/wscript/tests/run.js
index d487166..8c75d0a 100644
--- a/programs/wscript/tests/run.js
+++ b/programs/wscript/tests/run.js
@@ -47,5 +47,6 @@ WScript.Interactive = false;
 ok(WScript.Interactive === false, "WScript.Interactive = " + WScript.Interactive);
 WScript.Interactive = true;
 ok(WScript.Interactive === true, "WScript.Interactive = " + WScript.Interactive);
+ok(WScript.Application === WScript, "WScript.Application = " + WScript.Application);
 
 winetest.reportSuccess();