pivot table procedure conceptually works
[pspp] / build-aux / svg2png
1 #! /bin/sh
2
3 comment=`cat $2`
4 gimp -i -b "\
5 (let* ((image (car (gimp-file-load 1 \"$1\" \"$1\"))))
6       (gimp-image-attach-parasite image (list \"gimp-comment\" 0 \"$comment\"))
7       (gimp-file-save 1 image (car (gimp-image-get-active-drawable image))
8                       \"$3\" \"$3\"))
9     (gimp-quit 1)"