% if ( exists($MULTI->{filename}) ) % { % my $TYPE = 'unknown'; % if (length($MULTI->{ext}) > 0) % { % if (-e $keeper->{state}->{mason_comp}.'/contenido/i/icons/'.$MULTI->{ext}.'.gif') % { % $TYPE = $MULTI->{ext}; % } % } % } % % foreach my $iattr (sort (@{ $iattrs })) % { % next if ( ($iattr eq 'filename') || ($iattr eq 'mini') || ($iattr eq 'width') || ($iattr eq 'height') ); % }

<% $rusname %> / name="<% $attr %>"

<% $MULTI->{filename} %>

Тип: <% uc($MULTI->{ext}) %> Размер: <% int($MULTI->{size}/1024) %> Кб

<% $ATTRNAMES->{$iattr} %> (<% $iattr %>):

Удалить

<%ARGS> $MULTI => undef $rusname => undef $attr => undef $prop => {} <%DOC> Компонента отображает одну картинку... <%INIT> my $iattrs = $prop->{iattrs}; $iattrs ||= []; my $ATTRNAMES = { 'alt' => 'Подпись', 'btext' => 'Текст до картинки', 'atext' => 'Текст после картинки', 'url' => 'Ссылка с картинки', 'copyright' => 'Копирайт', };