Add gid to project_leases table.

sql/database-create.sql

@@ -3744,6 +3744,7 @@ CREATE TABLE `project_leases` (
   `uuid` varchar(40) NOT NULL default '',
   `owner_uid` varchar(8) NOT NULL default '',
   `pid` varchar(48) NOT NULL default '',
+  `gid` varchar(48) NOT NULL default '',
   `type` enum('stdataset','ltdataset','unknown') NOT NULL default 'unknown',
   `inception` timestamp NOT NULL default CURRENT_TIMESTAMP,
   `lease_end` timestamp NOT NULL default '2037-01-19 03:14:07',

sql/updates/4/412

+#
+# Add gid to project_leases
+#
+use strict;
+use libdb;
+
+sub DoUpdate($$$)
+{
+    my ($dbhandle, $dbname, $version) = @_;
+
+    if (!DBSlotExists("project_leases", "gid")) {
+	DBQueryFatal("alter table project_leases add ".
+		     " `gid` varchar(48) NOT NULL default '' after pid");
+	DBQueryFatal("update project_leases set gid=pid");
+    }
+    return 0;
+}
+
+# Local Variables:
+# mode:perl
+# End: