* added strict and warnings to the cgi and the daemon wrappers ...

* fixed regression introduced while fixing taint issues

1 files changed, 2 insertions, 2 deletions

diff --git a/lib/Smokeping.pm b/lib/Smokeping.pm
index cb8ec46..2b680a7 100644
--- a/lib/Smokeping.pm
+++ b/lib/Smokeping.pm
@@ -1547,12 +1547,12 @@ sub hierarchy_switcher($$){
 sub display_webpage($$){
     my $cfg = shift;
     my $q = shift;
-    my $trag = '';
+    my $targ = '';
     if ( $q->param('target') and $q->param('target') !~ /\.\./ and $q->param('target') =~ /(\S+)/){
         $targ = $1;
     }
     my ($path,$slave) = split(/~/,$targ);
-    if ($slave and $slave ~= /(\S+)/){
+    if ($slave and $slave =~ /(\S+)/){
         die "ERROR: slave '$slave' is not defined in the '*** Slaves ***' section!\n"
             unless defined $cfg->{Slaves}{$slave};
         $slave = $1;