X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2Fconstant.pm;h=159c29978a596d6eecba75e4cdffda735e5df442;hb=567f8e5b1e23f102b4f20b5ec9c24fe82bf9fd13;hp=93086d539853a3239961cbd71bb340ab75085691;hpb=a747501d968cb2f1de54fa3a460ad46b569d18c8;p=p5sagit%2Fp5-mst-13.2.git diff --git a/lib/constant.pm b/lib/constant.pm index 93086d5..159c299 100644 --- a/lib/constant.pm +++ b/lib/constant.pm @@ -5,7 +5,7 @@ use 5.006_00; use warnings::register; our($VERSION, %declared); -$VERSION = '1.04'; +$VERSION = '1.05'; #======================================================================= @@ -71,11 +71,6 @@ sub import { } elsif ($forced_into_main{$name}) { warnings::warn("Constant name '$name' is " . "forced into package main::"); - } else { - # Catch-all - what did I miss? If you get this error, - # please let me know what your constant's name was. - # Write to . Thanks! - warnings::warn("Constant name '$name' has unknown problems"); } }