From 13621463f4339ac4eb7683664fbb4e4513beadfa Mon Sep 17 00:00:00 2001
From: Patryk Niedźwiedziński <pniedzwiedzinski19@gmail.com>
Date: Mon, 21 Jun 2021 14:58:06 +0200
Subject: Akordy

---
 .gitignore     |   8 +++++++-
 akordy.do      |   1 +
 akordy1.xcf    | Bin 0 -> 1780130 bytes
 akordy2.xcf    | Bin 0 -> 1854158 bytes
 bin/xcf-to-pdf |  23 +++++++++++++++++++++++
 print.do       |   5 +++--
 6 files changed, 34 insertions(+), 3 deletions(-)
 create mode 100644 akordy.do
 create mode 100644 akordy1.xcf
 create mode 100644 akordy2.xcf
 create mode 100755 bin/xcf-to-pdf

diff --git a/.gitignore b/.gitignore
index 9d78a49..07406d3 100644
--- a/.gitignore
+++ b/.gitignore
@@ -1,5 +1,11 @@
 .redo
-spiewnik-book.pdf
+
+akordy1.pdf
+akordy2.pdf
+
+spiewnik-all.pdf
+spiewnik-all-book.pdf
+
 spiewnik.pdf
 spiewnik.ps
 spiewnik.idx
diff --git a/akordy.do b/akordy.do
new file mode 100644
index 0000000..98e45ca
--- /dev/null
+++ b/akordy.do
@@ -0,0 +1 @@
+./bin/xcf-to-pdf akordy1.xcf akordy2.xcf 1> /dev/stderr
diff --git a/akordy1.xcf b/akordy1.xcf
new file mode 100644
index 0000000..8bdcf12
Binary files /dev/null and b/akordy1.xcf differ
diff --git a/akordy2.xcf b/akordy2.xcf
new file mode 100644
index 0000000..2632ca3
Binary files /dev/null and b/akordy2.xcf differ
diff --git a/bin/xcf-to-pdf b/bin/xcf-to-pdf
new file mode 100755
index 0000000..34da9c8
--- /dev/null
+++ b/bin/xcf-to-pdf
@@ -0,0 +1,23 @@
+#!/bin/sh
+{
+cat <<EOF
+(define (convert-xcf-to-pdf filename outfile)
+  (let* (
+     (image (car (gimp-file-load RUN-NONINTERACTIVE filename filename)))
+     (drawable (car (gimp-image-merge-visible-layers image CLIP-TO-IMAGE)))
+     )
+    (file-pdf-save RUN-NONINTERACTIVE image drawable outfile outfile TRUE TRUE TRUE)
+    (gimp-image-delete image) ; ... or the memory will explode
+    )
+)
+
+(gimp-message-set-handler 1) ; Messages to standard output
+EOF
+
+for i in $*; do
+  echo "(gimp-message \"$i\")"
+  echo "(convert-xcf-to-pdf \"$i\" \"${i%%.xcf}.pdf\")"
+done
+
+echo "(gimp-quit 0)"
+} | gimp -i -b -
diff --git a/print.do b/print.do
index 92b1c97..d662d1c 100644
--- a/print.do
+++ b/print.do
@@ -1,2 +1,3 @@
-redo-ifchange spiewnik.pdf
-pdfbook2 --paper=a4paper -s --inner-margin=100 spiewnik.pdf 1> /dev/null
+redo-ifchange spiewnik.pdf akordy
+pdfunite spiewnik.pdf akordy1.pdf akordy2.pdf spiewnik-all.pdf
+pdfbook2 --paper=a4paper -s --inner-margin=100 spiewnik-all.pdf 1> /dev/null
-- 
cgit 1.4.1