From 827ba10035e1cc3e07af058fc0ea433c2766aed8 Mon Sep 17 00:00:00 2001
From: Francois Perrad <fperrad@gmail.com>
Date: Thu, 24 Jul 2014 20:50:01 +0200
Subject: [PATCH] support/script/scancpan: more license name ajustment

Signed-off-by: Francois Perrad <francois.perrad@gadz.org>
Signed-off-by: Thomas Petazzoni <thomas.petazzoni@free-electrons.com>
---
 support/scripts/scancpan | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/support/scripts/scancpan b/support/scripts/scancpan
index de11ef11b3..50d9bab601 100755
--- a/support/scripts/scancpan
+++ b/support/scripts/scancpan
@@ -645,7 +645,10 @@ while (my ($distname, $dist) = each %dist) {
         my $license = ref $dist->{license} eq 'ARRAY'
                     ? join q{ or }, @{$dist->{license}}
                     : $dist->{license};
+        # BR requires license name as in http://spdx.org/licenses/
+        $license =~ s|apache_2_0|Apache-2.0|;
         $license =~ s|artistic_2|Artistic-2.0|;
+        $license =~ s|mit|MIT|;
         $license =~ s|openssl|OpenSSL|;
         $license =~ s|perl_5|Artistic or GPLv1+|;
         my $license_files = join q{ }, @{$license_files{$distname}};