package Trog::Component::CategoryBar; use 5.040; use re '/aasx'; use warnings FATAL => 'all'; use Trog::Component (); =head1 Trog::Component::CategoryBar The list of series links in the top bar. =head1 FUNCTIONS =head2 render(%args) = STRING Render categories.tx. Wants C, the series list the page was built with, and C, which decides whether the links point at /secure. =cut sub render (%args) { $args{categories} //= []; $args{user} //= undef; return Trog::Component::render_template( 'categories.tx', \%args ); } 1;