Changeset 277 for branches


Ignore:
Timestamp:
08/10/05 17:49:24 (19 years ago)
Author:
Kris Deugau
Message:

/branches/dns

Quick hack to properly pass in rDNS data in one use-case
Make sure to pass rDNS (whatever it may turn out as) to allocateBlock()

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/dns/cgi-bin/main.cgi

    r273 r277  
    642642  my $alloc_from;
    643643  my $rdns;
     644
     645  if ($webvar{defrdns} eq 'y') {
     646    # Using default templated rDNS from alloctypes table
     647  } else {
     648    # Use supplied rDNS
     649    $rdns = $webvar{rdns};
     650  }
    644651
    645652  # Going to manually validate some items.
     
    810817  my ($code,$msg) = allocateBlock($ip_dbh, $webvar{fullcidr}, $webvar{alloc_from},
    811818        $webvar{custid}, $webvar{alloctype}, $webvar{city}, $webvar{desc}, $webvar{notes},
    812         $webvar{circid});
     819        $webvar{circid}, $webvar{rdns});
    813820
    814821  if ($code eq 'OK') {
Note: See TracChangeset for help on using the changeset viewer.