View | Details | Raw Unified | Return to bug 5611
Collapse All | Expand All

(-)a/C4/Scrubber.pm (-13 / +12 lines)
Lines 30-48 BEGIN { Link Here
30
	# @ISA = qw(HTML::Scrubber);
30
	# @ISA = qw(HTML::Scrubber);
31
}
31
}
32
32
33
INIT {
33
34
	%scrubbertypes = (
34
my %scrubbertypes = (
35
		default => {},	# place holder, default settings are below as fallbacks in call to constructor
35
	default => {},	# place holder, default settings are below as fallbacks in call to constructor
36
		    tag => {},	# uses defaults
36
	    tag => {},	# uses defaults
37
		comment => {
37
	comment => {
38
			allow   => [qw( br b i em big small strong )],
38
	allow   => [qw( br b i em big small strong )],
39
		},
39
	},
40
		staff   => {
40
	staff   => {
41
			default => [ 1 =>{'*'=>1} ],
41
	default => [ 1 =>{'*'=>1} ],
42
			comment => 1,
42
	comment => 1,
43
		},
43
	},
44
	);
44
);
45
}
46
45
47
46
48
sub new {
47
sub new {

Return to bug 5611