merge
Simon Elliott [Thu, 28 Feb 2013 12:26:25 +0000 (12:26 +0000)]
1  2 
lib/HTML/Zoom.pm
lib/HTML/Zoom/FilterBuilder.pm

Simple merge
@@@ -42,12 -44,10 +42,12 @@@ sub set_attribute 
  sub _parse_attribute_args {
    my $self = shift;
  
-   warn "WARNING: Long form arg (name => 'class', value => 'x') is deprecated. This may not do what you originally intended..."
+   die "Long form arg (name => 'class', value => 'x') is no longer supported"
      if(@_ == 1 && $_[0]->{'name'} && $_[0]->{'value'});
 -  my ($name, $value) = @_ > 1 ? @_ : @{$_[0]}{qw(name value)};
 -  return ($name, $self->_zconfig->parser->html_escape($value));
 +    
 +  my $opts = ref($_[0]) eq 'HASH' ? $_[0] : {$_[0] => $_[1]};
 +  for (values %{$opts}) { $self->_zconfig->parser->html_escape($_); }
 +  return $opts;
  }
  
  sub add_attribute {