From 01ed23965ec3561744abe64fd0ada6b89696eb53 Mon Sep 17 00:00:00 2001
From: Pavel Denisov <pavel.a.denisov@gmail.com>
Date: Fri, 27 Feb 2015 23:15:38 -0400
Subject: [scripts/gen_ebuild.pl] add special handling for perl_5 license

---
 scripts/gen_ebuild.pl | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'scripts/gen_ebuild.pl')

diff --git a/scripts/gen_ebuild.pl b/scripts/gen_ebuild.pl
index a54a665fd..e5065e6ce 100755
--- a/scripts/gen_ebuild.pl
+++ b/scripts/gen_ebuild.pl
@@ -197,7 +197,9 @@ if ( scalar @$lics == 1 ) {
   $fh->say( 'LICENSE=" ' . $lics->[0] . '"' );
 }
 elsif ( scalar @$lics > 1 ) {
-  $fh->say( 'LICENSE=" || ( ' . ( join q{ }, @$lics ) . ' )"' );
+  if ( not ( $lics->[0] eq 'Artistic' && $lics->[1] eq 'GPL-2' ) ) {
+    $fh->say( 'LICENSE=" || ( ' . ( join q{ }, @$lics ) . ' )"' );
+  }
 }
 else {
   $fh->say('LICENSE=""');
-- 
cgit v1.2.3-65-gdbad