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:
parent
9a645081a5
commit
f42e355b56
@ -567,7 +567,7 @@ sub find_license_files {
|
|||||||
foreach (split /\n/, $manifest) {
|
foreach (split /\n/, $manifest) {
|
||||||
next if m|/|;
|
next if m|/|;
|
||||||
s|\s+.*$||;
|
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) {
|
if (scalar @license_files == 0 && $manifest =~ m/(README)[\n\s]/i) {
|
||||||
@license_files = ($1);
|
@license_files = ($1);
|
||||||
|
Loading…
Reference in New Issue
Block a user