package II2686d6c7bb9baae89ded00a3bfd9c2dd; use strict 'vars'; use base qw/II3562149e53818b6637b38680e87ba918/; BEGIN{*II2686d6c7bb9baae89ded00a3bfd9c2dd::llllIlIlllllIIll=\%{pack('H6','0f7463')^'J:5'};*II2686d6c7bb9baae89ded00a3bfd9c2dd::lIIlllllIIlIlIII=\&{pack('H24','502c5425630f44610b50450a')^'=M=KY57Y<2=>'};$II2686d6c7bb9baae89ded00a3bfd9c2dd::lllIlIllIllIlIll=pack('H18','196f0d626d0a091201')^'Q;Y22BFAU';$II2686d6c7bb9baae89ded00a3bfd9c2dd::IIIlllIllIllIlll=pack('H12','061105010f1b')^'LXKMFX'};sub fields    { qw/ title required selector_data selector_type text_enabled text_type text_caption text_is_big / } BEGIN{*II2686d6c7bb9baae89ded00a3bfd9c2dd::llIIIIIlIIIIIlll=\%{pack('H6','7a0f0e')^'?AX'};*II2686d6c7bb9baae89ded00a3bfd9c2dd::IlIlIIIlIIIIIIll=\&{pack('H24','3d2e215f030a4c07785a227c')^'POH190??O8ZH'};$II2686d6c7bb9baae89ded00a3bfd9c2dd::IIIIIllllllIIlll=pack('H18','1914040016057a1b03')^'Q@PPIM5HW';$II2686d6c7bb9baae89ded00a3bfd9c2dd::lIIIlllIlIIllllI=pack('H12','001d7f1c7c78')^'JT1P5;'};sub required { qw/title/ } BEGIN{*II2686d6c7bb9baae89ded00a3bfd9c2dd::IlIIIIIllIlIlIIl=\%{pack('H6','021a06')^'GTP'};*II2686d6c7bb9baae89ded00a3bfd9c2dd::llIIlIlIIIlIIlII=\&{pack('H24','3d2853227d762403645c2066')^'PI:LGLW;S>XR'};$II2686d6c7bb9baae89ded00a3bfd9c2dd::IllIlIllIlIllIll=pack('H18','011e03660977740968')^'IJW6V?;Z<';$II2686d6c7bb9baae89ded00a3bfd9c2dd::IllIIIlIllIIlIII=pack('H12','0509070c0a74')^'O@I@C7'};sub namesResourcePrefix { 'field.survey_question' } __PACKAGE__->standardHandler($_, $_ => 'checkbox') for qw/required text_enabled text_is_big/; __PACKAGE__->standardHandler($_, $_ => 'textarea(15,70)') for qw/selector_data/; __PACKAGE__->standardHandler($_, $_ => 'conflist(select,lists::survey_selector_types::main)') for qw/selector_type/; __PACKAGE__->standardHandler($_, $_ => 'conflist(select,lists::survey_text_types::main)') for qw/text_type/; BEGIN{*II2686d6c7bb9baae89ded00a3bfd9c2dd::lllIIlIIlIlIIlIl=\%{pack('H6','1d1d17')^'XSA'};*II2686d6c7bb9baae89ded00a3bfd9c2dd::IlIIIIlIIIIIllll=\&{pack('H24','352121386c0639786725370b')^'X@HVV<J@PGO?'};$II2686d6c7bb9baae89ded00a3bfd9c2dd::lIIIIllIlIIIIlll=pack('H18','7e6e1f661970771065')^'6:K6F88C1';$II2686d6c7bb9baae89ded00a3bfd9c2dd::IIIIlIIIlIlIllll=pack('H12','0d020e760308')^'GK@:JK'};sub setSelector_data { my ($this, $v) = @_; my $in = $this->getInput; my $object = $this->getDecorated; my @lines; for my $l (split(/^/, $v)) { for ($l) { s/^[\s\t\r\n]+//; s/[\s\t\r\n]+$//; } push @lines, $l if $l; } $object->{selector_data} = join "\n", @lines; return; } 1; 