Add comment blocks to templates.

Comments are {# some comment} syntax for documentation purposes.

1 files changed, 5 insertions, 0 deletions

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 {