View | Details | Raw Unified | Return to bug 7310
Collapse All | Expand All

(-)a/installer/data/mysql/updatedatabase.pl (-1 / +25 lines)
Lines 4712-4717 if ( C4::Context->preference("Version") < TransformToNum($DBversion) ) { Link Here
4712
    SetVersion($DBversion);
4712
    SetVersion($DBversion);
4713
}
4713
}
4714
4714
4715
$DBversion = "3.07.99.XXX"; #FIXME
4716
if ( C4::Context->preference("Version") lt TransformToNum($DBversion) ) {
4717
    $dbh->do("ALTER TABLE virtualshelves MODIFY COLUMN owner int"); #should have been int already (fk to borrowers)
4718
    $dbh->do("ALTER TABLE virtualshelves ADD COLUMN allow_add tinyint(1) DEFAULT 0, ADD COLUMN allow_delete_own tinyint(1) DEFAULT 1, ADD COLUMN allow_delete_other tinyint(1) DEFAULT 0");
4719
    $dbh->do("UPDATE virtualshelves SET allow_add=0, allow_delete_own=1, allow_delete_other=0 WHERE category=1");
4720
    $dbh->do("UPDATE virtualshelves SET allow_add=0, allow_delete_own=1, allow_delete_other=0 WHERE category=2");
4721
    $dbh->do("UPDATE virtualshelves SET allow_add=1, allow_delete_own=1, allow_delete_other=1 WHERE category=3");
4722
    $dbh->do("UPDATE virtualshelves SET category=2 WHERE category=3");
4723
4724
    $dbh->do("ALTER TABLE virtualshelfcontents ADD COLUMN borrowernumber int");
4725
    $dbh->do("UPDATE virtualshelfcontents co LEFT JOIN virtualshelves sh USING (shelfnumber) SET co.borrowernumber=sh.owner");
4726
4727
    $dbh->do("CREATE TABLE virtualshelfshares
4728
	(id int AUTO_INCREMENT PRIMARY KEY, shelfnumber int NOT NULL,
4729
	borrowernumber int, invitekey varchar(10), sharedate datetime,
4730
	CONSTRAINT `virtualshelfshares_ibfk_1` FOREIGN KEY (`shelfnumber`) REFERENCES `virtualshelves` (`shelfnumber`) ON DELETE CASCADE ON UPDATE CASCADE) ENGINE=InnoDB DEFAULT CHARSET=utf8");
4731
4732
    $dbh->do("INSERT INTO systempreferences (variable,value,explanation,options,type) VALUES('OpacAllowPublicListCreation',1,'If set, allows opac users to create public lists',NULL,'YesNo');");
4733
    $dbh->do("INSERT INTO systempreferences (variable,value,explanation,options,type) VALUES('OpacAllowSharingPrivateLists',0,'If set, allows opac users to share private lists with other patrons',NULL,'YesNo');");
4734
4735
    print "Upgrade to $DBversion done (BZ7310: Improving list permissions)\n";
4736
    print "NOTE: If you want to make your public lists read-only, please check the permissions on list level or run a sql update statement on the virtualshelves table just like the ones in the updatedatabase script.\n";
4737
    SetVersion($DBversion);
4738
}
4739
4715
=head1 FUNCTIONS
4740
=head1 FUNCTIONS
4716
4741
4717
=head2 DropAllForeignKeys($table)
4742
=head2 DropAllForeignKeys($table)
4718
- 

Return to bug 7310