Flush all accamulated characters at the end of loop

To apply any substitutions in them. Closes #496
godunko · May 13, 2018 · 41e794f · 41e794f
1 parent 3892a70
commit 41e794f
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 4 deletions.
diff --git a/matreshka/source/xml/templates/xml-templates-processors.adb b/matreshka/source/xml/templates/xml-templates-processors.adb
@@ -282,6 +282,7 @@ package body XML.Templates.Processors is
 
                      Self.Parameters.Include (Name, Holder);
                      Process_Stream (Self, Self, Stream, Success);
+                     Self.Process_Characters (Success);
 
                      if not Success then
                         return;

diff --git a/matreshka/testsuite/xml/TN-454/test_454.adb b/matreshka/testsuite/xml/TN-454/test_454.adb
@@ -8,7 +8,7 @@
 --                                                                          --
 ------------------------------------------------------------------------------
 --                                                                          --
--- Copyright © 2016, Vadim Godunko <[email protected]>                     --
+-- Copyright © 2016-2018, Vadim Godunko <[email protected]>                --
 -- All rights reserved.                                                     --
 --                                                                          --
 -- Redistribution and use in source and binary forms, with or without       --
@@ -86,10 +86,10 @@ procedure Test_454 is
            & "<html xmlns='http://www.w3.org/1999/xhtml'>"
            & " <body>"
            & "     post 1"
-           & "       post 2 -> subitem 1-2"
-           & "       post 2 -> subitem 1-2"
+           & "       post 1 -> subitem 1-1"
+           & "       post 1 -> subitem 1-2"
            & "        post 2"
-           & "       post 2 -> subitem 2-2"
+           & "       post 2 -> subitem 2-1"
            & "       post 2 -> subitem 2-2"
            & "      </body></html>");