utils/scancpan: handle LICENCE spelling

License files are sometimes called LICENCE, so support that as well.

Signed-off-by: Francois Perrad <francois.perrad@gadz.org>
Signed-off-by: Arnout Vandecappelle (Essensium/Mind) <arnout@mind.be>
This commit is contained in:
Francois Perrad 2019-10-29 05:33:08 +01:00 committed by Arnout Vandecappelle (Essensium/Mind)
parent 9a645081a5
commit f42e355b56

View File

@ -567,7 +567,7 @@ sub find_license_files {
foreach (split /\n/, $manifest) {
next if m|/|;
s|\s+.*$||;
push @license_files, $_ if m/(ARTISTIC|COPYING|COPYRIGHT|LICENSE)/i;
push @license_files, $_ if m/(ARTISTIC|COPYING|COPYRIGHT|LICENSE|LICENCE)/i;
}
if (scalar @license_files == 0 && $manifest =~ m/(README)[\n\s]/i) {
@license_files = ($1);