aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--xml/signout.expected.xml2
-rwxr-xr-xxmpt5
2 files changed, 6 insertions, 1 deletions
diff --git a/xml/signout.expected.xml b/xml/signout.expected.xml
index 4ae4038..1516eee 100644
--- a/xml/signout.expected.xml
+++ b/xml/signout.expected.xml
@@ -1 +1 @@
-</{stream}>
+</{stream}>{# Need a match as the final step or nothing gets read.}
diff --git a/xmpt b/xmpt
index 8fed801..a43c037 100755
--- a/xmpt
+++ b/xmpt
@@ -43,6 +43,7 @@ if (@ARGV) {
}
binmode($inh, ':utf8');
binmode($outh, ':utf8');
+
eval_in($inh, $outh, \%conf, @plans);
waitpid($pid, 0) if $pid;
@@ -106,6 +107,10 @@ sub parse_template {
if ($intext) {
if ($tok =~ /{/) {
+ if ($line =~ /^#/) {
+ do { my $tok = shift @parts } until $tok = '}';
+ next;
+ }
$thunkstart = $line;
$intext = 0;
} else {