<% my $q = &subs::db_query('select * from settings where setting=? and value=? and device=?','pos','category',&subs::device_setter()); my $categories = $q->hashes; my $settings = &subs::settings_grabber({ app => $a }); %> {'category'} eq '') { %>selected<% } %>><%= &subs::format_name('none') %> <% foreach my $cat ( @{$categories}) { %> {'app'} eq $settings->{'category'}) { %>selected<% } %>><%= &subs::format_name($cat->{'app'}) %> <% } %>