X-Git-Url: http://wagner.pp.ru/gitweb/?a=blobdiff_plain;f=joinfiles.awk;fp=joinfiles.awk;h=de96d5a240131285b220e38b2750a4743c3ebebb;hb=b2c4b6e803dcbb86cad5d94c7c765c0308f4d07e;hp=0000000000000000000000000000000000000000;hpb=21b6f240b615bfc093b659cb7eb3bff0771966ca;p=fiction%2FKate-the-Empress.git

diff --git a/joinfiles.awk b/joinfiles.awk
new file mode 100644
index 0000000..de96d5a
--- /dev/null
+++ b/joinfiles.awk
@@ -0,0 +1,16 @@
+/\\part/ {gsub("part","section");gsub(".addcontentsline{.*}","");}
+/\\chapter/ {gsub("chapter","subsection");gsub(".addcontentsline{.*}","");}
+$1 == "\\input" {fn=$2; while (getline <fn) {
+							sub("^\\\\stars","\n\n\\subsubsection{* * *}\n\n");
+							gsub("\"=","-");
+							$0=gensub("\\\\'{(.)}","\\1́","g",$0);
+							print;
+						}
+						next;
+				}
+
+
+{
+
+sub("^\\\\stars","\n\n\\subsubsection{* * *}\n\n");
+print;}