From d6c6ec3435191331ec87771f6dc7b301fd9c76bf Mon Sep 17 00:00:00 2001 From: toins Date: Mon, 17 Jul 2006 12:28:45 +0000 Subject: [PATCH] sync with rel_2_2 --- updater/updatedatabase | 1423 +--------------------------------------- 1 file changed, 3 insertions(+), 1420 deletions(-) diff --git a/updater/updatedatabase b/updater/updatedatabase index 85459b4bf5..45e4e31846 100755 --- a/updater/updatedatabase +++ b/updater/updatedatabase @@ -1,10 +1,6 @@ #!/usr/bin/perl -<<<<<<< updatedatabase # $Id$ -======= -# $Id$ ->>>>>>> 1.100.2.46 # Database Updater # This script checks for required updates to the database. @@ -143,78 +139,10 @@ my %requiretables = ( `city_zipcode` char(20), PRIMARY KEY (`cityid`) )", -<<<<<<< updatedatabase roadtype => "(`roadtypeid` int auto_increment, `road_type` char(100) NOT NULL, PRIMARY KEY (`roadtypeid`) -======= - marc_word => "( - bibid bigint(20) NOT NULL default '0', - tag char(3) NOT NULL default '', - tagorder tinyint(4) NOT NULL default '1', - subfieldid char(1) NOT NULL default '', - subfieldorder tinyint(4) NOT NULL default '1', - word varchar(255) NOT NULL default '', - sndx_word varchar(255) NOT NULL default '', - KEY bibid (bibid), - KEY tag (tag), - KEY tagorder (tagorder), - KEY subfieldid (subfieldid), - KEY subfieldorder (subfieldorder), - KEY word (word), - KEY sndx_word (sndx_word) - )", - marc_breeding => "( id bigint(20) NOT NULL auto_increment, - file varchar(80) NOT NULL default '', - isbn varchar(10) NOT NULL default '', - title varchar(128) default NULL, - author varchar(80) default NULL, - marc text NOT NULL, - encoding varchar(40) default NULL, - PRIMARY KEY (id), - KEY title (title), - KEY isbn (isbn) - )", - authorised_values => "(id int(11) NOT NULL auto_increment, - category char(10) NOT NULL default '', - authorised_value char(80) NOT NULL default '', - lib char(80) NULL, - PRIMARY KEY (id), - KEY name (category) - )", - userflags => "( bit int(11) NOT NULL default '0', - flag char(30), flagdesc char(255), - defaulton int(11) - )", - auth_types => "( - authtypecode char(10) not NULL, - authtypetext char(255) not NULL, - auth_tag_to_report char(3) not NULL, - summary text not NULL, - PRIMARY KEY (authtypecode) - )", - biblio_framework => "( - frameworkcode char(4) not NULL, - frameworktext char(255) not NULL, - PRIMARY KEY (frameworkcode) - )", - auth_subfield_structure => "( - authtypecode char(10) NOT NULL default '', - tagfield char(3) NOT NULL default '', - tagsubfield char(1) NOT NULL default '', - liblibrarian char(255) NOT NULL default '', - libopac char(255) NOT NULL default '', - repeatable tinyint(4) NOT NULL default '0', - mandatory tinyint(4) NOT NULL default '0', - tab tinyint(1) default NULL, - authorised_value char(10) default NULL, - value_builder char(80) default NULL, - seealso char(255) default NULL, - PRIMARY KEY (authtypecode,tagfield,tagsubfield), - KEY tab (authtypecode,tab) ->>>>>>> 1.100.2.46 )", -<<<<<<< updatedatabase labels => "( labelid int(11) NOT NULL auto_increment, @@ -251,160 +179,9 @@ my %requiretables = ( borrower2 integer )", -======= - auth_tag_structure => "( - authtypecode char(10) NOT NULL default '', - tagfield char(3) NOT NULL default '', - liblibrarian char(255) NOT NULL default '', - libopac char(255) NOT NULL default '', - repeatable tinyint(4) NOT NULL default '0', - mandatory tinyint(4) NOT NULL default '0', - authorised_value char(10) default NULL, - PRIMARY KEY (authtypecode,tagfield) - )", - auth_header => "( - authid bigint(20) unsigned NOT NULL auto_increment, - authtypecode char(10) NOT NULL default '', - datecreated date NOT NULL default '0000-00-00', - datemodified date default NULL, - origincode char(20) default NULL, - PRIMARY KEY (authid), - KEY origincode (origincode) - ) ", - auth_subfield_table => "( - subfieldid bigint(20) unsigned NOT NULL auto_increment, - authid bigint(20) unsigned NOT NULL default '0', - tag char(3) NOT NULL default '', - tagorder tinyint(4) NOT NULL default '1', - tag_indicator char(2) NOT NULL default '', - subfieldcode char(1) NOT NULL default '', - subfieldorder tinyint(4) NOT NULL default '1', - subfieldvalue varchar(255) default NULL, - PRIMARY KEY (subfieldid), - KEY authid (authid), - KEY tag (tag), - KEY subfieldcode (subfieldcode), - KEY subfieldvalue (subfieldvalue) - )", - auth_word => "( - authid bigint(20) NOT NULL default '0', - tagsubfield char(4) NOT NULL default '', - tagorder tinyint(4) NOT NULL default '1', - subfieldorder tinyint(4) NOT NULL default '1', - word varchar(255) NOT NULL default '', - sndx_word varchar(255) NOT NULL default '', - KEY authid (authid), - KEY marc_search (tagsubfield,word), - KEY word (word), - KEY sndx_word (sndx_word) - )", - suggestions => "( - suggestionid int(8) NOT NULL auto_increment, - suggestedby int(11) NOT NULL default '0', - managedby int(11) default NULL , - STATUS varchar(10) NOT NULL default '', - note text, - author varchar(80) default NULL , - title varchar(80) default NULL , - copyrightdate smallint(6) default NULL , - publishercode varchar(255) default NULL , - date timestamp(8) NOT NULL , - volumedesc varchar(255) default NULL , - publicationyear smallint(6) default '0', - place varchar(255) default NULL , - isbn varchar(10) default NULL , - mailoverseeing smallint(1) default '0', - biblionumber int(11) default NULL , - PRIMARY KEY (suggestionid) , - KEY suggestedby(suggestedby) , - KEY managedby(managedby) - )", - aqbasket => "(basketno int(11) NOT NULL auto_increment, - creationdate date, - closedate date, - booksellerid varchar(10), - authorisedby varchar(10), - booksellerinvoicenumber text, - PRIMARY KEY (basketno) - )", - serial => "(serialid int(11) NOT NULL auto_increment, - biblionumber varchar(100) NOT NULL default '', - subscriptionid varchar(100) NOT NULL default '', - serialseq varchar(100) NOT NULL default '', - status tinyint(4) NOT NULL default '0', - planneddate date NOT NULL default '0000-00-00', - publishedddate date NOT NULL default '0000-00-00', - PRIMARY KEY (serialid) - )", - subscription => "(biblionumber int(11) NOT NULL default '0', - subscriptionid int(11) NOT NULL auto_increment, - librarian varchar(100) default '', - startdate date default '0000-00-00', - aqbooksellerid int(11) default '0', - cost int(11) default '0', - aqbudgetid int(11) default '0', - weeklength tinyint(4) default '0', - monthlength tinyint(4) default '0', - numberlength tinyint(4) default '0', - periodicity tinyint(4) default '0', - dow varchar(100) default '', - numberingmethod varchar(100) default '', - notes text, - status varchar(100) NOT NULL default '', - add1 int(11) default 0, - every1 int(11) default 0, - whenmorethan1 int(11) default 0, - setto1 int(11), - lastvalue1 int(11), - add2 int(11) default 0, - every2 int(11) default 0, - whenmorethan2 int(11) default 0, - setto2 int(11), - lastvalue2 int(11), - add3 int(11) default 0, - every3 int(11) default 0, - innerloop1 int(11) default 0, - innerloop2 int(11) default 0, - innerloop3 int(11) default 0, - whenmorethan3 int(11) default 0, - setto3 int(11), - lastvalue3 int(11), - PRIMARY KEY (subscriptionid) - )", - subscriptionhistory => "(biblionumber int(11) NOT NULL default '0', - subscriptionid int(11) NOT NULL default '0', - histstartdate date NOT NULL default '0000-00-00', - enddate date default '0000-00-00', - missinglist longtext NOT NULL, - recievedlist longtext NOT NULL, - opacnote varchar(150) NOT NULL default '', - librariannote varchar(150) NOT NULL default '', - PRIMARY KEY (subscriptionid), - KEY biblionumber (biblionumber) - )", - labels => "(labelid int(11) NOT NULL auto_increment, - itemnumber varchar(100) NOT NULL default '', - timestamp timestamp(14) NOT NULL, - PRIMARY KEY (labelid) - )", - labels_conf => "(id int(4) NOT NULL auto_increment, - barcodetype char(100) default '', - title tinyint(1) default '0', - isbn tinyint(1) default '0', - itemtype tinyint(1) default '0', - barcode tinyint(1) default '0', - dewey tinyint(1) default '0', - class tinyint(1) default '0', - author tinyint(1) default '0', - papertype char(100) default '', - startrow int(2) default NULL, - PRIMARY KEY (id) - )", ->>>>>>> 1.100.2.46 ); my %requirefields = ( -<<<<<<< updatedatabase subscription => { 'letter' => 'char(20) NULL', 'distributedto' => 'text NULL'}, itemtypes => { 'imageurl' => 'char(200) NULL'}, aqbookfund => { 'branchcode' => 'varchar(4) NULL'}, @@ -413,72 +190,6 @@ my %requirefields = ( auth_subfield_structure =>{ 'hidden' => 'TINYINT(3) NOT NULL UNSIGNED ZEROFILL', 'kohafield' => 'VARCHAR(45) NOT NULL', 'linkid' => 'TINYINT(1) NOT NULL UNSIGNED', 'isurl' => 'TINYINT(1) UNSIGNED'}, statistics => { 'associatedborrower' => 'integer'}, # tablename => { 'field' => 'fieldtype' }, -======= - biblio => { 'abstract' => 'text' }, - deletedbiblio => { 'abstract' => 'text', 'marc' => 'blob' }, - deleteditems => - { 'marc' => 'blob', 'paidfor' => 'text', 'location' => 'varchar(80)' }, - biblioitems => { - 'lccn' => 'char(25)', - 'url' => 'varchar(255)', - 'marc' => 'text' - }, - deletedbiblioitems => { - 'lccn' => 'char(25)', - 'url' => 'varchar(255)', - 'marc' => 'text' - }, - branchtransfers => { 'datearrived' => 'datetime' }, - statistics => { 'borrowernumber' => 'int(11)' }, - aqbooksellers => { - 'invoicedisc' => 'float(6,4)', - 'nocalc' => 'int(11)' - }, - borrowers => { - 'userid' => 'char(30)', - 'password' => 'char(30)', - 'flags' => 'int(11)', - 'textmessaging' => 'varchar(30)', - 'zipcode' => 'varchar(25)', - 'homezipcode' => 'varchar(25)', - 'sort1' => 'char(80)', - 'sort2' => 'char(80)', - }, - aqorders => { - 'budgetdate' => 'date', - 'sort1' => 'char(80)', - 'sort2' => 'char(80)', - }, - aqbudget => { - 'aqbudgetid' => 'tinyint(4) auto_increment primary key', - 'branchcode' => 'varchar(4)', - }, - aqbookfund => { 'branchcode' => 'varchar(4)', }, - items => { 'paidfor' => 'text', 'location' => 'char(80)' }, - - #added so that reference items are not available for reserves... - itemtypes => { 'notforloan' => 'smallint(6)' }, - systempreferences => { - 'explanation' => 'char(80)', - 'type' => 'char(20)', - 'options' => 'text' - }, - z3950servers => { 'syntax' => 'char(80)' }, - marc_tag_structure => - { 'frameworkcode' => 'char(4) not NULL default \'\'' }, - marc_subfield_structure => { - 'seealso' => 'char(255)', - 'frameworkcode' => 'char(4) not NULL default \'\'', - 'hidden' => 'tinyint(1)', - 'isurl' => 'tinyint(1)', - 'link' => 'char(80)', - }, - bookshelf => { - 'owner' => 'char(80)', - 'category' => 'char(1)', - }, - marc_biblio => { 'frameworkcode' => 'char(4) not NULL default \'\'' }, ->>>>>>> 1.100.2.46 ); my %dropable_table = ( @@ -492,21 +203,10 @@ my %dropable_table = ( ); my %uselessfields = ( -<<<<<<< updatedatabase # tablename => "field1,field2", borrowers => "suburb,altstreetaddress,altsuburb,altcity,studentnumber,school,area,preferredcont,altcp", deletedborrowers=> "suburb,altstreetaddress,altsuburb,altcity,studentnumber,school,area,preferredcont,altcp", ); -======= - aqorders => "requisitionedby,authorisedby,booksellerid, - deliverydays,followupdays, - numberfollowupsallowed,numberfollowupssent, - dateprinted,sourced,quantityreceiveddamaged, - subscriptionfrom,subscriptionto - " -); - ->>>>>>> 1.100.2.46 # the other hash contains other actions that can't be done elsewhere. they are done # either BEFORE of AFTER everything else, depending on "when" entry (default => AFTER) @@ -519,474 +219,39 @@ my %uselessfields = ( # values given in the %tabledata hash. my %tabledata = ( -<<<<<<< updatedatabase # tablename => [ # { uniquefielrequired => 'fieldname', # the primary key in the table # fieldname => fieldvalue, # fieldname2 => fieldvalue2, # }, # ], -======= - userflags => [ - { - uniquefieldrequired => 'bit', - bit => 0, - flag => 'superlibrarian', - flagdesc => 'Access to all librarian functions', - defaulton => 0 - }, - { - uniquefieldrequired => 'bit', - bit => 1, - flag => 'circulate', - flagdesc => 'Circulate books', - defaulton => 0 - }, - { - uniquefieldrequired => 'bit', - bit => 2, - flag => 'catalogue', - flagdesc => 'View Catalogue (Librarian Interface)', - defaulton => 0 - }, - { - uniquefieldrequired => 'bit', - bit => 3, - flag => 'parameters', - flagdesc => 'Set Koha system paramters', - defaulton => 0 - }, - { - uniquefieldrequired => 'bit', - bit => 4, - flag => 'borrowers', - flagdesc => 'Add or modify borrowers', - defaulton => 0 - }, - { - uniquefieldrequired => 'bit', - bit => 5, - flag => 'permissions', - flagdesc => 'Set user permissions', - defaulton => 0 - }, - { - uniquefieldrequired => 'bit', - bit => 6, - flag => 'reserveforothers', - flagdesc => 'Reserve books for patrons', - defaulton => 0 - }, - { - uniquefieldrequired => 'bit', - bit => 7, - flag => 'borrow', - flagdesc => 'Borrow books', - defaulton => 1 - }, - { - uniquefieldrequired => 'bit', - bit => 8, - flag => 'reserveforself', - flagdesc => 'Reserve books for self', - defaulton => 0 - }, - { - uniquefieldrequired => 'bit', - bit => 9, - flag => 'editcatalogue', - flagdesc => 'Edit Catalogue (Modify bibliographic/holdings data)', - defaulton => 0 - }, - { - uniquefieldrequired => 'bit', - bit => 10, - flag => 'updatecharges', - flagdesc => 'Update borrower charges', - defaulton => 0 - }, - { - uniquefieldrequired => 'bit', - bit => 11, - flag => 'acquisition', - flagdesc => 'Acquisition and/or suggestion management', - defaulton => 0 - }, - { - uniquefieldrequired => 'bit', - bit => 12, - flag => 'management', - flagdesc => 'Set library management parameters', - defaulton => 0 - }, - { - uniquefieldrequired => 'bit', - bit => 13, - flag => 'tools', - flagdesc => 'Use tools (export, import, barcodes)', - defaulton => 0 - }, - ], ->>>>>>> 1.100.2.46 systempreferences => [ { uniquefieldrequired => 'variable', -<<<<<<< updatedatabase variable => 'Activate_Log', value => 'On', forceupdate => { 'explanation' => 1, 'type' => 1}, explanation => 'Turn Log Actions on DB On an Off', type => 'YesNo', -======= - forceupdate => { - 'explanation' => 1, - 'type' => 1 - }, - variable => 'LibraryName', - value => -'Koha
Free Software ILS

