Fix active text editor re revised active text docs

Modified code that converts from plain text to active text when user
switched from editing plain text to editing active text. The active text
document that is created from plain text is now wrapped in ekDocument
elements.

Author: delphidabbler

Src/FmSnippetsEditorDlg.FrActiveTextEditor.pas

@@ -222,6 +222,7 @@ function TSnippetsActiveTextEdFrame.PlainTextToActiveText(Text: string):
   if Text = '' then
     Exit;
   Paragraphs := TIStringList.Create(Text, EOL2, False, True);
+  Result.AddElem(TActiveTextFactory.CreateActionElem(ekDocument, fsOpen));
   for Paragraph in Paragraphs do
   begin
     Result.AddElem(TActiveTextFactory.CreateActionElem(ekPara, fsOpen));
@@ -230,6 +231,7 @@ function TSnippetsActiveTextEdFrame.PlainTextToActiveText(Text: string):
     );
     Result.AddElem(TActiveTextFactory.CreateActionElem(ekPara, fsClose));
   end;
+  Result.AddElem(TActiveTextFactory.CreateActionElem(ekDocument, fsClose));
 end;
 
 procedure TSnippetsActiveTextEdFrame.Preview;