Lines 5536-5541
if ( C4::Context->preference("Version") < TransformToNum($DBversion) ) {
Link Here
|
5536 |
SetVersion($DBversion); |
5536 |
SetVersion($DBversion); |
5537 |
} |
5537 |
} |
5538 |
|
5538 |
|
|
|
5539 |
$DBversion ="3.09.00.XXX"; |
5540 |
if(C4::Context->preference("Version") < TransformToNum($DBversion) ) { |
5541 |
my $query = "SELECT value FROM systempreferences WHERE variable='opacstylesheet'"; |
5542 |
my $remote= $dbh->selectrow_arrayref($query); |
5543 |
$dbh->do("DELETE from systempreferences WHERE variable='opacstylesheet'"); |
5544 |
if($remote && $remote->[0]) { |
5545 |
$query="UPDATE systempreferences SET value=? WHERE variable='opaclayoutstylesheet'"; |
5546 |
$dbh->do($query,undef,$remote->[0]); |
5547 |
print "NOTE: The URL of your remote opac css file has been moved to preference opaclayoutstylesheet.\n"; |
5548 |
} |
5549 |
print "Upgrade to $DBversion done (BZ 8263: Make OPAC stylesheet preferences more consistent)\n"; |
5550 |
SetVersion($DBversion); |
5551 |
} |
5552 |
|
5539 |
=head1 FUNCTIONS |
5553 |
=head1 FUNCTIONS |
5540 |
|
5554 |
|
5541 |
=head2 TableExists($table) |
5555 |
=head2 TableExists($table) |
5542 |
- |
|
|