|
Lines 41-46
use C4::Installer;
Link Here
|
| 41 |
use Koha::Database; |
41 |
use Koha::Database; |
| 42 |
use Koha; |
42 |
use Koha; |
| 43 |
use Koha::DateUtils qw( dt_from_string output_pref ); |
43 |
use Koha::DateUtils qw( dt_from_string output_pref ); |
|
|
44 |
use Koha::Caches; |
| 44 |
|
45 |
|
| 45 |
use MARC::Record; |
46 |
use MARC::Record; |
| 46 |
use MARC::File::XML ( BinaryEncoding => 'utf8' ); |
47 |
use MARC::File::XML ( BinaryEncoding => 'utf8' ); |
|
Lines 69-76
$|=1; # flushes output
Link Here
|
| 69 |
|
70 |
|
| 70 |
local $dbh->{RaiseError} = 0; |
71 |
local $dbh->{RaiseError} = 0; |
| 71 |
|
72 |
|
| 72 |
# Record the version we are coming from |
73 |
# Flush memcached before we begin |
|
|
74 |
Koha::Caches->get_instance('config')->flush_all; |
| 75 |
Koha::Caches->get_instance('sysprefs')->flush_all; |
| 73 |
|
76 |
|
|
|
77 |
# Record the version we are coming from |
| 74 |
my $original_version = C4::Context->preference("Version"); |
78 |
my $original_version = C4::Context->preference("Version"); |
| 75 |
|
79 |
|
| 76 |
# Deal with virtualshelves |
80 |
# Deal with virtualshelves |