Changeset 800 for trunk/cgi-bin/main.cgi
- Timestamp:
- 12/23/15 16:35:21 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/cgi-bin/main.cgi
r798 r800 662 662 663 663 # Check to see if user is allowed to do anything with sensitive data 664 if ($IPDBacl{$authuser} =~ /s/) {664 if ($IPDBacl{$authuser} =~ /s/) { 665 665 $page->param(nocling => 1); 666 666 $page->param(privdata => $q->escapeHTML($webvar{privdata},'y')); … … 1219 1219 if ($webvar{backupfields} && $webvar{backupfields} eq 'on') { 1220 1220 $page->param(hasbackup => 1); 1221 for my $bkfield ( qw(@IPDB::backupfields) {1221 for my $bkfield (@IPDB::backupfields) { 1222 1222 $page->param("bk$bkfield" => $webvar{"bk$bkfield"}); 1223 1223 }
Note:
See TracChangeset
for help on using the changeset viewer.