X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=src%2Fmake-final;h=11201b06bc69c63b7c4ba29b73b6f116ffd7a0fd;hb=33557de6dace27a5b6afc2156caf5da7e4e88be9;hp=851dc21dc0440e5d66d413cf6a4301e900a8989d;hpb=fcd1b19126a5a5f7312c0d789c832742623fa5bd;p=deb_pkgs%2Fscowl.git

diff --git a/src/make-final b/src/make-final
index 851dc21..11201b0 100755
--- a/src/make-final
+++ b/src/make-final
@@ -3,12 +3,26 @@
 n=$1
 nn=`src/get-level prev $1`
 
+cap() {
+  dsr=$1
+  shift
+  if [ -d debug ]; then
+    cat | sort -u > debug/$n.$dsr.in
+    cat debug/$n.$dsr.in | "$@" | sort -u > debug/$n.$dsr.out
+    comm -23 debug/$n.$dsr.out debug/$n.$dsr.in > debug/$n.+.$dsr
+    cat debug/$n.$dsr.out
+    rm debug/$n.$dsr.out debug/$n.$dsr.in
+  else
+    "$@"
+  fi
+}
+
 for b in `src/list-combin`
 do
   i=0
   rm -f final/$b$n
   comm -13 working/$b$nn.pre working/$b$n.pre \
-    | src/add-accents \
+    | cap accents src/add-accents \
     | sort | uniq \
     > final/$b$n
   if [ ! -s final/$b$n ]
@@ -16,6 +30,3 @@ do
     rm final/$b$n
   fi
 done
-
-
-