diff options
Diffstat (limited to 'helpers')
| -rw-r--r-- | helpers/ChangeLog | 5 | ||||
| -rw-r--r-- | helpers/changed-files.awk | 19 |
2 files changed, 24 insertions, 0 deletions
diff --git a/helpers/ChangeLog b/helpers/ChangeLog index aaf1e489..9802b287 100644 --- a/helpers/ChangeLog +++ b/helpers/ChangeLog @@ -1,3 +1,8 @@ +2016-06-08 Arnold D. Robbins <arnold@skeeve.com> + + * changed-files.awk: New program. Helps find files that need + copyright updates by scanning ChangeLog files. + 2016-03-07 Arnold D. Robbins <arnold@skeeve.com> * fixdump.awk (translate): Remove extraneous spaces in diff --git a/helpers/changed-files.awk b/helpers/changed-files.awk new file mode 100644 index 00000000..937ecd51 --- /dev/null +++ b/helpers/changed-files.awk @@ -0,0 +1,19 @@ +#! /usr/bin/gawk -f + +/^2014-/ { nextfile } + +/^\t\*/ { + sub(/^\t\*[[:space:]]*/, "") + sub(/[:\[(].*/, "") + gsub(/,/, "") + for (i = 1; i <= NF; i++) { + fname = $i + if (! (fname in names)) + names[fname]++ + } +} + +END { + for (i in names) + print i +} |