Monitor the newly compacted view file
diff --git a/src/couch_mrview_compactor.erl b/src/couch_mrview_compactor.erl
index f8293bd..735b790 100644
--- a/src/couch_mrview_compactor.erl
+++ b/src/couch_mrview_compactor.erl
@@ -174,6 +174,7 @@
     } = NewState,
 
     link(NewState#mrst.fd),
+    Ref = erlang:monitor(process, NewState#mrst.fd),
 
     RootDir = couch_index_util:root_dir(),
     IndexFName = couch_mrview_util:index_file(DbName, Sig),
@@ -184,4 +185,4 @@
     unlink(OldState#mrst.fd),
     erlang:demonitor(OldState#mrst.fd_monitor, [flush]),
     
-    {ok, NewState}.
+    {ok, NewState#mrst{fd_monitor=Ref}}.