From 27d338dec0428bc22e2838eb8641c6e0d1681e22 Mon Sep 17 00:00:00 2001
From: Jonas Smedegaard <dr@jones.dk>
Date: Fri, 10 May 2013 20:46:04 +0200
Subject: Include mk* scripts

---
 mkslice-default | 25 +++++++++++++++++++++++++
 1 file changed, 25 insertions(+)
 create mode 100755 mkslice-default

(limited to 'mkslice-default')

diff --git a/mkslice-default b/mkslice-default
new file mode 100755
index 0000000..ee4d980
--- /dev/null
+++ b/mkslice-default
@@ -0,0 +1,25 @@
+#!/bin/sh
+
+# create slices of text
+
+set -e
+
+# resolve options
+eval set -- "$(getopt -s sh -o f -- "$@")"
+while true; do case "$1" in -f) force=1; shift;; --) shift; break;; esac; done
+
+. /lib/lsb/init-functions
+
+# actual slicing: first argument is variant, others are csplice patterns
+doit() {
+	variant=$1; shift
+	csplit -s -f $stem -b "-$variant-%03d.mdwn" $stem.mdwn "$@"
+}
+
+log_action_begin_msg "Create slices"
+for stem in "$@"; do
+	log_action_cont_msg $stem
+	doit rec \
+		'/^# \(Title\|Article\)/' '{*}'
+done
+log_action_end_msg $?
-- 
cgit v1.2.3