Layout Previews body<= [<< Back]
"; my $pub = LJ::S2::get_public_layers(); my @layouts = sort { $a->{'name'} cmp $b->{'name'} } map { $pub->{$_} } grep { /^\d+$/ && $pub->{$_}->{'type'} eq "layout" } keys %$pub; foreach my $l (@layouts) { $ret .= "{'name'}) . " h1?>"; unless ($l->{'_previews'}) { $ret .= "No preview available. p?>"; next; } foreach (split(/\,/, $l->{'_previews'})) { my ($img, $w, $h) = split(/\|/, $_); $ret .= ""; } } return $ret; } _code?> <=body page?>