| Subject: | [PATCH] bleadperl change #25547 ported to L::M 1.10 |
Below is the current diff betwee the 1.10 release and the up to date bleadperl.
--- Locale-Maketext-1.10/lib/Locale/Maketext.pm Thu Nov 10 21:25:52 2005
+++ /home/steve/p4-bleadperl/perl/lib/Locale/Maketext.pm Sat Nov 12 15:08:08 2005
@@ -14,7 +14,7 @@
BEGIN { unless(defined &DEBUG) { *DEBUG = sub () {0} } }
# define the constant 'DEBUG' at compile-time
-$VERSION = "1.10";
+$VERSION = "1.10_01";
@ISA = ();
$MATCH_SUPERS = 1;
@@ -174,6 +174,9 @@
Carp::croak "maketext requires at least one parameter" unless @_ > 1;
my($handle, $phrase) = splice(@_,0,2);
+
+ # Don't interefere with $@ in case that's being interpolated into the msg.
+ local $@;
# Look up the value: