.meta/find-extras: finde Transpositionen

1 files changed, 15 insertions, 11 deletions

diff --git a/.meta/find-extras b/.meta/find-extras
index 3b8033c..d1b16b3 100755
--- a/.meta/find-extras
+++ b/.meta/find-extras
@@ -1,17 +1,21 @@
 #!/bin/bash
 
-find . -name '*.ly' -exec sed '
-  s/^.*\bifdef(`\([^'"'"']\+\)'"'"',.*$/\1/
-  t
-  d
-' '{}' + \
+{
+  find . -name '*.ly' -exec sed '
+    s/^.*\bifdef(`\([^'"'"']\+\)'"'"',.*$/\1/
+    t
+    d
+  ' '{}' + \
+  | sort -u \
+  | sed '
+    s/^STR_//
+    t
+    /^mit-/ p
+    d
+  '
+  find . -name '*.ly' -exec grep -qwF 'transponiert' {} + -printf 'transponiert-c\n'
+} \
 | sort -u \
-| sed '
-  s/^STR_//
-  t
-  /^mit-/ p
-  d
-' \
 | tr '\n' '-' \
 | sed '
   s@-$@@