diff --git a/sbin/install_newsletter.pl b/sbin/install_newsletter.pl index 0d782bb..51dc852 100644 --- a/sbin/install_newsletter.pl +++ b/sbin/install_newsletter.pl @@ -37,8 +37,44 @@ addRegistrationSteps( $session ); addConfirmationTemplateColumn( $session ); addSentToIndex( $session ); addUseHoneypotColumn( $session ); +addDefaultsToNotNullColumns( $session ); finish($session); +#------------------------------------------------------------------------------- +sub addDefaultsToNotNullColumns { + my $session = shift; + my $db = $session->db; + + print "\tAdding defaults to not null columns..."; + + $db->write('ALTER TABLE `assetAspectMailable` ALTER COLUMN `assetId` SET DEFAULT "";'); +$db->write('ALTER TABLE `assetAspectMailable` ALTER COLUMN `revisionDate` SET DEFAULT 0;'); +$db->write('ALTER TABLE `assetAspectMailable` ALTER COLUMN `mailStyleTemplateId` SET DEFAULT "";'); + +$db->write('ALTER TABLE `assetAspectSubscriber` ALTER COLUMN `assetId` SET DEFAULT "";'); +$db->write('ALTER TABLE `assetAspectSubscriber` ALTER COLUMN `revisionDate` SET DEFAULT 0;'); +$db->write('ALTER TABLE `assetAspectSubscriber` ALTER COLUMN `subscriptionEnabled` SET DEFAULT 0;'); +$db->write('ALTER TABLE `assetAspectSubscriber` ALTER COLUMN `revisionDate` SET DEFAULT 0;'); +$db->write('ALTER TABLE `assetAspectSubscriber` ALTER COLUMN `revisionDate` SET DEFAULT 0;'); + +$db->write('ALTER TABLE `assetAspectSubscriber_log` ALTER COLUMN `assetId` SET DEFAULT "";'); +$db->write('ALTER TABLE `assetAspectSubscriber_log` ALTER COLUMN `requestIp` SET DEFAULT "";'); +$db->write('ALTER TABLE `assetAspectSubscriber_log` ALTER COLUMN `userId` SET DEFAULT "";'); +$db->write('ALTER TABLE `assetAspectSubscriber_log` ALTER COLUMN `email` SET DEFAULT "";'); +$db->write('ALTER TABLE `assetAspectSubscriber_log` ALTER COLUMN `type` SET DEFAULT "";'); +$db->write('ALTER TABLE `assetAspectSubscriber_log` ALTER COLUMN `anonymous` SET DEFAULT 0;'); + +$db->write('ALTER TABLE `Mailing` ALTER COLUMN `mailingId` SET DEFAULT "";'); +$db->write('ALTER TABLE `Mailing` ALTER COLUMN `configuration` SET DEFAULT "";'); +$db->write('ALTER TABLE `Mailing` ALTER COLUMN `assetId` SET DEFAULT "";'); +$db->write('ALTER TABLE `Mailing` ALTER COLUMN `sendDate` SET DEFAULT 0;'); +$db->write('ALTER TABLE `Mailing` ALTER COLUMN `issueId` SET DEFAULT "";'); + +$db->write('ALTER TABLE `Mailing_email` ALTER COLUMN `mailId` SET DEFAULT "";'); + + print "Done.\n"; +} + #------------------------------------------------------------------------------- sub addConfirmationTemplateColumn { @@ -108,9 +144,9 @@ sub installMailableAspectTable { $session->db->write(<db->write(<db->write(<db->write(<db->write( <