194 |
. qq|</code></span>| |
. qq|</code></span>| |
195 |
if $self->warnings; |
if $self->warnings; |
196 |
|
|
197 |
|
my ($exit,$description) = ('exit','stop server'); |
198 |
|
($exit,$description) = ('restart','restart server') |
199 |
|
if $ENV{FREY_RESTART}; # tune labels on exit link |
200 |
|
|
201 |
my $right = |
my $right = |
202 |
qq| |
qq| |
203 |
<span class="right"> |
<span class="right"> |
204 |
<a href="?reload=$reload_counter"><code>$url</code></a> |
<a title="reload" href="/reload$url"><code>$url</code></a> |
205 |
|
<a title="$description" href="/exit$url">$exit</a> |
206 |
</span> |
</span> |
207 |
|; |
|; |
208 |
|
|