Changeset 800 for trunk/cgi-bin

Timestamp:

12/23/15 16:35:21 (9 years ago)

Author:

Kris Deugau

Message:

/trunk

A whitespace snafu and a stupid typo

File:

• trunk/cgi-bin/main.cgi (modified) (2 diffs)

trunk/cgi-bin/main.cgi

@@ -662 +662 @@
 
   # Check to see if user is allowed to do anything with sensitive data
- if ($IPDBacl{$authuser} =~ /s/) {
+  if ($IPDBacl{$authuser} =~ /s/) {
     $page->param(nocling => 1);
     $page->param(privdata => $q->escapeHTML($webvar{privdata},'y'));
@@ -1219 +1219 @@
     if ($webvar{backupfields} && $webvar{backupfields} eq 'on') {
       $page->param(hasbackup => 1);
-      for my $bkfield (qw(@IPDB::backupfields) {
+      for my $bkfield (@IPDB::backupfields) {
         $page->param("bk$bkfield" => $webvar{"bk$bkfield"});
       }