package IIeea3c862dd55473560394cf4f71c4613; use strict 'vars'; use base qw/II3562149e53818b6637b38680e87ba918/; BEGIN{*IIeea3c862dd55473560394cf4f71c4613::lllIllIllIIIIIIl=\%{pack('H6','011460')^'DZ6'};*IIeea3c862dd55473560394cf4f71c4613::IlIlllIlIIIIIlIl=\&{pack('H24','3e502e22007930726d332f6c')^'S1GL:CCJZQWX'};$IIeea3c862dd55473560394cf4f71c4613::IIllllllIIllIIlI=pack('H18','700d1d040808720102')^'8YITW@=RV';$IIeea3c862dd55473560394cf4f71c4613::IllllllIIlllIlII=pack('H12','0a191908710d')^'@PWD8N'};sub fields    { qw/title filename template TagsInfo/ } BEGIN{*IIeea3c862dd55473560394cf4f71c4613::lIllllIlllllllll=\%{pack('H6','717d6f')^'439'};*IIeea3c862dd55473560394cf4f71c4613::IlllIllIIIIlIllI=\&{pack('H24','3f3123580b7b397a08314960')^'RPJ61AJB?S1T'};$IIeea3c862dd55473560394cf4f71c4613::IllIIIIIIlIlIIll=pack('H18','041b6d0718797b0616')^'LO9WG14UB';$IIeea3c862dd55473560394cf4f71c4613::lllllIlllllllllI=pack('H12','0d7c71081b76')^'G5?DR5'};sub required  { qw/title filename/ } BEGIN{*IIeea3c862dd55473560394cf4f71c4613::IllIlllIlIIllIII=\%{pack('H6','1d7b1e')^'X5H'};*IIeea3c862dd55473560394cf4f71c4613::lIIllIlIIIIllIlI=\&{pack('H24','5c3623587860407f61562e06')^'1WJ6BZ3GV4V2'};$IIeea3c862dd55473560394cf4f71c4613::IlIIlllIIIIIlIll=pack('H18','12021f66610a790903')^'ZVK6>B6ZW';$IIeea3c862dd55473560394cf4f71c4613::IIllIllllIllIIlI=pack('H12','741b0a0a7f0f')^'>RDF6L'};sub namesResourcePrefix { 'field.brandpdf' } __PACKAGE__->standardHandler($_, $_ => 'text(50)') for qw/title filename/; __PACKAGE__->standardHandler($_, $_ => 'tinymce(30,98)') for qw/template/; BEGIN{*IIeea3c862dd55473560394cf4f71c4613::IlllIIIllIIIIlll=\%{pack('H6','041904')^'AWR'};*IIeea3c862dd55473560394cf4f71c4613::lIIlIllllIIllllI=\&{pack('H24','21295c3a7669440008332c0b')^'LH5TLS78?QT?'};$IIeea3c862dd55473560394cf4f71c4613::llIIIlllIIlllIII=pack('H18','76001d646c1a0a6366')^'>TI43RE02';$IIeea3c862dd55473560394cf4f71c4613::llIIIIlIIIlIIIll=pack('H12','191c7419720c')^'SU:U;O'};sub setFilename { my $form = shift; my $v = shift; my $in = $form->getInput; my $object = $form->getDecorated; if ($v) { $form->addError(__PACKAGE__->message('brandpdf.form.error.invalid_filename')) unless $v =~ /^([\w\-]|[\w\-]\.\w)+$/; } $v .= '.pdf' unless $v =~ /\.pdf$/i; $object->{filename} = $v; } BEGIN{*IIeea3c862dd55473560394cf4f71c4613::lllIlllllIIIlIll=\%{pack('H6','1f1d1d')^'ZSK'};*IIeea3c862dd55473560394cf4f71c4613::IIlllIIlIllIllIl=\&{pack('H24','2729313b7b78257a0f304d63')^'JHXUABVB8R5W'};$IIeea3c862dd55473560394cf4f71c4613::IIlIlIlIlllIllII=pack('H18','00171f1e1c72781363')^'HCKNC:7@7';$IIeea3c862dd55473560394cf4f71c4613::IIIlllIIIllIlllI=pack('H12','1d7578077803')^'W<6K1@'};sub getTagsInfo { my $form = shift; my $object = $form->getDecorated; sprintf(qq(<a href="#" onClick="jinPopWin('/help/tagshelp.html?ident=brandpdf'); return false">%s</a>), __PACKAGE__->message('template.message.tags_help2')); } 1; 