CVS Update: gleipnir

[Dan Brosemer <odin@cleannorth.org>]

Log Message:
-----------
Allow patch replacement

Modified Files:
--------------
    gleipnir/public_html:
        patch.pl

Revision Data
-------------
Index: patch.pl
===================================================================
RCS file: /cvs/gleipnir/public_html/patch.pl,v
retrieving revision 1.2
retrieving revision 1.3
diff -Lpublic_html/patch.pl -Lpublic_html/patch.pl -u -r1.2 -r1.3
--- public_html/patch.pl
+++ public_html/patch.pl
@@ -390,14 +390,14 @@
 					{
 						my $SQL = <<EOT;
 insert into patch
-(name, cmdline, appid, ignoreerr, rebooton, comment, replaces, tstamp) values
-(   ?,       ?,     ?,         ?,        ?,       ?,        ?,  now())
+(name, cmdline, appid, ignoreerr, rebooton, comment, replaces, tstamp, uid) values
+(   ?,       ?,     ?,         ?,        ?,       ?,        ?,  now(),   ?)
 EOT
 
 						my $cursor = $dbh->prepare($SQL);
 						$cursor->execute($cgi->param('patchname'), $cgi->param('cmdline'), $cgi->param('appid'), 
 														$cgi->param('ignoreerr')||undef, $cgi->param('rebooton')||undef, $cgi->param('comment'), 
-														$cgi->param('replaces'));
+														$cgi->param('replaces'), $gleipnir->uid);
 					}
 				else
 					{