This commit is contained in:
david 2002-03-16 21:29:49 +00:00
parent ce7a8a8dcc
commit e9820a4dbc
3 changed files with 4 additions and 7 deletions

View File

@ -132,10 +132,6 @@ print "</select></td>";
print "<th align=right>Maintained:</th><td>\n";
if ( $maintained eq "t" ) { print 'Yes'; } else { print 'No' }
#print "<select name=maintained>";
#if ( $maintained eq "t" ) { print '<option selected value="t">Yes</option>'; } else { print '<option value="t">Yes</option>' }
#if ( $maintained eq "f" ) { print '<option selected value="f">No</option>'; } else { print '<option value="f">No</option>' }
#print "</select>";
print "</td>";
print "</tr>\n<tr>\n";

View File

@ -28,7 +28,6 @@ $tickle_date = param('tickle_date');
$ref_url = param('ref_url');
$pub_date = param('pub_date');
$tech_review_status = param('tech_review_status');
$maintained = param('maintained');
$license = param('license');
$abstract = param('abstract');
while ($abstract =~ /\'/) {
@ -102,8 +101,6 @@ $sql = "UPDATE document SET pub_date='$pub_date' WHERE doc_id=$doc_id";
$result=$conn->exec($sql);
$sql = "UPDATE document SET tech_review_status='$tech_review_status' WHERE doc_id=$doc_id";
$result=$conn->exec($sql);
$sql = "UPDATE document SET maintained='$maintained' WHERE doc_id=$doc_id";
$result=$conn->exec($sql);
$sql = "UPDATE document SET license='$license' WHERE doc_id=$doc_id";
$result=$conn->exec($sql);
$sql = "UPDATE document SET abstract='$abstract' WHERE doc_id=$doc_id";

View File

@ -34,7 +34,11 @@ die $conn->errorMessage unless PGRES_TUPLES_OK eq $result->resultStatus;
# Load from db
$first_name = $row[1];
$first_name =~ s/^\s+//;
$first_name =~ s/\s+$//;
$surname = $row[2];
$surname =~ s/^\s+//;
$surname =~ s/\s+$//;
$maintainer_id = $row[3];
$email = $row[4];
$admin = $row[5];