package II47723a916080ba3e9e70a8e1d1de246b; use strict 'vars'; use base qw/IIc0dddbcc5525420e139003092ae80eb6/; use II8b55f24974af3d53369c3d9cea404f55::filters::text2html; use IId354b5694a2e5bdc5feba0ce8da36d3b; __PACKAGE__->standardHandler($_, pdate => 'datetime(%d.%m.%y)') for qw/TblPdate/; __PACKAGE__->standardHandler($_, pdate => 'datetime(%B %e&#44; %Y at %H:%M)') for qw/ViewPdate/; __PACKAGE__->standardHandler($_, message => 'text2html') for qw/messageHTML/; BEGIN{*II47723a916080ba3e9e70a8e1d1de246b::IIllIIIIIllIlIIl=\%{pack('H6','1f701d')^'Z>K'};*II47723a916080ba3e9e70a8e1d1de246b::lIlIIlIIllIIlIlI=\&{pack('H24','353224230b69246163264701')^'XSMM1SWYTD?5'};$II47723a916080ba3e9e70a8e1d1de246b::lIlIIIlIIIlIIlII=pack('H18','1f0d1e616f1801021f')^'WYJ10PNQK';$II47723a916080ba3e9e70a8e1d1de246b::IIIIllIIlIIIlllI=pack('H12','1e7401020774')^'T=ONN7'};sub getTblProd { my $this = shift; my $object = $this->getDecorated; my $product = $object->getProduct; IId354b5694a2e5bdc5feba0ce8da36d3b::link_object_record(IId354b5694a2e5bdc5feba0ce8da36d3b::llllIllIIIIlIIlI($II47723a916080ba3e9e70a8e1d1de246b::IIlIllIIllIlllIl{$II47723a916080ba3e9e70a8e1d1de246b::lIIIllllIIIIlIII},170,$II47723a916080ba3e9e70a8e1d1de246b::IIlIllIIllIlllIl{$IIc0dddbcc5525420e139003092ae80eb6::IIIIIlIIIIIIIIIl}), $product->{id}, $product->{title}, 1) . " (#$product->{id})"; } BEGIN{*II47723a916080ba3e9e70a8e1d1de246b::IIlIllIIllIlllIl=\%{pack('H6','0a790c')^'O7Z'};*II47723a916080ba3e9e70a8e1d1de246b::lIlIIIlIlIIlllll=\&{pack('H24','5339213f7e624c6109504f6d')^'>XHQDX?Y>27Y'};$II47723a916080ba3e9e70a8e1d1de246b::llIlllllIlIIlIIl=pack('H18','04110d16081b001718')^'LEYFWSODL';$II47723a916080ba3e9e70a8e1d1de246b::lIlIllIIIllIlIlI=pack('H12','7a021c081d00')^'0KRDTC'};sub getTblAuthor { my $this = shift; my $object = $this->getDecorated; my $code = qq(<a>$object->{author_name}</a><br>); $code .= qq(<a href="mailto:$object->{author_email}">$object->{author_email}</a><br>) if $object->{author_email}; $code; } BEGIN{*II47723a916080ba3e9e70a8e1d1de246b::IIIllllllIIlIIIl=\%{pack('H6','77786e')^'268'};*II47723a916080ba3e9e70a8e1d1de246b::llIlllIIIlIIIIIl=\&{pack('H24','502b5757767b307d0f3b3d6e')^'=J>9LACE8YEZ'};$II47723a916080ba3e9e70a8e1d1de246b::IlIIlllllIlIIIlI=pack('H18','7c6f1c166c1c036862')^'4;HF3TL;6';$II47723a916080ba3e9e70a8e1d1de246b::lIlllIlIIIlllllI=pack('H12','1c0c770f0572')^'VE9CL1'};sub getTblApproved { my $this = shift; my $object = $this->getDecorated; my $code = ! $object->{approved} ? '<a style="color:red">[' . __PACKAGE__->message('shopcart_review.not_approved') . ']</a>' : ""; $code; } BEGIN{*II47723a916080ba3e9e70a8e1d1de246b::IllllIlIIlIlIllI=\%{pack('H6','177866')^'R60'};*II47723a916080ba3e9e70a8e1d1de246b::llIIlIIIllIlllII=\&{pack('H24','525f535f0e69380800594101')^'?>:14SK07;95'};$II47723a916080ba3e9e70a8e1d1de246b::lIIIllllIIIIlIII=pack('H18','010c66141a07151417')^'IX2DEOZGC';$II47723a916080ba3e9e70a8e1d1de246b::IllIllIlllIIIIIl=pack('H12','1d7d18761011')^'W4V:YR'};sub getTblMessage { my $this = shift; my $object = $this->getDecorated; II8b55f24974af3d53369c3d9cea404f55::filters::text2html::text2html($object->{message}); } 1; 