diff --git a/Controls.DocumentViewer/DocumentViewer.vb b/Controls.DocumentViewer/DocumentViewer.vb
index 253f1749..3ea3cfa0 100644
--- a/Controls.DocumentViewer/DocumentViewer.vb
+++ b/Controls.DocumentViewer/DocumentViewer.vb
@@ -191,6 +191,7 @@ Public Class DocumentViewer
             Select Case oExtension.ToUpper
                 Case ".MSG"
                     Dim oEmlPath As String = _email.Convert_ToEml(FilePath)
+                    _TempFiles.Add(oEmlPath)
                     DoLoadFile(oEmlPath)
 
                 Case ".EML", ".DOC", ".DOCX", ".ODT", ".RTF", ".TXT"