[SCM] Debian packaging of libsoftware-license-perl branch, master, updated. 33505d2fbb8f7612450811be1a846ecead6168e8

[Dominique Dumont]

The following commit has been merged in the master branch:
commit 08b5d7eb3e8848adaad80c10387c7e5cb75d045d
Author: Dominique Dumont <dod at debian.org>
Date:   Tue Oct 4 14:29:08 2011 +0200

    improved error message

diff --git a/debian/patches/create-license-from-short-name b/debian/patches/create-license-from-short-name
index 8814333..c97fcc5 100644
--- a/debian/patches/create-license-from-short-name
+++ b/debian/patches/create-license-from-short-name
@@ -1,6 +1,6 @@
 --- a/lib/Software/License.pm
 +++ b/lib/Software/License.pm
-@@ -11,13 +11,37 @@
+@@ -11,13 +11,38 @@
  use Sub::Install ();
  use Text::Template ();
  
@@ -25,8 +25,9 @@
 +  if ($class eq __PACKAGE__ ) {
 +    # must create a new license using license short name
 +    Carp::croak "no license short name specified" unless $arg->{short_name};
-+    my $lic = $short_name{delete $arg->{short_name}} ;
-+    Carp::croak "Unknow license short name specified" unless $lic;
++    my $short = delete $arg->{short_name} ;
++    my $lic = $short_name{$short} ;
++    Carp::croak "Unknow license with short name $short" unless $lic;
 +
 +    my $lic_file = my $lic_class = __PACKAGE__.'::'.$lic ;
 +    $lic_file =~ s!::!/!g ;

-- 
Debian packaging of libsoftware-license-perl