fix some broken links to qtl search
[sgn.git] / mason / system_message.mas
blob64b80199215f1a470adf83f0ecbf0b974c5d0b2e
1 <%init>
2 use Path::Class;
3 </%init>
4 % if( my $message = eval { file( $c->get_conf('system_message_file') || '' )->slurp } ) {
5 <div class="devbar" style="padding: 5px">
6    <span style="color: #922; font-weight: bold">Notice: </span>
7    <% $message %>
8 </div>
9 % }