From: Simon Elliott Date: Fri, 20 May 2011 18:00:06 +0000 (+0100) Subject: die instead X-Git-Tag: release_0.009007_1~10 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FHTML-Zoom.git;a=commitdiff_plain;h=948f7b2a1c6136a730e0ffc1c738c5f57b74a2ba die instead --- diff --git a/lib/HTML/Zoom/FilterBuilder.pm b/lib/HTML/Zoom/FilterBuilder.pm index 79a1506..6040288 100644 --- a/lib/HTML/Zoom/FilterBuilder.pm +++ b/lib/HTML/Zoom/FilterBuilder.pm @@ -46,7 +46,7 @@ sub _parse_attribute_args { # allow ->add_to_attribute(name => 'value') # or ->add_to_attribute({ name => 'name', value => 'value' }) - warn "WARNING: Long form args (name => 'class', value => 'x') will be replaced with an incompatible form in the *very near future*." + die "WARNING: Long form arg (name => 'class', value => 'x') is deprecated" if(@_ == 1 && $_[0]->{'name'} && $_[0]->{'value'}); my ($name, $value) = @_ > 1 ? @_ : @{$_[0]}{qw(name value)}; return ($name, $self->_zconfig->parser->html_escape($value));