diff options
Diffstat (limited to 'httpd/cgi-bin/check')
-rwxr-xr-x | httpd/cgi-bin/check | 17 |
1 files changed, 0 insertions, 17 deletions
diff --git a/httpd/cgi-bin/check b/httpd/cgi-bin/check index 117f721..7cd772b 100755 --- a/httpd/cgi-bin/check +++ b/httpd/cgi-bin/check @@ -1505,12 +1505,6 @@ sub prep_template ($$) $T->param(opt_group_errors => $File->{Opt}->{'Group Errors'}); $T->param(opt_no200 => $File->{Opt}->{No200}); - # - # Tip of the Day... - my $tip = &get_tip(); - $T->param(tip_uri => $tip->[0]); - $T->param(tip_slug => $tip->[1]); - # Root Element $T->param(root_element => $File->{Root}); @@ -3364,17 +3358,6 @@ sub self_url_q } # -# Return random tip and its URL. -sub get_tip -{ - my @tipAddrs = keys %{$CFG->{Tips}}; - my $tipAddr = $tipAddrs[rand scalar @tipAddrs]; - my $tipSlug = $CFG->{Tips}->{$tipAddr}; - - return [$tipAddr, $tipSlug]; -} - -# # Construct a self-referential URL from a $File object. sub self_url_file { |