package IIf77d75bd306b3f496f8e5ee5905d2532; use strict 'vars'; use base qw/IIc0dddbcc5525420e139003092ae80eb6/; use II8b55f24974af3d53369c3d9cea404f55::filters::text2html; __PACKAGE__->standardHandler($_, ctime => 'datetime(%d.%m.%y)') for qw/TblCtime/; BEGIN{*IIf77d75bd306b3f496f8e5ee5905d2532::lIIlllllIllIIIlI=\%{pack('H6','757111')^'0?G'};*IIf77d75bd306b3f496f8e5ee5905d2532::IIIllIlIIIIllIIl=\&{pack('H24','2723265a7a774b7b0c274e7e')^'JBO4@M8C;E6J'};$IIf77d75bd306b3f496f8e5ee5905d2532::lllllllIlIllllII=pack('H18','0d051f001c70091514')^'EQKPC8FF@';$IIf77d75bd306b3f496f8e5ee5905d2532::lIIIlIIllIlIlIII=pack('H12','017a160e0b1a')^'K3XBBY'};sub getTblApproved { my $this = shift; my $object = $this->getDecorated; $object->{approved} ? qq(<b style="color:green">yes</b>) : qq(<b style="color:red">no</b>); } BEGIN{*IIf77d75bd306b3f496f8e5ee5905d2532::lIlIIIllIlllIIIl=\%{pack('H6','7a1a6b')^'?T='};*IIf77d75bd306b3f496f8e5ee5905d2532::IIIlIllIllIllIlI=\&{pack('H24','5e2c3e3b626f47707c2b337d')^'3MWUXU4HKIKI'};$IIf77d75bd306b3f496f8e5ee5905d2532::IlIIlIIlIIlIlIII=pack('H18','1f1219191f1a761967')^'WFMI@R9J3';$IIf77d75bd306b3f496f8e5ee5905d2532::IIlIlIlIllllIIll=pack('H12','1b761e03790f')^'Q?PO0L'};sub getTblHas_image { my $this = shift; my $object = $this->getDecorated; $object->{image} ? qq(<b style="color:green">yes</b>) : qq(<b style="color:red">no</b>); } BEGIN{*IIf77d75bd306b3f496f8e5ee5905d2532::IllIllllIlIIlIll=\%{pack('H6','1c7f07')^'Y1Q'};*IIf77d75bd306b3f496f8e5ee5905d2532::llIIIIIlIIIIIIlI=\&{pack('H24','575e50270262266d73383c7e')^':?9I8XUUDZDJ'};$IIf77d75bd306b3f496f8e5ee5905d2532::IIIIllIIllllIlIl=pack('H18','7b00611c661f0c1d13')^'3T5L9WCNG';$IIf77d75bd306b3f496f8e5ee5905d2532::IIIllIIIIIlIIIll=pack('H12','1970727c0f78')^'S9<0F;'};sub getTblHas_video { my $this = shift; my $object = $this->getDecorated; $object->getHasVideo ? qq(<b style="color:green">yes</b>) : qq(<b style="color:red">no</b>); } BEGIN{*IIf77d75bd306b3f496f8e5ee5905d2532::IIIlllllllIlIIII=\%{pack('H6','0a0507')^'OKQ'};*IIf77d75bd306b3f496f8e5ee5905d2532::IIIlIlIIllllllIl=\&{pack('H24','59315459066a4f6a0e364a7a')^'4P=7<P<R9T2N'};$IIf77d75bd306b3f496f8e5ee5905d2532::IllllIllIlIIIIIl=pack('H18','07180e13080b74126d')^'OLZCWC;A9';$IIf77d75bd306b3f496f8e5ee5905d2532::lIlIIIIlIlIIIIIl=pack('H12','1c1a777e7f7b')^'VS9268'};sub getTestimonial { my $this = shift; my $object = $this->getDecorated; II8b55f24974af3d53369c3d9cea404f55::filters::text2html::text2html($object->{testimonial}); } 1; 