From c58ca1312cbb9298a22736e6e9c82e2413017c36 Mon Sep 17 00:00:00 2001
From: Jacek Caban <jacek@codeweavers.com>
Date: Thu, 10 Jan 2008 12:53:38 +0100
Subject: [PATCH] mshtml: Handle fClearDirty flag in IPersistStreamInit::Save.

---
 dlls/mshtml/editor.c         | 6 +++---
 dlls/mshtml/mshtml_private.h | 3 ++-
 dlls/mshtml/persist.c        | 7 +++++--
 3 files changed, 10 insertions(+), 6 deletions(-)

diff --git a/dlls/mshtml/editor.c b/dlls/mshtml/editor.c
index aaf4a04edc..00a3ba1fcc 100644
--- a/dlls/mshtml/editor.c
+++ b/dlls/mshtml/editor.c
@@ -99,11 +99,11 @@ WINE_DEFAULT_DEBUG_CHANNEL(mshtml);
 static const WCHAR wszFont[] = {'f','o','n','t',0};
 static const WCHAR wszSize[] = {'s','i','z','e',0};
 
-static void set_dirty(HTMLDocument *This, VARIANT_BOOL dirty)
+void set_dirty(HTMLDocument *This, VARIANT_BOOL dirty)
 {
     nsresult nsres;
 
-    if(!This->nscontainer || !This->nscontainer->editor)
+    if(This->usermode != EDITMODE || !This->nscontainer || !This->nscontainer->editor)
         return;
 
     if(dirty) {
@@ -976,7 +976,7 @@ static HRESULT exec_setdirty(HTMLDocument *This, DWORD cmdexecopt, VARIANT *in,
 {
     TRACE("(%p)->(%08x %p %p)\n", This, cmdexecopt, in, out);
 
-    if(!in || This->usermode != EDITMODE)
+    if(!in)
         return S_OK;
 
     if(V_VT(in) == VT_BOOL)
diff --git a/dlls/mshtml/mshtml_private.h b/dlls/mshtml/mshtml_private.h
index c981348855..e2abfa400d 100644
--- a/dlls/mshtml/mshtml_private.h
+++ b/dlls/mshtml/mshtml_private.h
@@ -490,8 +490,9 @@ void handle_edit_event(HTMLDocument*,nsIDOMEvent*);
 HRESULT editor_exec_copy(HTMLDocument*,DWORD,VARIANT*,VARIANT*);
 HRESULT editor_exec_cut(HTMLDocument*,DWORD,VARIANT*,VARIANT*);
 HRESULT editor_exec_paste(HTMLDocument*,DWORD,VARIANT*,VARIANT*);
-void handle_edit_load(HTMLDocument *This);
+void handle_edit_load(HTMLDocument*);
 HRESULT editor_is_dirty(HTMLDocument*);
+void set_dirty(HTMLDocument*,VARIANT_BOOL);
 
 extern DWORD mshtml_tls;
 
diff --git a/dlls/mshtml/persist.c b/dlls/mshtml/persist.c
index 033ce7e482..38b4cef930 100644
--- a/dlls/mshtml/persist.c
+++ b/dlls/mshtml/persist.c
@@ -705,18 +705,21 @@ static HRESULT WINAPI PersistStreamInit_Save(IPersistStreamInit *iface, LPSTREAM
     DWORD len, written=0;
     HRESULT hres;
 
-    WARN("(%p)->(%p %x) needs more work\n", This, pStm, fClearDirty);
+    TRACE("(%p)->(%p %x)\n", This, pStm, fClearDirty);
 
     hres = get_doc_string(This, &str, &len);
     if(FAILED(hres))
         return hres;
 
-
     hres = IStream_Write(pStm, str, len, &written);
     if(FAILED(hres))
         FIXME("Write failed: %08x\n", hres);
 
     heap_free(str);
+
+    if(fClearDirty)
+        set_dirty(This, VARIANT_FALSE);
+
     return S_OK;
 }
 
-- 
2.32.0.93.g670b81a890