From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Fri, 27 Apr 2001 12:40:55 +0000 (+0000)
Subject: break is not yet Perl.  Added the template license also to README.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=ff1a6a489418b33efc0878268a74dd4607101955;p=p5sagit%2Fp5-mst-13.2.git

break is not yet Perl.  Added the template license also to README.

p4raw-id: //depot/perl@9879
---

diff --git a/utils/h2xs.PL b/utils/h2xs.PL
index e27a9d6..1e78ec5 100644
--- a/utils/h2xs.PL
+++ b/utils/h2xs.PL
@@ -1248,7 +1248,7 @@ END
       foreach my $letter (keys %leading) {
 	  if ($letter eq '') {
 	      $null = 1;
-	      break;
+	      last;
 	  }
       }
 
@@ -1834,7 +1834,10 @@ COPYRIGHT AND LICENCE
 
 Put the correct copyright and licence information here.
 
-Copyright (C) $thisyear $author blah blah blah
+Copyright (C) $thisyear $author
+
+This library is free software; you can redistribute it and/or modify
+it under the same terms as Perl itself. 
 
 _RMEND_
 close(RM) || die "Can't close $ext$modpname/README: $!\n";