[scpubgit/HTML-String.git] / lib / HTML / String / Overload.pm

package HTML::String::Overload;

use strictures 1;
use HTML::String;
use B::Hooks::EndOfScope;
use overload '';

sub import {
  overload::constant q => \&html;
  on_scope_end {
    overload::remove_constant('q');
  }
}

1;
Commit	Line	Data
e1b4b35c	1	package HTML::String::Overload;
	2
	3	use strictures 1;
	4	use HTML::String;
	5	use B::Hooks::EndOfScope;
	6	use overload '';
	7
	8	sub import {
	9	overload::constant q => \&html;
	10	on_scope_end {
	11	overload::remove_constant('q');
	12	}
	13	}
	14
	15	1;