X-Git-Url: https://ruin.nu/git/?a=blobdiff_plain;f=memberIntel.pl;h=66e0dcd7b70f00be6e2f8cde8b8a345dfb3be91e;hb=6a442a1f778230dccf47632b30ed9c7db3d6b3d2;hp=6aa1e0ebb2771f715c10d0aa417e059c9ff9c061;hpb=764e9ff37fd3c5c9e8409695ddb315eed67d56de;p=ndwebbie.git diff --git a/memberIntel.pl b/memberIntel.pl index 6aa1e0e..66e0dcd 100644 --- a/memberIntel.pl +++ b/memberIntel.pl @@ -19,11 +19,8 @@ use strict; use warnings FATAL => 'all'; -no warnings qw(uninitialized); -use POSIX; our $BODY; our $DBH; -our $LOG; my $error; $ND::TEMPLATE->param(TITLE => 'Member Intel'); @@ -31,10 +28,12 @@ $ND::TEMPLATE->param(TITLE => 'Member Intel'); die "You don't have access" unless isHC(); my $showticks = 'AND i.tick > tick()'; -if (param('show') eq 'all'){ - $showticks = ''; -}elsif (param('show') =~ /^(\d+)$/){ - $showticks = "AND (i.tick - i.eta) > (tick() - $1)"; +if (defined param('show')){ + if (param('show') eq 'all'){ + $showticks = ''; + }elsif (param('show') =~ /^(\d+)$/){ + $showticks = "AND (i.tick - i.eta) > (tick() - $1)"; + } }