[PATCH v4 6/6] mshtml: Implement document.referrer.

[Gabriel Ivăncescu]

From: Gabriel Ivăncescu

Signed-off-by: Gabriel Ivăncescu 
---
 dlls/mshtml/htmldoc.c | 16 ++++++++++++++--
 1 file changed, 14 insertions(+), 2 deletions(-)

diff --git a/dlls/mshtml/htmldoc.c b/dlls/mshtml/htmldoc.c
index e7722f9c602..54a8fe7980d 100644
--- a/dlls/mshtml/htmldoc.c
+++ b/dlls/mshtml/htmldoc.c
@@ -1040,11 +1040,23 @@ static HRESULT WINAPI HTMLDocument_get_vlinkColor(IHTMLDocument2 *iface, VARIANT
 static HRESULT WINAPI HTMLDocument_get_referrer(IHTMLDocument2 *iface, BSTR *p)
 {
     HTMLDocumentNode *This = impl_from_IHTMLDocument2(iface);
+    const PRUnichar *referrer;
+    nsAString nsstr;
+    nsresult nsres;

-    FIXME("(%p)->(%p)\n", This, p);
+    TRACE("(%p)->(%p)\n", This, p);

*p = NULL;
-    return S_OK;
+
+    nsAString_InitDepend(&nsstr, NULL);
+    nsres = nsIDOMHTMLDocument_GetReferrer(This->nsdoc, &nsstr);
+    if(NS_FAILED(nsres))
+        return map_nsresult(nsres);
+
+    nsAString_GetData(&nsstr, &referrer);
+    *p = SysAllocString(referrer);
+    nsAString_Finish(&nsstr);
+    return *p || !referrer ? S_OK : E_OUTOFMEMORY;
 }

static HRESULT WINAPI HTMLDocument_get_location(IHTMLDocument2 *iface, IHTMLLocation **p)