Lines 8083-8088
if ( CheckVersion($DBversion) ) {
Link Here
|
8083 |
SetVersion($DBversion); |
8083 |
SetVersion($DBversion); |
8084 |
} |
8084 |
} |
8085 |
|
8085 |
|
|
|
8086 |
$DBversion = "3.15.00.XXX"; |
8087 |
if ( CheckVersion($DBversion) ) { |
8088 |
#insert a notice for sharing a list and accepting a share |
8089 |
$dbh->do(" |
8090 |
INSERT INTO letter (module, code, branchcode, name, is_html, title, content) |
8091 |
VALUES ( 'members', 'SHARE_INVITE', '', 'Invitation for sharing a list', '0', 'Share list <<listname>>', 'Dear patron, |
8092 |
|
8093 |
One of our patrons, <<borrowers.firstname>> <<borrowers.surname>>, invites you to share his list <<listname>> in our library catalog. |
8094 |
|
8095 |
To access this shared list, please click on the following URL or copy-and-paste it into your browser address bar. |
8096 |
|
8097 |
<<shareurl>> |
8098 |
|
8099 |
In case you are not a patron in our library or do not want to accept this invitation, please ignore this mail. Note also that this invitation expires within two weeks. |
8100 |
|
8101 |
Thank you. |
8102 |
|
8103 |
Your library.' |
8104 |
)"); |
8105 |
$dbh->do(" |
8106 |
INSERT INTO letter (module, code, branchcode, name, is_html, title, content) |
8107 |
VALUES ( 'members', 'SHARE_ACCEPT', '', 'Notification about an accepted share', '0', 'Share on list <<listname>> accepted', 'Dear patron, |
8108 |
|
8109 |
We want to inform you that <<borrowers.firstname>> <<borrowers.surname>> accepted your invitation to share your list <<listname>> in our library catalog. |
8110 |
|
8111 |
Thank you. |
8112 |
|
8113 |
Your library.' |
8114 |
)"); |
8115 |
print "Upgrade to $DBversion done (Bug 9032: Share a list)\n"; |
8116 |
SetVersion($DBversion); |
8117 |
} |
8118 |
|
8119 |
|
8086 |
=head1 FUNCTIONS |
8120 |
=head1 FUNCTIONS |
8087 |
|
8121 |
|
8088 |
=head2 TableExists($table) |
8122 |
=head2 TableExists($table) |
8089 |
- |
|
|