Koha : a gift, a contribution
in Maori', - explanation => 'Library name as shown on main opac page', - type => '' - ->>>>>>> 1.100.2.46 }, { uniquefieldrequired => 'variable', -<<<<<<< updatedatabase variable => 'IndependantBranches', value => 0, forceupdate => { 'explanation' => 1, 'type' => 1}, explanation => 'Turn Branch independancy management On an Off', type => 'YesNo', -======= - forceupdate => { - 'explanation' => 1, - 'type' => 1 - }, - variable => 'autoMemberNum', - value => '1', - explanation => 'Member number is auto-calculated', - type => 'YesNo' - ->>>>>>> 1.100.2.46 }, { uniquefieldrequired => 'variable', -<<<<<<< updatedatabase variable => 'ReturnBeforeExpiry', value => 'Off', forceupdate => { 'explanation' => 1, 'type' => 1}, explanation => 'If Yes, Returndate on issuing can\'t be after borrower card expiry', type => 'YesNo', -======= - forceupdate => { - 'explanation' => 1, - 'type' => 1, - 'options' => 1 - }, - variable => 'acquisitions', - value => 'normal', - explanation => -'Normal, budget-based acquisitions, or Simple bibliographic-data acquisitions', - type => 'Choice', - options => 'simple|normal' - }, - { - uniquefieldrequired => 'variable', - forceupdate => { - 'explanation' => 1, - 'type' => 1, - 'options' => 1 - }, - variable => 'dateformat', - value => 'metric', - explanation => - 'date format (us mm/dd/yyyy, metric dd/mm/yyy, ISO yyyy/mm/dd)', - type => 'Choice', - options => 'metric|us|iso' - }, - { - uniquefieldrequired => 'variable', - variable => 'template', - forceupdate => { - 'explanation' => 1, - 'type' => 1 - }, - value => 'default', - explanation => 'Preference order for intranet interface templates', - type => 'Themes' - }, - { - uniquefieldrequired => 'variable', - variable => 'autoBarcode', - forceupdate => { - 'explanation' => 1, - 'type' => 1 - }, - value => 'yes', - explanation => 'Barcode is auto-calculated', - type => 'YesNo' - }, - { - uniquefieldrequired => 'variable', - variable => 'insecure', - forceupdate => { - 'explanation' => 1, - 'type' => 1 - }, - value => 'no', - explanation => -'If YES, no auth at all is needed. Be careful if you set this to yes!', - type => 'YesNo' - }, - { - uniquefieldrequired => 'variable', - variable => 'authoritysep', - forceupdate => { - 'explanation' => 1, - 'type' => 1, - 'options' => 1 - }, - value => '--', - explanation => - 'the separator used in authority/thesaurus. Usually --', - type => 'free', - options => '10' - }, - { - uniquefieldrequired => 'variable', - variable => 'opaclanguages', - forceupdate => { - 'explanation' => 1, - 'type' => 1 - }, - value => 'en', - explanation => -'Set the preferred order for translations. The top language will be tried first.', - type => 'Languages' - }, - { - uniquefieldrequired => 'variable', - variable => 'opacthemes', - forceupdate => { - 'explanation' => 1, - 'type' => 1 - }, - value => 'css', - explanation => -'Set the preferred order for themes. The top theme will be tried first.', - type => 'Themes' - }, - { - uniquefieldrequired => 'variable', - variable => 'timeout', - forceupdate => { - 'explanation' => 1, - 'type' => 1 - }, - value => '1200', - explanation => - 'Inactivity timeout for cookies authentication (in seconds)', - type => 'Integer' - }, - { - uniquefieldrequired => 'variable', - variable => 'marc', - forceupdate => { - 'explanation' => 1, - 'type' => 1 - }, - value => 'yes', - explanation => 'Turn on MARC support', - type => 'YesNo' - }, - { - uniquefieldrequired => 'variable', - variable => 'sortbynonfiling', - forceupdate => { - 'explanation' => 1, - 'type' => 1 - }, - value => 'no', - explanation => 'Sort search results by MARC nonfiling characters', - type => 'YesNo' - }, - { - uniquefieldrequired => 'variable', - variable => 'marcflavour', - forceupdate => { - 'explanation' => 1, - 'type' => 1, - 'options' => 1 - }, - value => 'MARC21', - explanation => -'your MARC flavor (MARC21 or UNIMARC) used for character encoding', - type => 'Choice', - options => 'MARC21|UNIMARC' - }, - { - uniquefieldrequired => 'variable', - variable => 'checkdigit', - value => 'none', - forceupdate => { - 'explanation' => 1, - 'type' => 1, - 'options' => 1 - }, - explanation => -'Validity checks on membership number: none or "Katipo" style checks', - type => 'Choice', - options => 'none|katipo' - }, - { - uniquefieldrequired => 'variable', - variable => 'maxoutstanding', - forceupdate => { - 'explanation' => 1, - 'type' => 1 - }, - value => '5', - explanation => - 'maximum amount withstanding to be able make reserves ', - type => 'Integer' - }, - { - uniquefieldrequired => 'variable', - variable => 'maxreserves', - forceupdate => { - 'explanation' => 1, - 'type' => 1 - }, - value => '5', - explanation => 'maximum number of reserves a member can make', - type => 'Integer' - - }, - { - uniquefieldrequired => 'variable', - variable => 'noissuescharge', - forceupdate => { - 'explanation' => 1, - 'type' => 1 - }, - value => '5', - explanation => - 'maximum amount withstanding to be able to check out an item', - type => 'Integer' - - }, - { - uniquefieldrequired => 'variable', - variable => 'KohaAdminEmailAddress', - forceupdate => { - 'explanation' => 1, - 'type' => 1 - }, - value => 'your.mail@here', - explanation => 'the email address where borrowers modifs are sent', - type => 'free' - }, - { - uniquefieldrequired => 'variable', - variable => 'gist', - forceupdate => { - 'explanation' => 1, - 'type' => 1 - }, - value => '0.125', - explanation => - 'the gist rate. NOT in %, but in numeric form (0.12 for 12%)', - type => 'free' - }, - { - uniquefieldrequired => 'variable', - variable => 'printcirculationslips', - forceupdate => { - 'explanation' => 1, - 'type' => 1 - }, - value => '0', - explanation => - 'if set to 1, print circulation slips. If set to 0, don\'t', - type => 'free' - }, - { - uniquefieldrequired => 'variable', - variable => 'suggestion', - forceupdate => { - 'explanation' => 1, - 'type' => 1 - }, - value => '0', - explanation => 'if set to 1, suggestions are activated in OPAC', - type => 'free' - }, - { - uniquefieldrequired => 'variable', - variable => 'ISBD', - forceupdate => { - 'explanation' => 1, - 'type' => 1 - }, - value => 'Fill with appropriate value...', - explanation => 'ISBD', - type => 'free' - }, - { - uniquefieldrequired => 'variable', - variable => 'virtualshelves', - forceupdate => { - 'explanation' => 1, - 'type' => 1 - }, - value => '0', - explanation => 'Set virtual shelves management ON or OFF', - type => 'YesNo' - }, - { - uniquefieldrequired => 'variable', - variable => 'itemcallnumber', - forceupdate => { - 'explanation' => 1, - 'type' => 1 - }, - value => '676a', - explanation => -'The MARC field/subfield that is used to calculate the itemcallnumber (in UNIMARC : 676a for Dewey, 680a for Loc)', - type => 'free' - }, - { - uniquefieldrequired => 'variable', - variable => 'BiblioDefaultView', - value => 'normal', - forceupdate => { - 'explanation' => 1, - 'type' => 1, - 'options' => 1 - }, - explanation => -'Define the default view of a biblio. Can be either normal, marc or isbd', - type => 'Choice', - options => 'normal|marc|isbd' - }, - - { - uniquefieldrequired => 'variable', - variable => 'LabelMARCView', - value => 'standard', - forceupdate => { - 'explanation' => 1, - 'type' => 1, - 'options' => 1 - }, - explanation => 'Define how a MARC record will display', - type => 'Choice', - options => 'standard|economical' ->>>>>>> 1.100.2.46 }, { @@ -1479,7 +744,6 @@ my %tabledata = ( type => 'free', }, { -<<<<<<< updatedatabase uniquefieldrequired => 'variable', variable => 'borrowerRelationship', value => 'father|mother,grand-mother', @@ -1487,14 +751,6 @@ my %tabledata = ( 'type' => 1}, explanation => 'The relationships between a guarantor & a guarantee (separated by | or ,)', type => 'free', -======= - field => 'aqbudgetid', - type => 'tinyint(4)', - null => '', - key => 'PRI', - default => '', - extra => 'auto_increment' ->>>>>>> 1.100.2.46 }, { uniquefieldrequired => 'variable', @@ -1505,11 +761,6 @@ my %tabledata = ( explanation => 'Maximum delay to pick up a reserved document', type => 'free', }, -<<<<<<< updatedatabase -======= - ], - marc_breeding => [ ->>>>>>> 1.100.2.46 { uniquefieldrequired => 'variable', variable => 'TransfersMaxDaysWarning', @@ -1565,7 +816,6 @@ my %tabledata = ( type => 'YesNo', }, ], -<<<<<<< updatedatabase ); @@ -1579,9 +829,6 @@ my %fielddefinitions = ( # }, # ], serial => [ -======= - serial => [ ->>>>>>> 1.100.2.46 { field => 'notes', type => 'TEXT', @@ -1591,7 +838,6 @@ my %fielddefinitions = ( extra => '' }, ], -<<<<<<< updatedatabase aqbasket => [ { field => 'booksellerid', @@ -1882,18 +1128,6 @@ my %indexes = ( type => 'PRIMARY', } ], -======= - biblioitems => [ - { - field => 'dewey', - type => 'varchar(30)', - null => 'NULL', - key => '', - default => '', - extra => '' - }, - ], ->>>>>>> 1.100.2.46 ); my %foreign_keys = ( @@ -2398,49 +1632,7 @@ foreach $table ( keys %dropable_table ) { } } } -<<<<<<< updatedatabase - -======= -unless ( $existingtables{'z3950servers'} ) { - - #MJR: added syntax entries to close bug 624 - print "Adding z3950servers table...\n" unless $silent; - my $sti = $dbh->prepare( - "create table z3950servers ( - host char(255), - port int, - db char(255), - userid char(255), - password char(255), - name text, - id int, - checked smallint, - rank int, - syntax char(80))" - ); - $sti->execute; - $sti = $dbh->prepare( - "insert into z3950servers - values ('z3950.loc.gov', - 7090, - 'voyager', - '', '', - 'Library of Congress', - 1, 1, 1, 'USMARC')" - ); - $sti->execute; -} -unless ( $existingtables{'issuingrules'} ) { - $dbh->do("alter table categoryitem rename issuingrules"); - $dbh->do("ALTER TABLE issuingrules ADD maxissueqty int(4) default NULL"); - $dbh->do("ALTER TABLE issuingrules ADD issuelength int(4) default NULL"); - $dbh->do( - "ALTER TABLE issuingrules ADD branchcode varchar(4) NOT NULL default ''" - ); - print "renaming categoryitem\n" unless $silent; -} ->>>>>>> 1.100.2.46 #--------------------------------- # Columns @@ -2474,7 +1666,6 @@ foreach $table ( keys %requirefields ) { } # foreach table foreach $table ( keys %fielddefinitions ) { -<<<<<<< updatedatabase print "Check table $table\n" if $debug; $sth = $dbh->prepare("show columns from $table"); $sth->execute(); @@ -2535,402 +1726,8 @@ foreach $table ( keys %fielddefinitions ) { print " alter or create $field in $table\n" unless $silent; } } -======= - print "Check table $table\n" if $debug; - $sth = $dbh->prepare("show columns from $table"); - $sth->execute(); - my $definitions; - while ( ( $column, $type, $null, $key, $default, $extra ) = $sth->fetchrow ) - { - $definitions->{$column}->{type} = $type; - $definitions->{$column}->{null} = $null; - $definitions->{$column}->{null} = 'NULL' if $null eq 'YES'; - $definitions->{$column}->{key} = $key; - $definitions->{$column}->{default} = $default; - $definitions->{$column}->{extra} = $extra; - } # while - my $fieldrow = $fielddefinitions{$table}; - foreach my $row (@$fieldrow) { - my $field = $row->{field}; - my $type = $row->{type}; - my $key = $row->{key}; - my $default = $row->{default}; - my $null = $row->{null}; - - # $default="''" unless $default; - my $extra = $row->{extra}; - my $def = $definitions->{$field}; - - unless ( $type eq $def->{type} - && $null eq $def->{null} - && $key eq $def->{key} - && $extra eq $def->{extra} ) - { - if ( $null eq '' ) { - $null = 'NOT NULL'; - } - if ( $key eq 'PRI' ) { - $key = 'PRIMARY KEY'; - } - unless ( $extra eq 'auto_increment' ) { - $extra = ''; - } - - # if it's a new column use "add", if it's an old one, use "change". - my $action; - if ( $definitions->{$field}->{type} ) { - $action = "change $field"; - } - else { - $action = "add"; - } - - # if it's a primary key, drop the previous pk, before altering the table - my $sth; - if ( $key ne 'PRIMARY KEY' ) { - $sth = - $dbh->prepare( -"alter table $table $action $field $type $null $key $extra default ?" - ); - } - else { - $sth = - $dbh->prepare( -"alter table $table drop primary key, $action $field $type $null $key $extra default ?" - ); - } - $sth->execute($default); - print " Alter $field in $table\n" unless $silent; - } - } ->>>>>>> 1.100.2.46 -} - -<<<<<<< updatedatabase -======= -# Get list of columns from borrowers table -my %itemtypes; -my %nullenabled; -$sth = $dbh->prepare("show columns from borrowers"); -$sth->execute; -while ( my ( $column, $type, $null, $key, $default, $extra ) = $sth->fetchrow ) -{ - $itemtypes{$column} = $type; - $nullenabled{$column} = $null; -} - -unless ( $itemtypes{'cardnumber'} eq 'varchar(20)' ) { - $itemtypes{'cardnumber'} =~ /varchar\((\d+)\)/; - my $oldlength = $1; - if ( $oldlength < 16 ) { - print -"Setting maximum cardnumber length to 16 (was $oldlength) and marking unique.\n" - unless $silent; - my $sti = - $dbh->prepare( - "alter table borrowers change cardnumber cardnumber varchar(16)"); - $sti->execute; - $sti->finish; - $sti = $dbh->prepare("alter table borrowers drop index cardnumber"); - $sti->execute; - $sti->finish; - $sti = $dbh->prepare("alter table borrowers add unique(cardnumber)"); - $sti->execute; - $sti->finish; - } -} - -# -# Get list of columns from items table -$sth = $dbh->prepare("show columns from items"); -$sth->execute; -while ( my ( $column, $type, $null, $key, $default, $extra ) = $sth->fetchrow ) -{ - $itemtypes{$column} = $type; - $nullenabled{$column} = $null; -} - -unless ( $itemtypes{'barcode'} eq 'varchar(20)' ) { - $itemtypes{'barcode'} =~ /varchar\((\d+)\)/; - my $oldlength = $1; - if ( $oldlength < 20 ) { - print "Setting maximum barcode length to 20 (was $oldlength).\n" - unless $silent; - my $sti = - $dbh->prepare("alter table items change barcode barcode varchar(20)"); - $sti->execute; - } -} - -# -# dropping unique barcode index & setting barcode to null allowed. -# -$sth = $dbh->prepare("show index from items"); -$sth->execute; -while ( - my ( - $table, $non_unique, $key_name, $Seq_in_index, - $Column_name, $Collation, $cardinality, $sub_part, - $Packed, $comment - ) - = $sth->fetchrow - ) -{ - if ( $key_name eq 'barcode' && $non_unique eq 0 ) { - print "dropping BARCODE index to enable empty barcodes\n" - unless $silent; - $dbh->do("ALTER TABLE `items` DROP INDEX `barcode`"); - } -} -$dbh->do("ALTER TABLE `items` CHANGE `barcode` `barcode` VARCHAR( 20 )") - unless ( $nullenabled{barcode} eq 'YES' ); - -# -# creating fulltext index in bibliothesaurus if needed -# -$sth = $dbh->prepare("show index from bibliothesaurus"); -$sth->execute; -my $exists = 0; -while ( - my ( - $table, $non_unique, $key_name, $Seq_in_index, - $Column_name, $Collation, $cardinality, $sub_part, - $Packed, $comment - ) - = $sth->fetchrow - ) -{ - if ( $key_name eq 'category_2' ) { - $exists = 1; - } -} -print "Creating fulltext index on bibliothesaurus\n" unless $exists or $silent; -$dbh->do( - 'create fulltext index category_2 on bibliothesaurus (category,freelib)') - unless $exists; - -# -# creating index in z3950results if needed -# -$sth = $dbh->prepare("show index from z3950results"); -$sth->execute; -my $exists = 0; -while ( - my ( - $table, $non_unique, $key_name, $Seq_in_index, - $Column_name, $Collation, $cardinality, $sub_part, - $Packed, $comment - ) - = $sth->fetchrow - ) -{ - if ( $key_name eq 'query_server' ) { - $exists = 1; - } -} -print "Creating index on z3950results\n" unless $exists or $silent; -$dbh->do('create unique index query_server on z3950results (queryid,server)') - unless $exists; - -# changing z3950daemon field to NULL in marc_breeding -$dbh->do( -"ALTER TABLE `marc_breeding` CHANGE `z3950random` `z3950random` VARCHAR( 40 )" -); - -# making borrowernumber an auto_increment field -$dbh->do( -"ALTER TABLE `borrowers` CHANGE `borrowernumber` `borrowernumber` INTEGER auto_increment" -); - -# changing indexes in marc_*_structure to use frameworkcode -$dbh->do('alter table marc_subfield_structure drop index tab'); -$dbh->do('create index tab on marc_subfield_structure (frameworkcode,tab)'); -$dbh->do('alter table marc_subfield_structure drop index kohafield'); -$dbh->do( -'create index kohafield on marc_subfield_structure (frameworkcode,kohafield)' -); - -# extending the timestamp in branchtransfers... -my %branchtransfers; - -$sth = $dbh->prepare("show columns from branchtransfers"); -$sth->execute; -while ( my ( $column, $type, $null, $key, $default, $extra ) = $sth->fetchrow ) -{ - $branchtransfers{$column} = $type; -} - -unless ( $branchtransfers{'datesent'} eq 'datetime' ) { - print "Setting type of datesent in branchtransfers to datetime.\n" - unless $silent; - my $sti = - $dbh->prepare( - "alter table branchtransfers change datesent datesent datetime"); - $sti->execute; -} - -unless ( $branchtransfers{'datearrived'} eq 'datetime' ) { - print "Setting type of datearrived in branchtransfers to datetime.\n" - unless $silent; - my $sti = - $dbh->prepare( - "alter table branchtransfers change datearrived datearrived datetime"); - $sti->execute; -} - -# changing the branchcategories table around... -my %branchcategories; - -$sth = $dbh->prepare("show columns from branchcategories"); -$sth->execute; -while ( my ( $column, $type, $null, $key, $default, $extra ) = $sth->fetchrow ) -{ - $branchcategories{$column} = $type; -} - -unless ( $branchcategories{'categorycode'} eq 'varchar(4)' ) { - print -"Setting type of categorycode in branchcategories to varchar(4),\n and making the primary key.\n" - unless $silent; - my $sti = - $dbh->prepare( -"alter table branchcategories change categorycode categorycode varchar(4) not null" - ); - $sti->execute; - $sti = - $dbh->prepare( - "alter table branchcategories add primary key (categorycode)"); - $sti->execute; -} - -unless ( $branchcategories{'categoryname'} eq 'text' ) { - print "Changing branchcode in branchcategories to categoryname text.\n" - unless $silent; - my $sth = - $dbh->prepare( - "alter table branchcategories change branchcode categoryname text"); - $sth->execute; -} - -unless ( $branchcategories{'codedescription'} eq 'text' ) { - print - "Replacing branchholding in branchcategories with codedescription text.\n" - unless $silent; - my $sth = - $dbh->prepare( - "alter table branchcategories change branchholding codedescription text" - ); - $sth->execute; -} - -# changing the items table around... -my %items; - -$sth = $dbh->prepare("show columns from items"); -$sth->execute; -while ( my ( $column, $type, $null, $key, $default, $extra ) = $sth->fetchrow ) -{ - $items{$column} = $type; -} - -if ( $items{'bulk'} eq "varchar(30)" ) { - print " Setting callnumber in items table\n" unless $silent; - my $sti = - $dbh->prepare( -"ALTER TABLE `items` CHANGE `bulk` `itemcallnumber` VARCHAR( 30 ) DEFAULT NULL" - ); - $sti->execute; - $sti = - $dbh->prepare( -"update marc_subfield_structure set kohafield=\"items.itemcallnumber\" where kohafield=\"items.bulk\"" - ); - $sti->execute; -} - -# changing the marc_subfield_structure table around... -my %marc_subfield_structure; - -$sth = $dbh->prepare("show columns from marc_subfield_structure"); -$sth->execute; -while ( my ( $column, $type, $null, $key, $default, $extra ) = $sth->fetchrow ) -{ - $marc_subfield_structure{$column} = $type; -} - -if ( $marc_subfield_structure{thesaurus_category} ) { - print " changing thesaurus_category in marc_subfield_structure table\n" - unless $silent; - my $sti = - $dbh->prepare( -"ALTER TABLE marc_subfield_structure CHANGE `thesaurus_category` `authtypecode` VARCHAR(10 ) DEFAULT NULL" - ); - $sti->execute; -} - -# -# creating index in issuingrules if needed -# -$sth = $dbh->prepare("show index from issuingrules"); -$sth->execute; -my $exists = 0; -while ( - my ( - $table, $non_unique, $key_name, $Seq_in_index, - $Column_name, $Collation, $cardinality, $sub_part, - $Packed, $comment - ) - = $sth->fetchrow - ) -{ - if ( $key_name eq 'PRIMARY' ) { - $exists = 1; - } -} -print "Creating index on issuing rules\n" unless $exists or $silent; -$dbh->do( -'ALTER TABLE issuingrules ADD PRIMARY KEY ( branchcode, categorycode, itemtype )' - ) - unless $exists; - -$dbh->do('ALTER TABLE marc_tag_structure drop primary key'); -$dbh->do( - 'ALTER TABLE marc_tag_structure ADD PRIMARY KEY ( frameworkcode, tagfield )' -); - -$dbh->do('ALTER TABLE marc_subfield_structure drop primary key'); -$dbh->do( -'ALTER TABLE marc_subfield_structure ADD PRIMARY KEY ( frameworkcode, tagfield, tagsubfield )' -); - -$dbh->do( -"alter table marc_subfield_table change tagorder tagorder int not null default '1'" -); - -# Get list of columns from marc_word table -my %marc_word; -my %nullenabled; -$sth = $dbh->prepare("show columns from marc_word"); -$sth->execute; -while ( my ( $column, $type, $null, $key, $default, $extra ) = $sth->fetchrow ) -{ - $marc_word{$column} = $type; - $nullenabled{$column} = $null; -} -if ( $marc_word{subfieldid} ) { - - #create field tagsubfield, copy tag+subfieldid, then drop tag and subfieldid - print "Modifying marc_word (concat on tag and subfield for better perfs)\n" - unless $silent; - $dbh->do( -"ALTER TABLE `marc_word` ADD `tagsubfield` CHAR( 4 ) NOT NULL AFTER `bibid`" - ); - $dbh->do("update marc_word set tagsubfield=concat(tag,subfieldid)"); - $dbh->do("alter table marc_word drop tag"); - $dbh->do("alter table marc_word drop subfieldid"); - $dbh->do("create index Search_Marc on marc_word (tagsubfield,word)"); } ->>>>>>> 1.100.2.46 # Populate tables with required data # synch table and deletedtable. @@ -2967,47 +1764,6 @@ foreach my $table ( ( 'borrowers', 'items', 'biblio', 'biblioitems' ) ) { } } -<<<<<<< updatedatabase -======= -# fill aqbasket if it's empty and aqorder is not -# => it means it has just been created & must be filled -$sth = $dbh->prepare("select count(*) from aqbasket"); -$sth->execute; -if ( $sth->fetchrow == 0 ) { - $sth = $dbh->prepare("select count(*) from aqorders"); - $sth->execute; - if ( $sth->fetchrow > 0 ) { - print "Populating new table aqbasket\n"; - print -"IMPORTANT NOTE: error message \"Duplicate entry 'X' for key 1\" may appear. it should not be a real trouble\n"; - $sth = - $dbh->prepare( -"select distinct basketno,booksellerid,authorisedby,entrydate,booksellerinvoicenumber from aqorders" - ); - $sth->execute; - my ( $basketno, $booksellerid, $authorisedby, $entrydate, - $booksellerinvoicenumber ); - my $sth2 = - $dbh->prepare( -"insert into aqbasket (basketno,creationdate,booksellerid,authorisedby,booksellerinvoicenumber) values (?,?,?,?,?)" - ); - while ( - ( - $basketno, $booksellerid, - $authorisedby, $entrydate, - $booksellerinvoicenumber - ) - = $sth->fetchrow - ) - { - print -"$basketno,$entrydate,$booksellerid,$authorisedby,$booksellerinvoicenumber\n"; - $sth2->execute( $basketno, $entrydate, $booksellerid, $authorisedby, - $booksellerinvoicenumber ); - } - } -} ->>>>>>> 1.100.2.46 foreach my $table ( keys %tabledata ) { print "Checking for data required in table $table...\n" unless $silent; my $tablerows = $tabledata{$table}; @@ -3020,7 +1776,6 @@ foreach my $table ( keys %tabledata ) { "select $uniquefieldrequired from $table where $uniquefieldrequired=?" ); $sth->execute($uniquevalue); -<<<<<<< updatedatabase if ($sth->rows) { foreach my $field (keys %$forceupdate) { if ($forceupdate->{$field}) { @@ -3195,42 +1950,6 @@ unless ($marcdone) { print "\r$totaldone / $totaltodo" unless ($totaldone % 100); } print "\rdone\n"; -======= - if ( $sth->rows ) { - foreach my $field ( keys %$forceupdate ) { - if ( $forceupdate->{$field} ) { - my $sth = - $dbh->prepare( -"update systempreferences set $field=? where $uniquefieldrequired=?" - ); - $sth->execute( $row->{$field}, $uniquevalue ); - } - } - } - else { - print "Adding row to $table: " unless $silent; - my @values; - my $fieldlist; - my $placeholders; - foreach my $field ( keys %$row ) { - next if $field eq 'uniquefieldrequired'; - next if $field eq 'forceupdate'; - my $value = $row->{$field}; - push @values, $value; - print " $field => $value" unless $silent; - $fieldlist .= "$field,"; - $placeholders .= "?,"; - } - print "\n" unless $silent; - $fieldlist =~ s/,$//; - $placeholders =~ s/,$//; - my $sth = - $dbh->prepare( - "insert into $table ($fieldlist) values ($placeholders)"); - $sth->execute(@values); - } - } ->>>>>>> 1.100.2.46 } @@ -3258,7 +1977,6 @@ foreach $table ( keys %uselessfields ) { } } # foreach -<<<<<<< updatedatabase # MOVE all tables TO UTF-8 and innoDB $sth = $dbh->prepare("show table status"); @@ -3277,8 +1995,6 @@ while ( my $table = $sth->fetchrow_hashref ) { } } -======= ->>>>>>> 1.100.2.46 $sth->finish; # @@ -3448,10 +2164,12 @@ sub MARCgetitem { exit; # $Log$ +# Revision 1.154 2006/07/17 12:28:45 toins +# sync with rel_2_2 +# # Revision 1.153 2006/07/04 14:36:52 toins # Head & rel_2_2 merged # -<<<<<<< updatedatabase # Revision 1.152 2006/06/27 09:26:37 btoumi # modify (initials,phone ) fields property in borrowers and deletedborrowers table # @@ -3525,141 +2243,6 @@ exit; # # Revision 1.136 2006/04/17 21:55:33 sushi # Added 'labels' and 'labels_conf' tables, for spine lable tool. -======= -# Revision 1.100.2.46 2006/06/20 18:02:23 oleonard -# Fixing two minor typos -# -# Revision 1.100.2.45 2006/06/13 12:34:15 hdl -# Adding publication date to issues arrival. So that two dates can be used. -# -# Revision 1.100.2.44 2006/06/02 15:21:40 tipaul -# moving dewey to a varchar -# -# Revision 1.100.2.43 2006/04/27 18:07:40 oleonard -# Adding two new system preferences: -# -# 1. opacuserlogin shows/hides login-based features like reserves, private shelves, and login forms. On by default. -# 2. opacbookbag shows/hides the book bag (biblio basket). On by default. -# -# Revision 1.100.2.42 2006/04/22 13:52:12 oleonard -# Adding opacheader and IntranetBiblioDefaultView system preferences -# -# Revision 1.100.2.41 2006/04/21 08:54:55 hdl -# Adding two new sysprefs : -# - z3950NormalizeAuthor of type YesNo. Set this to yes if you want author field to be filled with authorities fields when importing biblio in z3950 -# - z3950AuthorAuthfields, free text : type in comma-separated list of fields to search for author names for AuthorNormalization. -# -# Adding a feature on a Z3950 import. -# You can now automatically fill author with person name authority contained in the biblio if sysprefs are filled. -# -# Revision 1.100.2.40 2006/04/18 09:34:15 plg -# bug fixed: typo fixed in labels and labels_conf tables creation query. -# -# Revision 1.100.2.39 2006/04/17 21:19:52 sushi -# Added labels, and label_conf tables for spine labels tool. -# -# Revision 1.100.2.38 2006/04/05 14:58:04 kados -# adding TemplateEncoding syspref: allows librarian to specify the -# encoding to use on templates. -# -# Revision 1.100.2.37 2006/04/04 13:54:10 tipaul -# advancedMARCeditor systempref management -# -# Revision 1.100.2.36 2006/03/18 22:55:26 kados -# add syspref for the MARC Organization Code of the library -# -# Revision 1.100.2.35 2006/03/08 17:50:55 kados -# Modifying patronimages: now it can be used to specify the file extension -# of the images (to avoid hard-codeing in templates). -# -# Revision 1.100.2.34 2006/03/08 13:28:23 tipaul -# changing the size of some new systempref to a bloc (more convenient) -# -# Revision 1.100.2.33 2006/03/04 06:05:13 kados -# New syspref: AnonSuggestions to allow an anonymous patron to make a -# suggestion (requested by NPL). To enable, set to the borrowernumber -# of the anonymous patron (must be created). -# -# Revision 1.100.2.32 2006/03/03 16:20:23 kados -# hopefully fixes truncated amazon.com links in syspref -# ---------------------------------------------------------------------- -# -# Revision 1.100.2.31 2006/03/01 21:44:16 kados -# Adds 'opacreadinghistory' syspref for turning this on/off for libraries -# who are scared of their government (ie, in countries where there a -# patriot act) :-) -# -# Revision 1.100.2.30 2006/03/01 15:52:13 kados -# Whoops ... should have checked, that name is already used. Changed it to -# opaclanguagesdisplay. -# -# Revision 1.100.2.29 2006/03/01 15:51:28 kados -# adds opaclanguages syspref, which allows turning on/off the display of -# the languages pref on OPAC (default is on) -# -# Revision 1.100.2.28 2006/03/01 15:38:53 kados -# Adding patronimages syspref. Adding opaclayoutstylesheet. Some explainations -# are in order: -# -# Right now there are three stylesheet sysprefs: -# -# opacstylesheet - an external stylesheet specified by URL (replaces all other -# stylesheets) -# -# opaccolorstylesheet - local stylesheet specified by filename -# opaclayoutstylesheet - local stylesheet specified by filename -# -# Revision 1.100.2.27 2006/02/27 15:40:32 tipaul -# setting serialadditems systempreference to 0 by default : no behaviour change when upgrading Koha -# -# Revision 1.100.2.26 2006/02/23 03:19:48 kados -# Adds the 'sortbynonfiling' systempref. With this enabled, Koha will -# correctly sort title searches according to the nonfiling characters -# in the MARC records. -# -# Revision 1.100.2.25 2006/02/21 20:00:13 kados -# setting default value for LabelMARCView to 'standard' -# ---------------------------------------------------------------------- -# -# Revision 1.100.2.24 2006/02/21 18:40:08 kados -# Adding LabeledMARCView systempref to choose whether tags are displayed -# in standard or economical format. Later, this can be used to display -# 'strict' format with no labels for insane librarians who want that. -# -# Revision 1.100.2.23 2006/02/07 15:33:35 hdl -# Adding a new system preference : serialsadditem -# -# Adding two functions in Biblio.pm : getitemlocation and getitemstatus (helpful to get location list and status list, status is supposed to be in relation with items.notforloan) -# -# Adding a new function in Bull.pm : serialsitemize which take serial id and item information and creates the item -# Modifying statecollection to add a new line (used for data input) -# -# Revision 1.100.2.22 2006/02/05 21:53:54 kados -# Adds database support for IntranetNav systempref -- used to add HTML -# tags to left-hand navigation menu on Intranet. -# ---------------------------------------------------------------------- -# -# Revision 1.100.2.21 2006/02/04 18:17:00 kados -# Adds opaccolorstylesheet, intranetstylesheet, intranetcolorstylesheet -# to systemprefs. -# -# Revision 1.100.2.20 2006/02/04 05:16:40 kados -# Allows putting credits at bottom of OPAC page -# -# Revision 1.100.2.19 2006/02/04 01:44:59 kados -# Adds Fully Preferences-based Amazon.com feature. See mail to koha-devel -# for details. -# -# Revision 1.100.2.18 2006/02/03 23:12:23 kados -# Adds system prefs for using Amazon.com content in the OPAC -# -# Revision 1.100.2.17 2006/02/03 20:55:16 kados -# Adding a new system preference: OpacNav. Can be used to add HTML -# navigation links to the left-hand navbar in the OPAC. -# -# Revision 1.100.2.16 2005/12/30 11:13:29 tipaul -# * tool to synchronise TABLE and deletedTABLE structures in updatedatabase ->>>>>>> 1.100.2.46 # # Revision 1.135 2006/04/15 02:37:03 tgarip1957 # Marc record should be set to UTF-8 in leader.Force it. -- 2.39.5