X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FHTML%2FString%2FValue.pm;h=d6bac14cc9fdde7bc7a371c27eb2c42e6951de23;hb=4f4204a3cb10eac31bb4387275f10753d25bf07e;hp=e1f6c9577aee3ef685b2b9c7778a613473c9ad03;hpb=e8420dab517c57d30d9a3fa22de9966dc1c99c1b;p=scpubgit%2FHTML-String.git diff --git a/lib/HTML/String/Value.pm b/lib/HTML/String/Value.pm index e1f6c95..d6bac14 100644 --- a/lib/HTML/String/Value.pm +++ b/lib/HTML/String/Value.pm @@ -119,7 +119,7 @@ sub can { return ( do { local $@; - eval { blessed($self) and $self->_hsv_unescaped_string->isa(@_) } + eval { blessed($self) and $self->_hsv_unescaped_string->can(@_) } } or $self->SUPER::can(@_) );