.meta/find-extras


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

#!/bin/bash

find . -name '*.ly' -exec sed '
  s/^.*\bifdef(`\([^'"'"']\+\)'"'"',.*$/\1/
  t
  d
' '{}' + \
| sort -u \
| sed '
  s/^STR_//
  t
  /^mit-/ p
  d
' \
| tr '\n' '-' \
| sed '
  s@-$@@
  s@^@-@
'