Changeset 133 for branches


Ignore:
Timestamp:
01/25/05 10:42:45 (20 years ago)
Author:
Kris Deugau
Message:

/branches/stable

Fix "change allocation type" glitch due to change of "Internal
netblock" typecode from ii to in

File:
1 edited

Legend:

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

    r125 r133  
    10981098# this has now been Requested, so here goes.
    10991099
    1100   if ($data[2] =~ /^d[nyc]|cn|ee|ii$/) {
     1100  if ($data[2] =~ /^d[nyc]|cn|ee|in$/) {
    11011101    # Block that can be changed
    11021102    my $blockoptions = "<select name=alloctype><option".
     
    11061106        (($data[2] eq 'cn') ? ' selected' : '') ." value='cn'>Customer netblock</option>\n<option".
    11071107        (($data[2] eq 'ee') ? ' selected' : '') ." value='ee'>End-use netblock</option>\n<option".
    1108         (($data[2] eq 'ii') ? ' selected' : '') ." value='ii'>Internal netblock</option>\n".
     1108        (($data[2] eq 'in') ? ' selected' : '') ." value='in'>Internal netblock</option>\n".
    11091109        "</select>\n";
    11101110    $html =~ s/\$\$TYPESELECT\$\$/$blockoptions/g;
Note: See TracChangeset for help on using the changeset viewer.