View | Details | Raw Unified | Return to bug 18595
Collapse All | Expand All

(-)a/C4/Auth_with_ldap.pm (-1 lines)
Lines 21-27 use Modern::Perl; Link Here
21
use Carp qw( croak );
21
use Carp qw( croak );
22
22
23
use C4::Context;
23
use C4::Context;
24
use C4::Members::Messaging;
25
use C4::Auth qw( checkpw_internal );
24
use C4::Auth qw( checkpw_internal );
26
use C4::Letters qw( GetPreparedLetter EnqueueLetter SendQueuedMessages );
25
use C4::Letters qw( GetPreparedLetter EnqueueLetter SendQueuedMessages );
27
use Koha::Patrons;
26
use Koha::Patrons;
(-)a/C4/Auth_with_shibboleth.pm (-1 lines)
Lines 24-30 use Koha::AuthUtils qw( get_script_name ); Link Here
24
use Koha::Database;
24
use Koha::Database;
25
use Koha::Patrons;
25
use Koha::Patrons;
26
use C4::Letters qw( GetPreparedLetter EnqueueLetter SendQueuedMessages );
26
use C4::Letters qw( GetPreparedLetter EnqueueLetter SendQueuedMessages );
27
use C4::Members::Messaging;
28
use Carp qw( carp );
27
use Carp qw( carp );
29
use List::MoreUtils qw( any );
28
use List::MoreUtils qw( any );
30
29
(-)a/C4/Form/MessagingPreferences.pm (-2 / +1 lines)
Lines 22-28 use warnings; Link Here
22
22
23
use CGI qw ( -utf8 );
23
use CGI qw ( -utf8 );
24
use C4::Context;
24
use C4::Context;
25
use C4::Members::Messaging;
26
use Koha::Patron::MessagePreferences;
25
use Koha::Patron::MessagePreferences;
27
use Koha::Patrons;
26
use Koha::Patrons;
28
27
Lines 177-183 sub set_form_values { Link Here
177
176
178
=head1 SEE ALSO
177
=head1 SEE ALSO
179
178
180
L<C4::Members::Messaging>, F<admin/categories.pl>, F<opac/opac-messaging.pl>, F<members/messaging.pl>
179
L<Koha::Patron::MessagePreference>, F<admin/categories.pl>, F<opac/opac-messaging.pl>, F<members/messaging.pl>
181
180
182
=head1 AUTHOR
181
=head1 AUTHOR
183
182
(-)a/C4/Members/Messaging.pm (-95 lines)
Lines 1-95 Link Here
1
package C4::Members::Messaging;
2
3
# Copyright (C) 2008 LibLime
4
#
5
# This file is part of Koha.
6
#
7
# Koha is free software; you can redistribute it and/or modify it
8
# under the terms of the GNU General Public License as published by
9
# the Free Software Foundation; either version 3 of the License, or
10
# (at your option) any later version.
11
#
12
# Koha is distributed in the hope that it will be useful, but
13
# WITHOUT ANY WARRANTY; without even the implied warranty of
14
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15
# GNU General Public License for more details.
16
#
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
20
use strict;
21
use warnings;
22
use C4::Context;
23
24
=head1 NAME
25
26
C4::Members::Messaging - manage patron messaging preferences
27
28
=head1 SYNOPSIS
29
30
  use C4::Members::Messaging
31
32
=head1 DESCRIPTION
33
34
This module lets you modify a patron's messaging preferences.
35
36
=head1 TABLES
37
38
=head2 message_queue
39
40
The actual messages which will be sent via a cron job running
41
F<misc/cronjobs/process_message_queue.pl>.
42
43
=head2 message_attributes
44
45
What kinds of messages can be sent?
46
47
=head2 message_transport_types
48
49
What transports can messages be sent vith?  (email, sms, etc.)
50
51
=head2 message_transports
52
53
How are message_attributes and message_transport_types correlated?
54
55
=head2 borrower_message_preferences
56
57
What messages do the borrowers want to receive?
58
59
=head2 borrower_message_transport_preferences
60
61
What transport should a message be sent with?
62
63
=head1 CONFIG
64
65
=head2 Adding a New Kind of Message to the System
66
67
=over 4
68
69
=item 1.
70
71
Add a new template to the `letter` table.
72
73
=item 2.
74
75
Insert a row into the `message_attributes` table.
76
77
=item 3.
78
79
Insert rows into `message_transports` for each message_transport_type.
80
81
=back
82
83
=head1 SEE ALSO
84
85
L<C4::Letters>
86
87
=head1 AUTHOR
88
89
Koha Development Team <http://koha-community.org/>
90
91
Andrew Moore <andrew.moore@liblime.com>
92
93
=cut
94
95
1;
(-)a/C4/Message.pm (-1 / +1 lines)
Lines 404-410 sub DESTROY { } Link Here
404
404
405
=head1 SEE ALSO
405
=head1 SEE ALSO
406
406
407
L<C4::Circulation>, L<C4::Letters>, L<C4::Members::Messaging>
407
L<C4::Circulation>, L<C4::Letters>, L<Koha::Patron::MessagePreference>
408
408
409
=head1 AUTHOR
409
=head1 AUTHOR
410
410
(-)a/C4/Reserves.pm (-1 lines)
Lines 30-36 use C4::Context; Link Here
30
use C4::Items qw( CartToShelf get_hostitemnumbers_of );
30
use C4::Items qw( CartToShelf get_hostitemnumbers_of );
31
use C4::Letters;
31
use C4::Letters;
32
use C4::Log qw( logaction );
32
use C4::Log qw( logaction );
33
use C4::Members::Messaging;
34
use C4::Members;
33
use C4::Members;
35
use Koha::Account::Lines;
34
use Koha::Account::Lines;
36
use Koha::BackgroundJob::BatchUpdateBiblioHoldsQueue;
35
use Koha::BackgroundJob::BatchUpdateBiblioHoldsQueue;
(-)a/Koha/Patron/Category.pm (-2 lines)
Lines 19-26 use Modern::Perl; Link Here
19
19
20
use List::MoreUtils qw( any );
20
use List::MoreUtils qw( any );
21
21
22
use C4::Members::Messaging;
23
24
use Koha::Database;
22
use Koha::Database;
25
use Koha::DateUtils qw( dt_from_string );
23
use Koha::DateUtils qw( dt_from_string );
26
use Koha::Patron::MessagePreferences;
24
use Koha::Patron::MessagePreferences;
(-)a/circ/returns.pl (-1 lines)
Lines 38-44 use C4::Auth qw( get_template_and_user get_session haspermission ); Link Here
38
use C4::Circulation qw( barcodedecode GetBranchItemRule AddReturn updateWrongTransfer LostItem );
38
use C4::Circulation qw( barcodedecode GetBranchItemRule AddReturn updateWrongTransfer LostItem );
39
use C4::Context;
39
use C4::Context;
40
use C4::Items qw( ModItemTransfer );
40
use C4::Items qw( ModItemTransfer );
41
use C4::Members::Messaging;
42
use C4::Members;
41
use C4::Members;
43
use C4::Output qw( output_html_with_http_headers );
42
use C4::Output qw( output_html_with_http_headers );
44
use C4::Reserves qw( ModReserve ModReserveAffect GetOtherReserves );
43
use C4::Reserves qw( ModReserve ModReserveAffect GetOtherReserves );
(-)a/misc/cronjobs/advance_notices.pl (-1 lines)
Lines 44-50 use Koha::Script -cron; Link Here
44
use C4::Context;
44
use C4::Context;
45
use C4::Letters;
45
use C4::Letters;
46
use C4::Members;
46
use C4::Members;
47
use C4::Members::Messaging;
48
use C4::Log qw( cronlogaction );
47
use C4::Log qw( cronlogaction );
49
use Koha::Items;
48
use Koha::Items;
50
use Koha::Libraries;
49
use Koha::Libraries;
(-)a/misc/maintenance/borrowers-force-messaging-defaults.pl (-1 lines)
Lines 22-28 use warnings; Link Here
22
22
23
use Koha::Script;
23
use Koha::Script;
24
use C4::Context;
24
use C4::Context;
25
use C4::Members::Messaging;
26
use Getopt::Long qw( GetOptions );
25
use Getopt::Long qw( GetOptions );
27
use Pod::Usage qw( pod2usage );
26
use Pod::Usage qw( pod2usage );
28
use Koha::Patrons;
27
use Koha::Patrons;
(-)a/opac/opac-messaging.pl (-1 lines)
Lines 24-30 use CGI qw ( -utf8 ); Link Here
24
use C4::Auth qw( get_template_and_user );
24
use C4::Auth qw( get_template_and_user );
25
use C4::Context;
25
use C4::Context;
26
use C4::Output qw( output_html_with_http_headers );
26
use C4::Output qw( output_html_with_http_headers );
27
use C4::Members::Messaging;
28
use C4::Form::MessagingPreferences;
27
use C4::Form::MessagingPreferences;
29
use Koha::Patrons;
28
use Koha::Patrons;
30
use Koha::SMS::Providers;
29
use Koha::SMS::Providers;
(-)a/t/Members_Messaging.t (-15 lines)
Lines 1-14 Link Here
1
#!/usr/bin/perl
2
#
3
# This Koha test module is a stub!  
4
# Add more tests here!!!
5
6
use strict;
7
use warnings;
8
9
use Test::More tests => 1;
10
11
BEGIN {
12
        use_ok('C4::Members::Messaging');
13
}
14
15
- 

Return to bug 18595