From: Rafael Garcia-Suarez <rgs@consttype.org>
Date: Tue, 15 Dec 2009 23:04:34 +0000 (+0100)
Subject: Don't make C<use legacy> die on unknown legacy names
X-Git-Tag: accepted/trunk/20130322.191538~9779
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=6a158b577769363e3a34f3dcb7321a0e933d3353;p=platform%2Fupstream%2Fperl.git

Don't make C<use legacy> die on unknown legacy names

So we can use C<use legacy "qubits"> to avoid the new "qubit" behaviour,
without worrying about perls that didn't have qubit support at all. :)
---

diff --git a/lib/legacy.pm b/lib/legacy.pm
index eaab5d5..1ea7c07 100755
--- a/lib/legacy.pm
+++ b/lib/legacy.pm
@@ -152,9 +152,6 @@ sub import {
             unshift @_, @{$legacy_bundle{$v}};
             next;
         }
-        if (!exists $legacy{$name}) {
-            unknown_legacy($name);
-        }
         $^H |= $unicode8bit::hint_not_uni8bit;   # The only valid thing as of yet
     }
 }