@@ -, +, @@ --- installer/data/mysql/atomicupdate/bug_27948.perl | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) create mode 100644 installer/data/mysql/atomicupdate/bug_27948.perl --- a/installer/data/mysql/atomicupdate/bug_27948.perl +++ a/installer/data/mysql/atomicupdate/bug_27948.perl @@ -0,0 +1,16 @@ +$DBversion = 'XXX'; # will be replaced by the RM +if( CheckVersion( $DBversion ) ) { + # you can use $dbh here like: + $dbh->do( q{ + INSERT IGNORE INTO systempreferences ( `variable`, `value`, `options`, `explanation`, `type` ) VALUES + ('ArticleRequestsDisclaimerText', '', NULL,'Enter text to enable the disclaimer stage of article request creation. Text will be displayed','Textarea') + } ); + + # or perform some test and warn + # if( !column_exists( 'biblio', 'biblionumber' ) ) { + # warn "There is something wrong"; + # } + + # Always end with this (adjust the bug info) + NewVersion( $DBversion, 27948, "Add ArticleRequestsDisclaimerText system preference"); +} --