From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Mon, 2 May 2022 08:52:56 +0000 (+0100)
Subject: dice: d6: image: Put comment at the end
X-Git-Tag: otter-1.1.0~216
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=commitdiff_plain;h=52e9f43db8d2ba4e5b6a1aa70d10ab773353821d;p=otter.git

dice: d6: image: Put comment at the end

usvg seems to hate it at the start.

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---

diff --git a/dice/extract-image-only b/dice/extract-image-only
index 5a9ddb9d..9a181eb5 100755
--- a/dice/extract-image-only
+++ b/dice/extract-image-only
@@ -10,8 +10,6 @@ use Data::Dumper;
 
 my $dom = XML::LibXML->load_xml(IO => \*STDIN) or die;
 
-print "<!--made by dice/extract-image-only-->\n" or die $!;
-
 my $nodes = $dom->findnodes('//*[@inkscape:label]');
 foreach my $node (@$nodes) {
   my $l = $node->getAttribute('inkscape:label');
@@ -21,3 +19,5 @@ foreach my $node (@$nodes) {
 }
 
 print $dom->toString or die $!;
+
+print "<!-- made by dice/extract-image-only -->\n" or die $!;