@@ -, +, @@ --- .../Bug-7021-Reintroduce_usercode_column.perl | 10 ++++++++++ 1 file changed, 10 insertions(+) create mode 100644 installer/data/mysql/atomicupdate/Bug-7021-Reintroduce_usercode_column.perl --- a/installer/data/mysql/atomicupdate/Bug-7021-Reintroduce_usercode_column.perl +++ a/installer/data/mysql/atomicupdate/Bug-7021-Reintroduce_usercode_column.perl @@ -0,0 +1,10 @@ +$DBversion = 'XXX'; # will be replaced by the RM +if( CheckVersion( $DBversion ) ) { + # you can use $dbh here like: + # $dbh->do( "ALTER TABLE biblio ADD COLUMN badtaste int" ); + + $dbh->do("ALTER TABLE statistics ADD COLUMN usercode varchar(10) AFTER ccode"); + + # Always end with this (adjust the bug info) + NewVersion( $DBversion, 7021, "Bug 7021 - Reintroduce usercode column"); +} --