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

(-)a/C4/Acquisition.pm (-18 / +18 lines)
Lines 95-101 BEGIN { Link Here
95
    );
95
    );
96
}
96
}
97
97
98
=head2 GetOrderFromItemnumber
98
=head1 NAME
99
100
C4::Acquisition - Koha functions for dealing with orders and acquisitions
101
102
=head1 SYNOPSIS
103
104
use C4::Acquisition;
105
106
=head1 DESCRIPTION
107
108
The functions in this module deal with acquisitions, managing book
109
orders, basket and parcels.
110
111
=head1 FUNCTIONS
112
113
=head2 FUNCTIONS ABOUT BASKETS
114
115
=head3 GetOrderFromItemnumber
99
116
100
Missing POD for GetOrderFromItemnumber.
117
Missing POD for GetOrderFromItemnumber.
101
118
Lines 121-143 sub GetOrderFromItemnumber { Link Here
121
138
122
}
139
}
123
140
124
=head1 NAME
125
126
C4::Acquisition - Koha functions for dealing with orders and acquisitions
127
128
=head1 SYNOPSIS
129
130
use C4::Acquisition;
131
132
=head1 DESCRIPTION
133
134
The functions in this module deal with acquisitions, managing book
135
orders, basket and parcels.
136
137
=head1 FUNCTIONS
138
139
=head2 FUNCTIONS ABOUT BASKETS
140
141
=head3 GetBasket
141
=head3 GetBasket
142
142
143
  $aqbasket = &GetBasket($basketnumber);
143
  $aqbasket = &GetBasket($basketnumber);
(-)a/C4/Auth.pm (-15 / +40 lines)
Lines 62-82 use Koha::Session; Link Here
62
use vars qw($ldap $cas $caslogout);
62
use vars qw($ldap $cas $caslogout);
63
our ( @ISA, @EXPORT_OK );
63
our ( @ISA, @EXPORT_OK );
64
64
65
#NOTE: The utility of keeping the safe_exit function is that it can be easily re-defined in unit tests and plugins
66
67
=head2 safe_exit
68
69
Missing POD for safe_exit.
70
71
=cut
72
73
sub safe_exit {
74
75
    # It's fine for us to "exit" because CGI::Compile (used in Plack::App::WrapCGI) redefines "exit" for us automatically.
76
    # Since we only seem to use C4::Auth::safe_exit in a CGI context, we don't actually need PSGI detection at all here.
77
    exit;
78
}
79
80
BEGIN {
65
BEGIN {
81
    C4::Context->set_remote_address;
66
    C4::Context->set_remote_address;
82
67
Lines 134-139 automatically. This gets loaded into the template. Link Here
134
119
135
=head1 FUNCTIONS
120
=head1 FUNCTIONS
136
121
122
=cut
123
124
=head2 safe_exit
125
126
Missing POD for safe_exit.
127
128
NOTE: The utility of keeping the safe_exit function is that it can be easily re-defined in unit tests and plugins
129
130
=cut
131
132
sub safe_exit {
133
134
    # It's fine for us to "exit" because CGI::Compile (used in Plack::App::WrapCGI) redefines "exit" for us automatically.
135
    # Since we only seem to use C4::Auth::safe_exit in a CGI context, we don't actually need PSGI detection at all here.
136
    exit;
137
}
138
139
BEGIN {
140
    C4::Context->set_remote_address;
141
142
    require Exporter;
143
    @ISA = qw(Exporter);
144
145
    @EXPORT_OK = qw(
146
        checkauth check_api_auth get_session check_cookie_auth checkpw checkpw_internal checkpw_hash
147
        get_all_subpermissions get_cataloguing_page_permissions get_user_subpermissions in_iprange
148
        get_template_and_user haspermission create_basic_session
149
    );
150
151
    $cas       = C4::Context->preference('casAuthentication');
152
    $caslogout = C4::Context->preference('casLogout');
153
154
    if ($cas) {
155
        require C4::Auth_with_cas;    # no import
156
        import C4::Auth_with_cas
157
            qw(check_api_auth_cas checkpw_cas login_cas logout_cas login_cas_url logout_if_required multipleAuth getMultipleAuth);
158
    }
159
160
}
161
137
=head2 get_template_and_user
162
=head2 get_template_and_user
138
163
139
 my ($template, $borrowernumber, $cookie)
164
 my ($template, $borrowernumber, $cookie)
(-)a/C4/Auth_with_shibboleth.pm (-6 / +4 lines)
Lines 40-51 BEGIN { Link Here
40
40
41
# Check that shib config is not malformed
41
# Check that shib config is not malformed
42
42
43
=head2 shib_ok
44
45
Missing POD for shib_ok.
46
47
=cut
48
49
sub shib_ok {
43
sub shib_ok {
50
    my $config = _get_shib_config();
44
    my $config = _get_shib_config();
51
45
Lines 378-383 If you need more help configuring your B<S>ervice B<P>rovider to authenticate ag Link Here
378
372
379
=head1 FUNCTIONS
373
=head1 FUNCTIONS
380
374
375
=head2 shib_ok
376
377
Missing POD for shib_ok.
378
381
=head2 logout_shib
379
=head2 logout_shib
382
380
383
Sends a logout signal to the native shibboleth service provider and then logs out of koha.  Depending upon the native service provider configuration and identity provider capabilities this may or may not perform a single sign out action.
381
Sends a logout signal to the native shibboleth service provider and then logs out of koha.  Depending upon the native service provider configuration and identity provider capabilities this may or may not perform a single sign out action.
(-)a/C4/Barcodes.pm (-97 / +66 lines)
Lines 40-93 sub _prefformat { Link Here
40
    return $prefformat;
40
    return $prefformat;
41
}
41
}
42
42
43
=head2 initial
44
45
Missing POD for initial.
46
47
=cut
48
49
sub initial {
43
sub initial {
50
    return '0000001';
44
    return '0000001';
51
}
45
}
52
46
53
=head2 width
54
55
Missing POD for width.
56
57
=cut
58
59
sub width {
47
sub width {
60
    return;
48
    return;
61
}
49
}
62
50
63
=head2 process_head
64
65
Missing POD for process_head.
66
67
=cut
68
69
sub process_head {    # (self,head,whole,specific)
51
sub process_head {    # (self,head,whole,specific)
70
    my $self = shift;
52
    my $self = shift;
71
    return shift;     # Default: just return the head unchanged.
53
    return shift;     # Default: just return the head unchanged.
72
}
54
}
73
55
74
=head2 process_tail
75
76
Missing POD for process_tail.
77
78
=cut
79
80
sub process_tail {    # (self,tail,whole,specific)
56
sub process_tail {    # (self,tail,whole,specific)
81
    my $self = shift;
57
    my $self = shift;
82
    return shift;     # Default: just return the tail unchanged.
58
    return shift;     # Default: just return the tail unchanged.
83
}
59
}
84
60
85
=head2 is_max
86
87
Missing POD for is_max.
88
89
=cut
90
91
sub is_max {
61
sub is_max {
92
    my $self = shift;
62
    my $self = shift;
93
    ref($self) or carp "Called is_max on a non-object: '$self'";
63
    ref($self) or carp "Called is_max on a non-object: '$self'";
Lines 95-106 sub is_max { Link Here
95
    return $self->{is_max} || 0;
65
    return $self->{is_max} || 0;
96
}
66
}
97
67
98
=head2 value
99
100
Missing POD for value.
101
102
=cut
103
104
sub value {
68
sub value {
105
    my $self = shift;
69
    my $self = shift;
106
    if (@_) {
70
    if (@_) {
Lines 112-123 sub value { Link Here
112
    return $self->{value};
76
    return $self->{value};
113
}
77
}
114
78
115
=head2 autoBarcode
116
117
Missing POD for autoBarcode.
118
119
=cut
120
121
sub autoBarcode {
79
sub autoBarcode {
122
    (@_) or return _prefformat;
80
    (@_) or return _prefformat;
123
    my $self  = shift;
81
    my $self  = shift;
Lines 126-137 sub autoBarcode { Link Here
126
    return $value;
84
    return $value;
127
}
85
}
128
86
129
=head2 parse
130
131
Missing POD for parse.
132
133
=cut
134
135
sub parse {    # return 3 parts of barcode: non-incrementing, incrementing, non-incrementing
87
sub parse {    # return 3 parts of barcode: non-incrementing, incrementing, non-incrementing
136
    my $self    = shift;
88
    my $self    = shift;
137
    my $barcode = (@_) ? shift : $self->value;
89
    my $barcode = (@_) ? shift : $self->value;
Lines 142-153 sub parse { # return 3 parts of barcode: non-incrementing, incrementing, non- Link Here
142
    return ( $1, $2, '' );                    # the third part is in anticipation of barcodes that include checkdigits
94
    return ( $1, $2, '' );                    # the third part is in anticipation of barcodes that include checkdigits
143
}
95
}
144
96
145
=head2 max
146
147
Missing POD for max.
148
149
=cut
150
151
sub max {
97
sub max {
152
    my $self = shift;
98
    my $self = shift;
153
    if ( $self->{is_max} ) {
99
    if ( $self->{is_max} ) {
Lines 156-167 sub max { Link Here
156
    return $self->db_max;
102
    return $self->db_max;
157
}
103
}
158
104
159
=head2 db_max
160
161
Missing POD for db_max.
162
163
=cut
164
165
sub db_max {
105
sub db_max {
166
    my $self  = shift;
106
    my $self  = shift;
167
    my $query = "SELECT max(abs(CAST(barcode AS UNSIGNED))) FROM items LIMIT 1"
107
    my $query = "SELECT max(abs(CAST(barcode AS UNSIGNED))) FROM items LIMIT 1"
Lines 171-182 sub db_max { Link Here
171
    return $sth->fetchrow_array || $self->initial;
111
    return $sth->fetchrow_array || $self->initial;
172
}
112
}
173
113
174
=head2 next_value
175
176
Missing POD for next_value.
177
178
=cut
179
180
sub next_value {
114
sub next_value {
181
    my $self     = shift;
115
    my $self     = shift;
182
    my $specific = ( scalar @_ ) ? 1     : 0;
116
    my $specific = ( scalar @_ ) ? 1     : 0;
Lines 202-249 sub next_value { Link Here
202
    return $next_value;
136
    return $next_value;
203
}
137
}
204
138
205
=head2 next
206
207
Missing POD for next.
208
209
=cut
210
211
sub next {
139
sub next {
212
    my $self = shift or return;
140
    my $self = shift or return;
213
    (@_) and $self->{next} = shift;
141
    (@_) and $self->{next} = shift;
214
    return $self->{next};
142
    return $self->{next};
215
}
143
}
216
144
217
=head2 previous
218
219
Missing POD for previous.
220
221
=cut
222
223
sub previous {
145
sub previous {
224
    my $self = shift or return;
146
    my $self = shift or return;
225
    (@_) and $self->{previous} = shift;
147
    (@_) and $self->{previous} = shift;
226
    return $self->{previous};
148
    return $self->{previous};
227
}
149
}
228
150
229
=head2 serial
230
231
Missing POD for serial.
232
233
=cut
234
235
sub serial {
151
sub serial {
236
    my $self = shift or return;
152
    my $self = shift or return;
237
    (@_) and $self->{serial} = shift;
153
    (@_) and $self->{serial} = shift;
238
    return $self->{serial};
154
    return $self->{serial};
239
}
155
}
240
156
241
=head2 default_self
242
243
Missing POD for default_self.
244
245
=cut
246
247
sub default_self {
157
sub default_self {
248
    (@_) or carp "default_self called with no argument.  Reverting to _prefformat.";
158
    (@_) or carp "default_self called with no argument.  Reverting to _prefformat.";
249
    my $autoBarcode = (@_) ? shift : _prefformat;
159
    my $autoBarcode = (@_) ? shift : _prefformat;
Lines 311-322 sub new { Link Here
311
    return;
221
    return;
312
}
222
}
313
223
314
=head2 new_object
315
316
Missing POD for new_object.
317
318
=cut
319
320
sub new_object {
224
sub new_object {
321
    my $class_or_object = shift;
225
    my $class_or_object = shift;
322
    my $type            = ref($class_or_object) || $class_or_object;
226
    my $type            = ref($class_or_object) || $class_or_object;
Lines 369-373 like the IBM "Boulder" format can cause problems for sprintf. Basically, the va Link Here
369
%d version of an integer, and we cannot count on perl having been compiled with support for quads 
273
%d version of an integer, and we cannot count on perl having been compiled with support for quads 
370
(64-bit integers).  So we have to use floats or increment a piece of it and return the rejoined fragments.
274
(64-bit integers).  So we have to use floats or increment a piece of it and return the rejoined fragments.
371
275
372
=cut
276
=head1 Functions
373
277
278
=head2 initial
279
280
Missing POD for initial.
281
282
=head2 width
283
284
Missing POD for width.
285
286
=head2 process_head
287
288
Missing POD for process_head.
289
290
=head2 process_tail
291
292
Missing POD for process_tail.
293
294
=head2 is_max
295
296
Missing POD for is_max.
297
298
=head2 value
299
300
Missing POD for value.
301
302
=head2 autoBarcode
303
304
Missing POD for autoBarcode.
305
306
=head2 parse
307
308
Missing POD for parse.
309
310
=head2 max
311
312
Missing POD for max.
313
314
=head2 db_max
315
316
Missing POD for db_max.
317
318
=head2 next_value
319
320
Missing POD for next_value.
321
322
=head2 next
323
324
Missing POD for next.
325
326
=head2 previous
327
328
Missing POD for previous.
329
330
=head2 serial
331
332
Missing POD for serial.
333
334
=head2 default_self
335
336
Missing POD for default_self.
337
338
=head2 new_object
339
340
Missing POD for new_object.
341
342
=cut
(-)a/C4/Barcodes/hbyymmincr.pm (+4 lines)
Lines 34-39 BEGIN { Link Here
34
    @ISA = qw(C4::Barcodes);
34
    @ISA = qw(C4::Barcodes);
35
}
35
}
36
36
37
=head1 Functions
38
39
=cut
40
37
# Generates barcode where hb = home branch Code, yymm = year/month catalogued, incr = incremental number,
41
# Generates barcode where hb = home branch Code, yymm = year/month catalogued, incr = incremental number,
38
# 	increment resets yearly -fbcit
42
# 	increment resets yearly -fbcit
39
43
(-)a/C4/Creators/PDF.pm (+4 lines)
Lines 61-66 sub _InitVars { Link Here
61
    prInitVars($param);
61
    prInitVars($param);
62
}
62
}
63
63
64
=head1 Functions
65
66
=cut
67
64
=head2 new
68
=head2 new
65
69
66
Missing POD for new.
70
Missing POD for new.
(-)a/C4/Creators/Template.pm (-6 / +4 lines)
Lines 266-277 sub get_label_position { Link Here
266
    }
266
    }
267
}
267
}
268
268
269
=head2 get_next_label_pos
270
271
Missing POD for get_next_label_pos.
272
273
=cut
274
275
sub get_next_label_pos {
269
sub get_next_label_pos {
276
    my $self          = shift;
270
    my $self          = shift;
277
    my $current_label = $self->{'current_label'};
271
    my $current_label = $self->{'current_label'};
Lines 417-422 CM = SI Centimeters (28.3464567 points per) Link Here
417
    examples:
411
    examples:
418
        C<my ($row_count, $col_count, $llx, $lly) = $template->get_label_position($start_label);>
412
        C<my ($row_count, $col_count, $llx, $lly) = $template->get_label_position($start_label);>
419
413
414
=head2 get_next_label_pos
415
416
Missing POD for get_next_label_pos.
417
420
=head1 AUTHOR
418
=head1 AUTHOR
421
419
422
Chris Nighswonger <cnighswonger AT foundations DOT edu>
420
Chris Nighswonger <cnighswonger AT foundations DOT edu>
(-)a/C4/External/BakerTaylor.pm (-24 / +16 lines)
Lines 49-60 sub _initialize { Link Here
49
    #"Mozilla/4.76 [en] (Win98; U)",	#  if for some reason you want to go stealth, you might prefer this
49
    #"Mozilla/4.76 [en] (Win98; U)",	#  if for some reason you want to go stealth, you might prefer this
50
}
50
}
51
51
52
=head2 image_url
53
54
Missing POD for image_url.
55
56
=cut
57
58
sub image_url {
52
sub image_url {
59
    _initialize();
53
    _initialize();
60
    ( $user and $pass ) or return;
54
    ( $user and $pass ) or return;
Lines 63-74 sub image_url { Link Here
63
    return $image_url . $isbn;
57
    return $image_url . $isbn;
64
}
58
}
65
59
66
=head2 link_url
67
68
Missing POD for link_url.
69
70
=cut
71
72
sub link_url {
60
sub link_url {
73
    _initialize();
61
    _initialize();
74
    my $isbn = ( @_ ? shift : '' );
62
    my $isbn = ( @_ ? shift : '' );
Lines 77-88 sub link_url { Link Here
77
    return $link_url . $isbn;
65
    return $link_url . $isbn;
78
}
66
}
79
67
80
=head2 content_cafe_url
81
82
Missing POD for content_cafe_url.
83
84
=cut
85
86
sub content_cafe_url {
68
sub content_cafe_url {
87
    _initialize();
69
    _initialize();
88
    ( $user and $pass ) or return;
70
    ( $user and $pass ) or return;
Lines 92-103 sub content_cafe_url { Link Here
92
        "https://contentcafe2.btol.com/ContentCafeClient/ContentCafe.aspx?UserID=$user&Password=$pass&Options=Y&ItemKey=$isbn";
74
        "https://contentcafe2.btol.com/ContentCafeClient/ContentCafe.aspx?UserID=$user&Password=$pass&Options=Y&ItemKey=$isbn";
93
}
75
}
94
76
95
=head2 http_jacket_link
96
97
Missing POD for http_jacket_link.
98
99
=cut
100
101
sub http_jacket_link {
77
sub http_jacket_link {
102
    _initialize();
78
    _initialize();
103
    my $isbn = shift or return;
79
    my $isbn = shift or return;
Lines 147-152 These can be overridden for testing purposes using the initialize function. Link Here
147
123
148
=head1 FUNCTIONS
124
=head1 FUNCTIONS
149
125
126
=head2 image_url
127
128
Missing POD for image_url.
129
130
=head2 link_url
131
132
Missing POD for link_url.
133
134
=head2 content_cafe_url
135
136
Missing POD for content_cafe_url.
137
138
=head2 http_jacket_link
139
140
Missing POD for http_jacket_link.
141
150
=head2 availability($isbn);
142
=head2 availability($isbn);
151
143
152
$isbn is a isbn string
144
$isbn is a isbn string
(-)a/C4/Installer/PerlModules.pm (-6 / +4 lines)
Lines 19-30 sub new { Link Here
19
    return $self;
19
    return $self;
20
}
20
}
21
21
22
=head2 prereqs
23
24
Missing POD for prereqs.
25
26
=cut
27
28
sub prereqs {
22
sub prereqs {
29
    my $self = shift;
23
    my $self = shift;
30
24
Lines 125-130 A module for manipulating Koha Perl dependency list objects. Link Here
125
    example:
119
    example:
126
        C<my $perl_modules = C4::Installer::PerlModules->new;>
120
        C<my $perl_modules = C4::Installer::PerlModules->new;>
127
121
122
=head2 prereqs
123
124
Missing POD for prereqs.
125
128
=head2 prereq_pm()
126
=head2 prereq_pm()
129
127
130
    Returns a hashref of a hash of module information suitable for use in Makefile.PL
128
    Returns a hashref of a hash of module information suitable for use in Makefile.PL
(-)a/C4/Labels/Label.pm (-6 / +4 lines)
Lines 504-515 LABEL_FIELDS: # process data for requested fields on current label Link Here
504
    return \@label_text;
504
    return \@label_text;
505
}
505
}
506
506
507
=head2 draw_guide_box
508
509
Missing POD for draw_guide_box.
510
511
=cut
512
513
sub draw_guide_box {
507
sub draw_guide_box {
514
    return $_[0]->{'guidebox'};
508
    return $_[0]->{'guidebox'};
515
}
509
}
Lines 802-807 R = Right Link Here
802
                                                justify             => $text_justification,
796
                                                justify             => $text_justification,
803
                        );>
797
                        );>
804
798
799
=head2 draw_guide_box
800
801
Missing POD for draw_guide_box.
802
805
=head2 barcode()
803
=head2 barcode()
806
804
807
    Invoking the I<barcode> method generates a barcode for the label object and inserts it into the current pdf stream. This method accepts the following parameters as key => value
805
    Invoking the I<barcode> method generates a barcode for the label object and inserts it into the current pdf stream. This method accepts the following parameters as key => value
(-)a/C4/Linker/Default.pm (+4 lines)
Lines 24-29 use C4::Heading; Link Here
24
24
25
use base qw(C4::Linker);
25
use base qw(C4::Linker);
26
26
27
=head1 Functions
28
29
=cut
30
27
=head2 get_link
31
=head2 get_link
28
32
29
Missing POD for get_link.
33
Missing POD for get_link.
(-)a/C4/Linker/FirstMatch.pm (+4 lines)
Lines 24-29 use C4::Linker::Default; # Use Default for flipping Link Here
24
24
25
use base qw(C4::Linker);
25
use base qw(C4::Linker);
26
26
27
=head1 Functions
28
29
=cut
30
27
=head2 new
31
=head2 new
28
32
29
Missing POD for new.
33
Missing POD for new.
(-)a/C4/Linker/LastMatch.pm (+4 lines)
Lines 24-29 use C4::Linker::Default; # Use Default for flipping Link Here
24
24
25
use base qw(C4::Linker);
25
use base qw(C4::Linker);
26
26
27
=head1 Functions
28
29
=cut
30
27
=head2 new
31
=head2 new
28
32
29
Missing POD for new.
33
Missing POD for new.
(-)a/C4/Output.pm (-5 / +5 lines)
Lines 276-282 sub output_with_http_headers { Link Here
276
    print $query->header($options), $data;
276
    print $query->header($options), $data;
277
}
277
}
278
278
279
=head2 output_html_with_http_headers
279
=item output_html_with_http_headers
280
280
281
Missing POD for output_html_with_http_headers.
281
Missing POD for output_html_with_http_headers.
282
282
Lines 287-293 sub output_html_with_http_headers { Link Here
287
    output_with_http_headers( $query, $cookie, $data, 'html', $status, $extra_options );
287
    output_with_http_headers( $query, $cookie, $data, 'html', $status, $extra_options );
288
}
288
}
289
289
290
=head2 output_ajax_with_http_headers
290
=item output_ajax_with_http_headers
291
291
292
Missing POD for output_ajax_with_http_headers.
292
Missing POD for output_ajax_with_http_headers.
293
293
Lines 304-310 sub output_ajax_with_http_headers { Link Here
304
    ), $js;
304
    ), $js;
305
}
305
}
306
306
307
=head2 is_ajax
307
=item is_ajax
308
308
309
Missing POD for is_ajax.
309
Missing POD for is_ajax.
310
310
Lines 387-393 sub output_and_exit { Link Here
387
    exit;
387
    exit;
388
}
388
}
389
389
390
=head2 output_error
390
=item output_error
391
391
392
Missing POD for output_error.
392
Missing POD for output_error.
393
393
Lines 411-417 sub output_error { Link Here
411
    output_with_http_headers $query, $cookie, $template->output, 'html', '404 Not Found';
411
    output_with_http_headers $query, $cookie, $template->output, 'html', '404 Not Found';
412
}
412
}
413
413
414
=head2 parametrized_url
414
=item parametrized_url
415
415
416
Missing POD for parametrized_url.
416
Missing POD for parametrized_url.
417
417
(-)a/C4/Patroncards/Lib.pm (-25 / +15 lines)
Lines 84-95 sub box { Link Here
84
    $pdf->Add($obj_stream);
84
    $pdf->Add($obj_stream);
85
}
85
}
86
86
87
=head2 get_borrower_attributes
88
89
Missing POD for get_borrower_attributes.
90
91
=cut
92
93
sub get_borrower_attributes {
87
sub get_borrower_attributes {
94
    my ( $borrower_number, @fields ) = @_;
88
    my ( $borrower_number, @fields ) = @_;
95
    my $get_branch = 0;
89
    my $get_branch = 0;
Lines 123-134 sub get_borrower_attributes { Link Here
123
    return $borrower_attributes;
117
    return $borrower_attributes;
124
}
118
}
125
119
126
=head2 put_image
127
128
Missing POD for put_image.
129
130
=cut
131
132
sub put_image {
120
sub put_image {
133
    my ( $image_name, $image_file ) = @_;
121
    my ( $image_name, $image_file ) = @_;
134
    if ( my $image_limit = C4::Context->preference('ImageLimit') ) {    # enforce quota if set
122
    if ( my $image_limit = C4::Context->preference('ImageLimit') ) {    # enforce quota if set
Lines 152-163 sub put_image { Link Here
152
    return;
140
    return;
153
}
141
}
154
142
155
=head2 get_image
156
157
Missing POD for get_image.
158
159
=cut
160
161
sub get_image {
143
sub get_image {
162
    my ( $image_name, $fields ) = @_;
144
    my ( $image_name, $fields ) = @_;
163
    $fields = '*' unless $fields;
145
    $fields = '*' unless $fields;
Lines 176-187 sub get_image { Link Here
176
    return $sth->fetchall_arrayref( {} );
158
    return $sth->fetchall_arrayref( {} );
177
}
159
}
178
160
179
=head2 rm_image
180
181
Missing POD for rm_image.
182
183
=cut
184
185
sub rm_image {
161
sub rm_image {
186
    my $image_ids = shift;
162
    my $image_ids = shift;
187
    my $errstr    = ();
163
    my $errstr    = ();
Lines 276-282 This library provides functions used by various sections of the Patroncard Creat Link Here
276
252
277
        box($llx, $lly, $width, $height, $pdf);
253
        box($llx, $lly, $width, $height, $pdf);
278
254
279
=cut
255
=head2 get_borrower_attributes
256
257
Missing POD for get_borrower_attributes.
258
259
=head2 put_image
260
261
Missing POD for put_image.
262
263
=head2 get_image
264
265
Missing POD for get_image.
266
267
=head2 rm_image
268
269
Missing POD for rm_image.
280
270
281
=head1 AUTHOR
271
=head1 AUTHOR
282
272
(-)a/C4/SIP/ILS.pm (+4 lines)
Lines 47-52 my %supports = ( Link Here
47
    "renew all"             => 1,
47
    "renew all"             => 1,
48
);
48
);
49
49
50
=head1 Functions
51
52
=cut
53
50
=head2 new
54
=head2 new
51
55
52
Missing POD for new.
56
Missing POD for new.
(-)a/C4/SIP/ILS/Transaction/Checkin.pm (+4 lines)
Lines 33-38 my %fields = ( Link Here
33
    hold             => undef,
33
    hold             => undef,
34
);
34
);
35
35
36
=head1 Functions
37
38
=cut
39
36
=head2 new
40
=head2 new
37
41
38
Missing POD for new.
42
Missing POD for new.
(-)a/C4/Scrubber.pm (-8 / +5 lines)
Lines 37-48 my %scrubbertypes = ( Link Here
37
    },
37
    },
38
);
38
);
39
39
40
=head2 new
41
42
Missing POD for new.
43
44
=cut
45
46
sub new {
40
sub new {
47
    shift;    # ignore our class we are wrapper
41
    shift;    # ignore our class we are wrapper
48
    my $type = (@_) ? shift : 'default';
42
    my $type = (@_) ? shift : 'default';
Lines 71-77 Standardized wrapper with settings for building HTML::Scrubber tailored to vario Link Here
71
The default is to scrub everything, leaving no markup at all.  This is compatible with the expectations
65
The default is to scrub everything, leaving no markup at all.  This is compatible with the expectations
72
for Tags.
66
for Tags.
73
67
74
=head2 TODO: Add real perldoc
68
=head1 Functions
75
69
76
=cut
70
=head2 new
77
71
72
Missing POD for new.
73
74
=cut
(-)a/C4/Search/History.pm (-6 / +4 lines)
Lines 118-129 sub delete { Link Here
118
    );
118
    );
119
}
119
}
120
120
121
=head2 delete_from_cookie
122
123
Missing POD for delete_from_cookie.
124
125
=cut
126
127
sub delete_from_cookie {
121
sub delete_from_cookie {
128
    my ($params) = @_;
122
    my ($params) = @_;
129
    my $cookie   = $params->{cookie};
123
    my $cookie   = $params->{cookie};
Lines 292-297 It is possible to delete searches for current session or all previous sessions u Link Here
292
If the type ("biblio" or "authority") is missing, all type will be deleted.
286
If the type ("biblio" or "authority") is missing, all type will be deleted.
293
To delete *all* searches for a given userid, just pass a userid.
287
To delete *all* searches for a given userid, just pass a userid.
294
288
289
=head2 delete_from_cookie
290
291
Missing POD for delete_from_cookie.
292
295
=head2 get
293
=head2 get
296
294
297
    my $searches C4::Search::History::get({
295
    my $searches C4::Search::History::get({
(-)a/Koha/Edifact/Line.pm (-306 / +208 lines)
Lines 176-187 sub _format_item_description { Link Here
176
    return $bibrec;
176
    return $bibrec;
177
}
177
}
178
178
179
=head2 marc_record
180
181
Missing POD for marc_record.
182
183
=cut
184
185
sub marc_record {
179
sub marc_record {
186
    my $self = shift;
180
    my $self = shift;
187
    my $b    = $self->{item_description};
181
    my $b    = $self->{item_description};
Lines 276-287 sub marc_record { Link Here
276
    return $bib;
270
    return $bib;
277
}
271
}
278
272
279
=head2 corpcon
280
281
Missing POD for corpcon.
282
283
=cut
284
285
sub corpcon {
273
sub corpcon {
286
    my ( $self, $level ) = @_;
274
    my ( $self, $level ) = @_;
287
    my $test_these = {
275
    my $test_these = {
Lines 315-326 sub corpcon { Link Here
315
    return new_field( $self->{item_description}, [ $tag, $i1, $i2 ], @spec );
303
    return new_field( $self->{item_description}, [ $tag, $i1, $i2 ], @spec );
316
}
304
}
317
305
318
=head2 new_field
319
320
Missing POD for new_field.
321
322
=cut
323
324
sub new_field {
306
sub new_field {
325
    my ( $b, $tag_ind, @sfd_elem ) = @_;
307
    my ( $b, $tag_ind, @sfd_elem ) = @_;
326
    my @sfd;
308
    my @sfd;
Lines 340-384 sub new_field { Link Here
340
322
341
# Accessor methods to line data
323
# Accessor methods to line data
342
324
343
=head2 item_number_id
344
345
Missing POD for item_number_id.
346
347
=cut
348
349
sub item_number_id {
325
sub item_number_id {
350
    my $self = shift;
326
    my $self = shift;
351
    return $self->{item_number_id};
327
    return $self->{item_number_id};
352
}
328
}
353
329
354
=head2 line_item_number
355
356
Missing POD for line_item_number.
357
358
=cut
359
360
sub line_item_number {
330
sub line_item_number {
361
    my $self = shift;
331
    my $self = shift;
362
    return $self->{line_item_number};
332
    return $self->{line_item_number};
363
}
333
}
364
334
365
=head2 additional_product_ids
366
367
Missing POD for additional_product_ids.
368
369
=cut
370
371
sub additional_product_ids {
335
sub additional_product_ids {
372
    my $self = shift;
336
    my $self = shift;
373
    return $self->{additional_product_ids};
337
    return $self->{additional_product_ids};
374
}
338
}
375
339
376
=head2 action_notification
377
378
Missing POD for action_notification.
379
380
=cut
381
382
sub action_notification {
340
sub action_notification {
383
    my $self = shift;
341
    my $self = shift;
384
    my $a    = $self->{action_notification};
342
    my $a    = $self->{action_notification};
Lines 388-542 sub action_notification { Link Here
388
    return $a;
346
    return $a;
389
}
347
}
390
348
391
=head2 item_description
392
393
Missing POD for item_description.
394
395
=cut
396
397
sub item_description {
349
sub item_description {
398
    my $self = shift;
350
    my $self = shift;
399
    return $self->{item_description};
351
    return $self->{item_description};
400
}
352
}
401
353
402
=head2 monetary_amount
403
404
Missing POD for monetary_amount.
405
406
=cut
407
408
sub monetary_amount {
354
sub monetary_amount {
409
    my $self = shift;
355
    my $self = shift;
410
    return $self->{monetary_amount};
356
    return $self->{monetary_amount};
411
}
357
}
412
358
413
=head2 quantity
414
415
Missing POD for quantity.
416
417
=cut
418
419
sub quantity {
359
sub quantity {
420
    my $self = shift;
360
    my $self = shift;
421
    return $self->{quantity};
361
    return $self->{quantity};
422
}
362
}
423
363
424
=head2 quantity_invoiced
425
426
Missing POD for quantity_invoiced.
427
428
=cut
429
430
sub quantity_invoiced {
364
sub quantity_invoiced {
431
    my $self = shift;
365
    my $self = shift;
432
    return $self->{quantity_invoiced};
366
    return $self->{quantity_invoiced};
433
}
367
}
434
368
435
=head2 price
436
437
Missing POD for price.
438
439
=cut
440
441
sub price {
369
sub price {
442
    my $self = shift;
370
    my $self = shift;
443
    return $self->{price};
371
    return $self->{price};
444
}
372
}
445
373
446
=head2 reference
447
448
Missing POD for reference.
449
450
=cut
451
452
sub reference {
374
sub reference {
453
    my $self = shift;
375
    my $self = shift;
454
    return $self->{reference};
376
    return $self->{reference};
455
}
377
}
456
378
457
=head2 orderline_reference_number
458
459
Missing POD for orderline_reference_number.
460
461
=cut
462
463
sub orderline_reference_number {
379
sub orderline_reference_number {
464
    my $self = shift;
380
    my $self = shift;
465
    return $self->{orderline_reference_number};
381
    return $self->{orderline_reference_number};
466
}
382
}
467
383
468
=head2 ordernumber
469
470
Missing POD for ordernumber.
471
472
=cut
473
474
sub ordernumber {
384
sub ordernumber {
475
    my $self = shift;
385
    my $self = shift;
476
    return $self->{ordernumber};
386
    return $self->{ordernumber};
477
}
387
}
478
388
479
=head2 free_text
480
481
Missing POD for free_text.
482
483
=cut
484
485
sub free_text {
389
sub free_text {
486
    my $self = shift;
390
    my $self = shift;
487
    return $self->{free_text};
391
    return $self->{free_text};
488
}
392
}
489
393
490
=head2 coded_free_text
491
492
Missing POD for coded_free_text.
493
494
=cut
495
496
sub coded_free_text {
394
sub coded_free_text {
497
    my $self = shift;
395
    my $self = shift;
498
    return $self->{coded_free_text}->{code};
396
    return $self->{coded_free_text}->{code};
499
}
397
}
500
398
501
=head2 internal_notes
502
503
Missing POD for internal_notes.
504
505
=cut
506
507
sub internal_notes {
399
sub internal_notes {
508
    my $self = shift;
400
    my $self = shift;
509
    return $self->{internal_notes};
401
    return $self->{internal_notes};
510
}
402
}
511
403
512
=head2 coded_internal_note
513
514
Missing POD for coded_internal_note.
515
516
=cut
517
518
sub coded_internal_note {
404
sub coded_internal_note {
519
    my $self = shift;
405
    my $self = shift;
520
    return $self->{coded_internal_note}->{code};
406
    return $self->{coded_internal_note}->{code};
521
}
407
}
522
408
523
=head2 orderline_free_text
524
525
Missing POD for orderline_free_text.
526
527
=cut
528
529
sub orderline_free_text {
409
sub orderline_free_text {
530
    my $self = shift;
410
    my $self = shift;
531
    return $self->{orderline_free_text};
411
    return $self->{orderline_free_text};
532
}
412
}
533
413
534
=head2 coded_orderline_text
535
536
Missing POD for coded_orderline_text.
537
538
=cut
539
540
sub coded_orderline_text {
414
sub coded_orderline_text {
541
    my $self  = shift;
415
    my $self  = shift;
542
    my $code  = $self->{coded_orderline_text}->{code};
416
    my $code  = $self->{coded_orderline_text}->{code};
Lines 553-575 sub coded_orderline_text { Link Here
553
    return $txt;
427
    return $txt;
554
}
428
}
555
429
556
=head2 substitute_free_text
557
558
Missing POD for substitute_free_text.
559
560
=cut
561
562
sub substitute_free_text {
430
sub substitute_free_text {
563
    my $self = shift;
431
    my $self = shift;
564
    return $self->{substitute_free_text};
432
    return $self->{substitute_free_text};
565
}
433
}
566
434
567
=head2 coded_substitute_text
568
569
Missing POD for coded_substitute_text.
570
571
=cut
572
573
sub coded_substitute_text {
435
sub coded_substitute_text {
574
    my $self = shift;
436
    my $self = shift;
575
    return $self->{coded_substitute_text}->{code};
437
    return $self->{coded_substitute_text}->{code};
Lines 579-590 sub coded_substitute_text { Link Here
579
# by (orderline|substitue)-free_text (FTX seg LIN)
441
# by (orderline|substitue)-free_text (FTX seg LIN)
580
# and expand it using EditEUR code list 8B
442
# and expand it using EditEUR code list 8B
581
443
582
=head2 translate_8B
583
584
Missing POD for translate_8B.
585
586
=cut
587
588
sub translate_8B {
444
sub translate_8B {
589
    my ($code) = @_;
445
    my ($code) = @_;
590
446
Lines 632-643 sub translate_8B { Link Here
632
    }
488
    }
633
}
489
}
634
490
635
=head2 translate_12B
636
637
Missing POD for translate_12B.
638
639
=cut
640
641
sub translate_12B {
491
sub translate_12B {
642
    my ($code) = @_;
492
    my ($code) = @_;
643
493
Lines 693-704 sub translate_12B { Link Here
693
543
694
# item_desription_fields accessors
544
# item_desription_fields accessors
695
545
696
=head2 title
697
698
Missing POD for title.
699
700
=cut
701
702
sub title {
546
sub title {
703
    my $self       = shift;
547
    my $self       = shift;
704
    my $titlefield = q{050};
548
    my $titlefield = q{050};
Lines 708-719 sub title { Link Here
708
    return;
552
    return;
709
}
553
}
710
554
711
=head2 author
712
713
Missing POD for author.
714
715
=cut
716
717
sub author {
555
sub author {
718
    my $self  = shift;
556
    my $self  = shift;
719
    my $field = q{010};
557
    my $field = q{010};
Lines 729-740 sub author { Link Here
729
    return;
567
    return;
730
}
568
}
731
569
732
=head2 series
733
734
Missing POD for series.
735
736
=cut
737
738
sub series {
570
sub series {
739
    my $self  = shift;
571
    my $self  = shift;
740
    my $field = q{190};
572
    my $field = q{190};
Lines 744-755 sub series { Link Here
744
    return;
576
    return;
745
}
577
}
746
578
747
=head2 publisher
748
749
Missing POD for publisher.
750
751
=cut
752
753
sub publisher {
579
sub publisher {
754
    my $self  = shift;
580
    my $self  = shift;
755
    my $field = q{120};
581
    my $field = q{120};
Lines 759-770 sub publisher { Link Here
759
    return;
585
    return;
760
}
586
}
761
587
762
=head2 publication_date
763
764
Missing POD for publication_date.
765
766
=cut
767
768
sub publication_date {
588
sub publication_date {
769
    my $self  = shift;
589
    my $self  = shift;
770
    my $field = q{170};
590
    my $field = q{170};
Lines 774-785 sub publication_date { Link Here
774
    return;
594
    return;
775
}
595
}
776
596
777
=head2 dewey_class
778
779
Missing POD for dewey_class.
780
781
=cut
782
783
sub dewey_class {
597
sub dewey_class {
784
    my $self  = shift;
598
    my $self  = shift;
785
    my $field = q{230};
599
    my $field = q{230};
Lines 789-800 sub dewey_class { Link Here
789
    return;
603
    return;
790
}
604
}
791
605
792
=head2 lc_class
793
794
Missing POD for lc_class.
795
796
=cut
797
798
sub lc_class {
606
sub lc_class {
799
    my $self  = shift;
607
    my $self  = shift;
800
    my $field = q{240};
608
    my $field = q{240};
Lines 804-815 sub lc_class { Link Here
804
    return;
612
    return;
805
}
613
}
806
614
807
=head2 girfield
808
809
Missing POD for girfield.
810
811
=cut
812
813
sub girfield {
615
sub girfield {
814
    my ( $self, $field, $occ ) = @_;
616
    my ( $self, $field, $occ ) = @_;
815
    if ( $self->number_of_girs ) {
617
    if ( $self->number_of_girs ) {
Lines 825-836 sub girfield { Link Here
825
    }
627
    }
826
}
628
}
827
629
828
=head2 number_of_girs
829
830
Missing POD for number_of_girs.
831
832
=cut
833
834
sub number_of_girs {
630
sub number_of_girs {
835
    my $self = shift;
631
    my $self = shift;
836
    if ( $self->{GIR} ) {
632
    if ( $self->{GIR} ) {
Lines 843-854 sub number_of_girs { Link Here
843
    }
639
    }
844
}
640
}
845
641
846
=head2 extract_gir
847
848
Missing POD for extract_gir.
849
850
=cut
851
852
sub extract_gir {
642
sub extract_gir {
853
    my $s    = shift;
643
    my $s    = shift;
854
    my %qmap = (
644
    my %qmap = (
Lines 896-907 sub extract_gir { Link Here
896
686
897
# mainly for invoice processing amt_ will derive from MOA price_ from PRI and tax_ from TAX/MOA pairsn
687
# mainly for invoice processing amt_ will derive from MOA price_ from PRI and tax_ from TAX/MOA pairsn
898
688
899
=head2 moa_amt
900
901
Missing POD for moa_amt.
902
903
=cut
904
905
sub moa_amt {
689
sub moa_amt {
906
    my ( $self, $qualifier ) = @_;
690
    my ( $self, $qualifier ) = @_;
907
    foreach my $s ( @{ $self->{segs} } ) {
691
    foreach my $s ( @{ $self->{segs} } ) {
Lines 912-923 sub moa_amt { Link Here
912
    return;
696
    return;
913
}
697
}
914
698
915
=head2 moa_multiple_amt
916
917
Missing POD for moa_multiple_amt.
918
919
=cut
920
921
sub moa_multiple_amt {
699
sub moa_multiple_amt {
922
    my ( $self, $qualifier ) = @_;
700
    my ( $self, $qualifier ) = @_;
923
701
Lines 936-958 sub moa_multiple_amt { Link Here
936
    return;
714
    return;
937
}
715
}
938
716
939
=head2 amt_discount
940
941
Missing POD for amt_discount.
942
943
=cut
944
945
sub amt_discount {
717
sub amt_discount {
946
    my $self = shift;
718
    my $self = shift;
947
    return $self->moa_amt('52');
719
    return $self->moa_amt('52');
948
}
720
}
949
721
950
=head2 amt_prepayment
951
952
Missing POD for amt_prepayment.
953
954
=cut
955
956
sub amt_prepayment {
722
sub amt_prepayment {
957
    my $self = shift;
723
    my $self = shift;
958
    return $self->moa_amt('113');
724
    return $self->moa_amt('113');
Lines 960-971 sub amt_prepayment { Link Here
960
726
961
# total including allowances & tax
727
# total including allowances & tax
962
728
963
=head2 amt_total
964
965
Missing POD for amt_total.
966
967
=cut
968
969
sub amt_total {
729
sub amt_total {
970
    my $self = shift;
730
    my $self = shift;
971
    return $self->moa_amt('128');
731
    return $self->moa_amt('128');
Lines 973-984 sub amt_total { Link Here
973
733
974
# Used to give price in currency other than that given in price
734
# Used to give price in currency other than that given in price
975
735
976
=head2 amt_unitprice
977
978
Missing POD for amt_unitprice.
979
980
=cut
981
982
sub amt_unitprice {
736
sub amt_unitprice {
983
    my $self = shift;
737
    my $self = shift;
984
    return $self->moa_amt('146');
738
    return $self->moa_amt('146');
Lines 986-1019 sub amt_unitprice { Link Here
986
740
987
# item amount after allowances excluding tax
741
# item amount after allowances excluding tax
988
742
989
=head2 amt_lineitem
990
991
Missing POD for amt_lineitem.
992
993
=cut
994
995
sub amt_lineitem {
743
sub amt_lineitem {
996
    my $self = shift;
744
    my $self = shift;
997
    return $self->moa_amt('203');
745
    return $self->moa_amt('203');
998
}
746
}
999
747
1000
=head2 amt_taxoncharge
1001
1002
Missing POD for amt_taxoncharge.
1003
1004
=cut
1005
1006
sub amt_taxoncharge {
748
sub amt_taxoncharge {
1007
    my $self = shift;
749
    my $self = shift;
1008
    return $self->moa_multiple_amt('124');
750
    return $self->moa_multiple_amt('124');
1009
}
751
}
1010
752
1011
=head2 pri_price
1012
1013
Missing POD for pri_price.
1014
1015
=cut
1016
1017
sub pri_price {
753
sub pri_price {
1018
    my ( $self, $price_qualifier ) = @_;
754
    my ( $self, $price_qualifier ) = @_;
1019
755
Lines 1044-1055 sub pri_price { Link Here
1044
780
1045
# unit price that will be chaged excl tax
781
# unit price that will be chaged excl tax
1046
782
1047
=head2 price_net
1048
1049
Missing POD for price_net.
1050
1051
=cut
1052
1053
sub price_net {
783
sub price_net {
1054
    my $self = shift;
784
    my $self = shift;
1055
    my $p    = $self->pri_price('AAA');
785
    my $p    = $self->pri_price('AAA');
Lines 1061-1072 sub price_net { Link Here
1061
791
1062
# unit price excluding all allowances, charges and taxes
792
# unit price excluding all allowances, charges and taxes
1063
793
1064
=head2 price_gross
1065
1066
Missing POD for price_gross.
1067
1068
=cut
1069
1070
sub price_gross {
794
sub price_gross {
1071
    my $self = shift;
795
    my $self = shift;
1072
    my $p    = $self->pri_price('AAB');
796
    my $p    = $self->pri_price('AAB');
Lines 1078-1089 sub price_gross { Link Here
1078
802
1079
# information price incl tax excluding allowances, charges
803
# information price incl tax excluding allowances, charges
1080
804
1081
=head2 price_info
1082
1083
Missing POD for price_info.
1084
1085
=cut
1086
1087
sub price_info {
805
sub price_info {
1088
    my $self = shift;
806
    my $self = shift;
1089
    my $p    = $self->pri_price('AAE');
807
    my $p    = $self->pri_price('AAE');
Lines 1095-1106 sub price_info { Link Here
1095
813
1096
# information price incl tax,allowances, charges
814
# information price incl tax,allowances, charges
1097
815
1098
=head2 price_info_inclusive
1099
1100
Missing POD for price_info_inclusive.
1101
1102
=cut
1103
1104
sub price_info_inclusive {
816
sub price_info_inclusive {
1105
    my $self = shift;
817
    my $self = shift;
1106
    my $p    = $self->pri_price('AAF');
818
    my $p    = $self->pri_price('AAF');
Lines 1110-1132 sub price_info_inclusive { Link Here
1110
    return;
822
    return;
1111
}
823
}
1112
824
1113
=head2 tax
1114
1115
Missing POD for tax.
1116
1117
=cut
1118
1119
sub tax {
825
sub tax {
1120
    my $self = shift;
826
    my $self = shift;
1121
    return $self->moa_amt('124');
827
    return $self->moa_amt('124');
1122
}
828
}
1123
829
1124
=head2 tax_rate
1125
1126
Missing POD for tax_rate.
1127
1128
=cut
1129
1130
sub tax_rate {
830
sub tax_rate {
1131
    my $self = shift;
831
    my $self = shift;
1132
    my $tr   = {};
832
    my $tr   = {};
Lines 1152-1163 sub tax_rate { Link Here
1152
    return;
852
    return;
1153
}
853
}
1154
854
1155
=head2 availability_date
1156
1157
Missing POD for availability_date.
1158
1159
=cut
1160
1161
sub availability_date {
855
sub availability_date {
1162
    my $self = shift;
856
    my $self = shift;
1163
    if ( exists $self->{availability_date} ) {
857
    if ( exists $self->{availability_date} ) {
Lines 1208-1213 Koha::Edifact::Line Link Here
1208
902
1209
   Called with an array ref of segments constituting the line
903
   Called with an array ref of segments constituting the line
1210
904
905
906
=head2 marc_record
907
908
Missing POD for marc_record.
909
910
911
=head2 corpcon
912
913
Missing POD for corpcon.
914
915
=head2 new_field
916
917
Missing POD for new_field.
918
919
920
=head2 item_number_id
921
922
Missing POD for item_number_id.
923
924
925
=head2 line_item_number
926
927
Missing POD for line_item_number.
928
929
=head2 additional_product_ids
930
931
Missing POD for additional_product_ids.
932
933
=head2 action_notification
934
935
Missing POD for action_notification.
936
937
=head2 item_description
938
939
Missing POD for item_description.
940
941
=head2 monetary_amount
942
943
Missing POD for monetary_amount.
944
945
=head2 quantity
946
947
Missing POD for quantity.
948
949
=head2 quantity_invoiced
950
951
Missing POD for quantity_invoiced.
952
953
=head2 price
954
955
Missing POD for price.
956
957
=head2 reference
958
959
Missing POD for reference.
960
961
=head2 orderline_reference_number
962
963
Missing POD for orderline_reference_number.
964
965
=head2 ordernumber
966
967
Missing POD for ordernumber.
968
969
=head2 free_text
970
971
Missing POD for free_text.
972
973
=head2 coded_free_text
974
975
Missing POD for coded_free_text.
976
977
=head2 internal_notes
978
979
Missing POD for internal_notes.
980
981
=head2 coded_internal_note
982
983
Missing POD for coded_internal_note.
984
985
=head2 orderline_free_text
986
987
Missing POD for orderline_free_text.
988
989
=head2 coded_orderline_text
990
991
Missing POD for coded_orderline_text.
992
993
=head2 substitute_free_text
994
995
Missing POD for substitute_free_text.
996
997
=head2 coded_substitute_text
998
999
Missing POD for coded_substitute_text.
1000
1001
=head2 translate_8B
1002
1003
Missing POD for translate_8B.
1004
1005
=head2 translate_12B
1006
1007
Missing POD for translate_12B.
1008
1009
=head2 title
1010
1011
Missing POD for title.
1012
1013
=head2 author
1014
1015
Missing POD for author.
1016
1017
=head2 series
1018
1019
Missing POD for series.
1020
1021
=head2 publisher
1022
1023
Missing POD for publisher.
1024
1025
=head2 publication_date
1026
1027
Missing POD for publication_date.
1028
1029
=head2 dewey_class
1030
1031
Missing POD for dewey_class.
1032
1033
=head2 lc_class
1034
1035
Missing POD for lc_class.
1036
1037
=head2 girfield
1038
1039
Missing POD for girfield.
1040
1041
=head2 number_of_girs
1042
1043
Missing POD for number_of_girs.
1044
1045
=head2 extract_gir
1046
1047
Missing POD for extract_gir.
1048
1049
=head2 moa_amt
1050
1051
Missing POD for moa_amt.
1052
1053
=head2 moa_multiple_amt
1054
1055
Missing POD for moa_multiple_amt.
1056
1057
=head2 amt_discount
1058
1059
Missing POD for amt_discount.
1060
1061
=head2 amt_prepayment
1062
1063
Missing POD for amt_prepayment.
1064
1065
=head2 amt_total
1066
1067
Missing POD for amt_total.
1068
1069
=head2 amt_unitprice
1070
1071
Missing POD for amt_unitprice.
1072
1073
=head2 amt_lineitem
1074
1075
Missing POD for amt_lineitem.
1076
1077
=head2 amt_taxoncharge
1078
1079
Missing POD for amt_taxoncharge.
1080
1081
=head2 pri_price
1082
1083
Missing POD for pri_price.
1084
1085
=head2 price_net
1086
1087
Missing POD for price_net.
1088
1089
=head2 price_gross
1090
1091
Missing POD for price_gross.
1092
1093
=head2 price_info
1094
1095
Missing POD for price_info.
1096
1097
=head2 price_info_inclusive
1098
1099
Missing POD for price_info_inclusive.
1100
1101
=head2 tax
1102
1103
Missing POD for tax.
1104
1105
=head2 tax_rate
1106
1107
Missing POD for tax_rate.
1108
1109
=head2 availability_date
1110
1111
Missing POD for availability_date.
1112
1211
=head1 AUTHOR
1113
=head1 AUTHOR
1212
1114
1213
   Colin Campbell <colin.campbell@ptfs-europe.com>
1115
   Colin Campbell <colin.campbell@ptfs-europe.com>
(-)a/Koha/Edifact/Message.pm (-78 / +52 lines)
Lines 46-68 sub new { Link Here
46
    return $self;
46
    return $self;
47
}
47
}
48
48
49
=head2 message_refno
50
51
Missing POD for message_refno.
52
53
=cut
54
55
sub message_refno {
49
sub message_refno {
56
    my $self = shift;
50
    my $self = shift;
57
    return $self->{message_reference_number};
51
    return $self->{message_reference_number};
58
}
52
}
59
53
60
=head2 function
61
62
Missing POD for function.
63
64
=cut
65
66
sub function {
54
sub function {
67
    my $self         = shift;
55
    my $self         = shift;
68
    my $msg_function = $self->{bgm}->elem(2);
56
    my $msg_function = $self->{bgm}->elem(2);
Lines 74-129 sub function { Link Here
74
    return;
62
    return;
75
}
63
}
76
64
77
=head2 message_reference_number
78
79
Missing POD for message_reference_number.
80
81
=cut
82
83
sub message_reference_number {
65
sub message_reference_number {
84
    my $self = shift;
66
    my $self = shift;
85
    return $self->{header}->elem(0);
67
    return $self->{header}->elem(0);
86
}
68
}
87
69
88
=head2 message_type
89
90
Missing POD for message_type.
91
92
=cut
93
94
sub message_type {
70
sub message_type {
95
    my $self = shift;
71
    my $self = shift;
96
    return $self->{header}->elem( 1, 0 );
72
    return $self->{header}->elem( 1, 0 );
97
}
73
}
98
74
99
=head2 message_code
100
101
Missing POD for message_code.
102
103
=cut
104
105
sub message_code {
75
sub message_code {
106
    my $self = shift;
76
    my $self = shift;
107
    return $self->{bgm}->elem( 0, 0 );
77
    return $self->{bgm}->elem( 0, 0 );
108
}
78
}
109
79
110
=head2 docmsg_number
111
112
Missing POD for docmsg_number.
113
114
=cut
115
116
sub docmsg_number {
80
sub docmsg_number {
117
    my $self = shift;
81
    my $self = shift;
118
    return $self->{bgm}->elem(1);
82
    return $self->{bgm}->elem(1);
119
}
83
}
120
84
121
=head2 message_date
122
123
Missing POD for message_date.
124
125
=cut
126
127
sub message_date {
85
sub message_date {
128
    my $self = shift;
86
    my $self = shift;
129
87
Lines 136-147 sub message_date { Link Here
136
    return;    # this should not happen
94
    return;    # this should not happen
137
}
95
}
138
96
139
=head2 tax_point_date
140
141
Missing POD for tax_point_date.
142
143
=cut
144
145
sub tax_point_date {
97
sub tax_point_date {
146
    my $self = shift;
98
    my $self = shift;
147
    if ( $self->message_type eq 'INVOIC' ) {
99
    if ( $self->message_type eq 'INVOIC' ) {
Lines 154-165 sub tax_point_date { Link Here
154
    return;
106
    return;
155
}
107
}
156
108
157
=head2 expiry_date
158
159
Missing POD for expiry_date.
160
161
=cut
162
163
sub expiry_date {
109
sub expiry_date {
164
    my $self = shift;
110
    my $self = shift;
165
    if ( $self->message_type eq 'QUOTES' ) {
111
    if ( $self->message_type eq 'QUOTES' ) {
Lines 172-183 sub expiry_date { Link Here
172
    return;
118
    return;
173
}
119
}
174
120
175
=head2 shipment_charge
176
177
Missing POD for shipment_charge.
178
179
=cut
180
181
sub shipment_charge {
121
sub shipment_charge {
182
    my $self = shift;
122
    my $self = shift;
183
123
Lines 210-221 sub shipment_charge { Link Here
210
150
211
# return NAD fields
151
# return NAD fields
212
152
213
=head2 buyer_ean
214
215
Missing POD for buyer_ean.
216
217
=cut
218
219
sub buyer_ean {
153
sub buyer_ean {
220
    my $self = shift;
154
    my $self = shift;
221
    foreach my $s ( @{ $self->{datasegs} } ) {
155
    foreach my $s ( @{ $self->{datasegs} } ) {
Lines 232-243 sub buyer_ean { Link Here
232
    return;
166
    return;
233
}
167
}
234
168
235
=head2 supplier_ean
236
237
Missing POD for supplier_ean.
238
239
=cut
240
241
sub supplier_ean {
169
sub supplier_ean {
242
    my $self = shift;
170
    my $self = shift;
243
    foreach my $s ( @{ $self->{datasegs} } ) {
171
    foreach my $s ( @{ $self->{datasegs} } ) {
Lines 255-266 sub supplier_ean { Link Here
255
183
256
}
184
}
257
185
258
=head2 lineitems
259
260
Missing POD for lineitems.
261
262
=cut
263
264
sub lineitems {
186
sub lineitems {
265
    my $self = shift;
187
    my $self = shift;
266
    if ( $self->{quotation_lines} ) {
188
    if ( $self->{quotation_lines} ) {
Lines 310-315 Class modelling an Edifact Message for parsing Link Here
310
   Passed an array of segments extracts message level info
232
   Passed an array of segments extracts message level info
311
   and parses lineitems as Line objects
233
   and parses lineitems as Line objects
312
234
235
=head2 message_refno
236
237
Missing POD for message_refno.
238
239
=head2 function
240
241
Missing POD for function.
242
243
=head2 message_reference_number
244
245
Missing POD for message_reference_number.
246
247
=head2 message_type
248
249
Missing POD for message_type.
250
251
=head2 message_code
252
253
Missing POD for message_code.
254
255
=head2 docmsg_number
256
257
Missing POD for docmsg_number.
258
259
=head2 message_date
260
261
Missing POD for message_date.
262
263
=head2 tax_point_date
264
265
Missing POD for tax_point_date.
266
267
=head2 expiry_date
268
269
Missing POD for expiry_date.
270
271
=head2 shipment_charge
272
273
Missing POD for shipment_charge.
274
275
=head2 buyer_ean
276
277
Missing POD for buyer_ean.
278
279
=head2 supplier_ean
280
281
Missing POD for supplier_ean.
282
283
=head2 lineitems
284
285
Missing POD for lineitems.
286
313
=head1 AUTHOR
287
=head1 AUTHOR
314
288
315
   Colin Campbell <colin.campbell@ptfs-europe.com>
289
   Colin Campbell <colin.campbell@ptfs-europe.com>
(-)a/Koha/Edifact/Transport.pm (-18 / +12 lines)
Lines 88-99 sub upload_messages { Link Here
88
    return;
88
    return;
89
}
89
}
90
90
91
=head2 file_download
92
93
Missing POD for file_download.
94
95
=cut
96
97
sub file_download {
91
sub file_download {
98
    my $self = shift;
92
    my $self = shift;
99
    my @downloaded_files;
93
    my @downloaded_files;
Lines 351-362 sub sftp_upload { Link Here
351
    return;
345
    return;
352
}
346
}
353
347
354
=head2 file_upload
355
356
Missing POD for file_upload.
357
358
=cut
359
360
sub file_upload {
348
sub file_upload {
361
    my ( $self, @messages ) = @_;
349
    my ( $self, @messages ) = @_;
362
    my $dir = $self->{account}->upload_directory;
350
    my $dir = $self->{account}->upload_directory;
Lines 418-429 sub _get_file_ext { Link Here
418
    return 'XXXX';    # non matching type
406
    return 'XXXX';    # non matching type
419
}
407
}
420
408
421
=head2 message_hash
422
423
Missing POD for message_hash.
424
425
=cut
426
427
sub message_hash {
409
sub message_hash {
428
    my $self = shift;
410
    my $self = shift;
429
    my $msg  = {
411
    my $msg  = {
Lines 478-483 Or FILE to access a local directory (useful for testing) Link Here
478
460
479
   passed an array of messages will upload them to the supplier site
461
   passed an array of messages will upload them to the supplier site
480
462
463
=head2 file_download
464
465
Missing POD for file_download.
466
481
=head2 sftp_download
467
=head2 sftp_download
482
468
483
   called by download_messages to perform the download using SFTP
469
   called by download_messages to perform the download using SFTP
Lines 498-503 Or FILE to access a local directory (useful for testing) Link Here
498
484
499
  called by upload_messages to perform the upload using sftp
485
  called by upload_messages to perform the upload using sftp
500
486
487
=head2 file_upload
488
489
Missing POD for file_upload.
490
501
=head2 _abort_download
491
=head2 _abort_download
502
492
503
   internal routine to halt operation on error and supply a stacktrace
493
   internal routine to halt operation on error and supply a stacktrace
Lines 512-517 Or FILE to access a local directory (useful for testing) Link Here
512
  sets the direct ingest flag so that the object reads files from
502
  sets the direct ingest flag so that the object reads files from
513
  the local file system useful in debugging
503
  the local file system useful in debugging
514
504
505
=head2 message_hash
506
507
Missing POD for message_hash.
508
515
=head1 AUTHOR
509
=head1 AUTHOR
516
510
517
   Colin Campbell <colin.campbell@ptfs-europe.com>
511
   Colin Campbell <colin.campbell@ptfs-europe.com>
(-)a/Koha/Exception.pm (+2 lines)
Lines 61-66 Generic exception. Link Here
61
61
62
Generic method for exception stringifying.
62
Generic method for exception stringifying.
63
63
64
=head2 description
65
64
=cut
66
=cut
65
67
66
1;
68
1;
(-)a/Koha/Patron/Files.pm (-1 / +1 lines)
Lines 32-38 Koha::Patron::Files - Module for managing patron files Link Here
32
32
33
=cut
33
=cut
34
34
35
=head2 new
35
=item new
36
36
37
Missing POD for new.
37
Missing POD for new.
38
38
(-)a/Koha/Schema/Result/AccountCreditType.pm (+1 lines)
Lines 143-148 Missing POD for koha_objects_class. Link Here
143
sub koha_objects_class {
143
sub koha_objects_class {
144
    'Koha::Account::CreditTypes';
144
    'Koha::Account::CreditTypes';
145
}
145
}
146
146
=head2 koha_object_class
147
=head2 koha_object_class
147
148
148
Missing POD for koha_object_class.
149
Missing POD for koha_object_class.
(-)a/Koha/Schema/Result/AccountDebitType.pm (+1 lines)
Lines 173-178 Missing POD for koha_objects_class. Link Here
173
sub koha_objects_class {
173
sub koha_objects_class {
174
    'Koha::Account::DebitTypes';
174
    'Koha::Account::DebitTypes';
175
}
175
}
176
176
=head2 koha_object_class
177
=head2 koha_object_class
177
178
178
Missing POD for koha_object_class.
179
Missing POD for koha_object_class.
(-)a/Koha/Schema/Result/AccountOffset.pm (+1 lines)
Lines 171-176 Missing POD for koha_object_class. Link Here
171
sub koha_object_class {
171
sub koha_object_class {
172
    'Koha::Account::Offset';
172
    'Koha::Account::Offset';
173
}
173
}
174
174
=head2 koha_objects_class
175
=head2 koha_objects_class
175
176
176
Missing POD for koha_objects_class.
177
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/Accountline.pm (+1 lines)
Lines 513-518 Missing POD for koha_objects_class. Link Here
513
sub koha_objects_class {
513
sub koha_objects_class {
514
    'Koha::Account::Lines';
514
    'Koha::Account::Lines';
515
}
515
}
516
516
=head2 koha_object_class
517
=head2 koha_object_class
517
518
518
Missing POD for koha_object_class.
519
Missing POD for koha_object_class.
(-)a/Koha/Schema/Result/Aqbasket.pm (+1 lines)
Lines 388-393 Missing POD for koha_object_class. Link Here
388
sub koha_object_class {
388
sub koha_object_class {
389
    'Koha::Acquisition::Basket';
389
    'Koha::Acquisition::Basket';
390
}
390
}
391
391
=head2 koha_objects_class
392
=head2 koha_objects_class
392
393
393
Missing POD for koha_objects_class.
394
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/Aqbasketgroup.pm (+1 lines)
Lines 151-156 Missing POD for koha_object_class. Link Here
151
sub koha_object_class {
151
sub koha_object_class {
152
    'Koha::Acquisition::BasketGroup';
152
    'Koha::Acquisition::BasketGroup';
153
}
153
}
154
154
=head2 koha_objects_class
155
=head2 koha_objects_class
155
156
156
Missing POD for koha_objects_class.
157
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/Aqbookseller.pm (+1 lines)
Lines 559-564 Missing POD for koha_object_class. Link Here
559
sub koha_object_class {
559
sub koha_object_class {
560
    'Koha::Acquisition::Bookseller';
560
    'Koha::Acquisition::Bookseller';
561
}
561
}
562
562
=head2 koha_objects_class
563
=head2 koha_objects_class
563
564
564
Missing POD for koha_objects_class.
565
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/AqbooksellerAlias.pm (+1 lines)
Lines 100-105 Missing POD for koha_object_class. Link Here
100
sub koha_object_class {
100
sub koha_object_class {
101
    'Koha::Acquisition::Bookseller::Alias';
101
    'Koha::Acquisition::Bookseller::Alias';
102
}
102
}
103
103
=head2 koha_objects_class
104
=head2 koha_objects_class
104
105
105
Missing POD for koha_objects_class.
106
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/AqbooksellerInterface.pm (+1 lines)
Lines 156-161 Missing POD for koha_object_class. Link Here
156
sub koha_object_class {
156
sub koha_object_class {
157
    'Koha::Acquisition::Bookseller::Interface';
157
    'Koha::Acquisition::Bookseller::Interface';
158
}
158
}
159
159
=head2 koha_objects_class
160
=head2 koha_objects_class
160
161
161
Missing POD for koha_objects_class.
162
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/AqbooksellerIssue.pm (+1 lines)
Lines 129-134 Missing POD for koha_object_class. Link Here
129
sub koha_object_class {
129
sub koha_object_class {
130
    'Koha::Acquisition::Bookseller::Issue';
130
    'Koha::Acquisition::Bookseller::Issue';
131
}
131
}
132
132
=head2 koha_objects_class
133
=head2 koha_objects_class
133
134
134
Missing POD for koha_objects_class.
135
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/Aqbudget.pm (+1 lines)
Lines 378-383 Missing POD for koha_object_class. Link Here
378
sub koha_object_class {
378
sub koha_object_class {
379
    'Koha::Acquisition::Fund';
379
    'Koha::Acquisition::Fund';
380
}
380
}
381
381
=head2 koha_objects_class
382
=head2 koha_objects_class
382
383
383
Missing POD for koha_objects_class.
384
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/Aqbudgetperiod.pm (+1 lines)
Lines 158-163 Missing POD for koha_object_class. Link Here
158
sub koha_object_class {
158
sub koha_object_class {
159
    'Koha::Acquisition::Budget';
159
    'Koha::Acquisition::Budget';
160
}
160
}
161
161
=head2 koha_objects_class
162
=head2 koha_objects_class
162
163
163
Missing POD for koha_objects_class.
164
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/Aqcontact.pm (+1 lines)
Lines 215-220 Missing POD for koha_object_class. Link Here
215
sub koha_object_class {
215
sub koha_object_class {
216
    'Koha::Acquisition::Bookseller::Contact';
216
    'Koha::Acquisition::Bookseller::Contact';
217
}
217
}
218
218
=head2 koha_objects_class
219
=head2 koha_objects_class
219
220
220
Missing POD for koha_objects_class.
221
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/Aqinvoice.pm (+1 lines)
Lines 245-250 Missing POD for koha_object_class. Link Here
245
sub koha_object_class {
245
sub koha_object_class {
246
    'Koha::Acquisition::Invoice';
246
    'Koha::Acquisition::Invoice';
247
}
247
}
248
248
=head2 koha_objects_class
249
=head2 koha_objects_class
249
250
250
Missing POD for koha_objects_class.
251
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/AqinvoiceAdjustment.pm (+1 lines)
Lines 175-180 Missing POD for koha_object_class. Link Here
175
sub koha_object_class {
175
sub koha_object_class {
176
    'Koha::Acquisition::Invoice::Adjustment';
176
    'Koha::Acquisition::Invoice::Adjustment';
177
}
177
}
178
178
=head2 koha_objects_class
179
=head2 koha_objects_class
179
180
180
Missing POD for koha_objects_class.
181
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/AqordersClaim.pm (+1 lines)
Lines 106-111 Missing POD for koha_object_class. Link Here
106
sub koha_object_class {
106
sub koha_object_class {
107
    'Koha::Acquisition::Order::Claim';
107
    'Koha::Acquisition::Order::Claim';
108
}
108
}
109
109
=head2 koha_objects_class
110
=head2 koha_objects_class
110
111
111
Missing POD for koha_objects_class.
112
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/AuthHeader.pm (+1 lines)
Lines 151-156 Missing POD for koha_object_class. Link Here
151
sub koha_object_class {
151
sub koha_object_class {
152
    'Koha::Authority';
152
    'Koha::Authority';
153
}
153
}
154
154
=head2 koha_objects_class
155
=head2 koha_objects_class
155
156
156
Missing POD for koha_objects_class.
157
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/AuthSubfieldStructure.pm (+1 lines)
Lines 229-234 Missing POD for koha_object_class. Link Here
229
sub koha_object_class {
229
sub koha_object_class {
230
    'Koha::Authority::Subfield';
230
    'Koha::Authority::Subfield';
231
}
231
}
232
232
=head2 koha_objects_class
233
=head2 koha_objects_class
233
234
234
Missing POD for koha_objects_class.
235
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/AuthTagStructure.pm (+1 lines)
Lines 139-144 Missing POD for koha_object_class. Link Here
139
sub koha_object_class {
139
sub koha_object_class {
140
    'Koha::Authority::Tag';
140
    'Koha::Authority::Tag';
141
}
141
}
142
142
=head2 koha_objects_class
143
=head2 koha_objects_class
143
144
144
Missing POD for koha_objects_class.
145
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/AuthType.pm (+1 lines)
Lines 119-124 Missing POD for koha_object_class. Link Here
119
sub koha_object_class {
119
sub koha_object_class {
120
    'Koha::Authority::Type';
120
    'Koha::Authority::Type';
121
}
121
}
122
122
=head2 koha_objects_class
123
=head2 koha_objects_class
123
124
124
Missing POD for koha_objects_class.
125
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/BiblioMetadata.pm (+1 lines)
Lines 174-179 Missing POD for koha_object_class. Link Here
174
sub koha_object_class {
174
sub koha_object_class {
175
    'Koha::Biblio::Metadata';
175
    'Koha::Biblio::Metadata';
176
}
176
}
177
177
=head2 koha_objects_class
178
=head2 koha_objects_class
178
179
179
Missing POD for koha_objects_class.
180
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/Borrower.pm (+1 lines)
Lines 2239-2244 Missing POD for koha_objects_class. Link Here
2239
sub koha_objects_class {
2239
sub koha_objects_class {
2240
    'Koha::Patrons';
2240
    'Koha::Patrons';
2241
}
2241
}
2242
2242
=head2 koha_object_class
2243
=head2 koha_object_class
2243
2244
2244
Missing POD for koha_object_class.
2245
Missing POD for koha_object_class.
(-)a/Koha/Schema/Result/BorrowerAttribute.pm (+1 lines)
Lines 141-146 Missing POD for koha_object_class. Link Here
141
sub koha_object_class {
141
sub koha_object_class {
142
    'Koha::Patron::Attribute';
142
    'Koha::Patron::Attribute';
143
}
143
}
144
144
=head2 koha_objects_class
145
=head2 koha_objects_class
145
146
146
Missing POD for koha_objects_class.
147
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/BorrowerAttributeType.pm (+1 lines)
Lines 294-299 Missing POD for koha_object_class. Link Here
294
sub koha_object_class {
294
sub koha_object_class {
295
    'Koha::Patron::Attribute::Type';
295
    'Koha::Patron::Attribute::Type';
296
}
296
}
297
297
=head2 koha_objects_class
298
=head2 koha_objects_class
298
299
299
Missing POD for koha_objects_class.
300
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/BorrowerDebarment.pm (+1 lines)
Lines 174-179 Missing POD for koha_objects_class. Link Here
174
sub koha_objects_class {
174
sub koha_objects_class {
175
    'Koha::Patron::Restrictions';
175
    'Koha::Patron::Restrictions';
176
}
176
}
177
177
=head2 koha_object_class
178
=head2 koha_object_class
178
179
179
Missing POD for koha_object_class.
180
Missing POD for koha_object_class.
(-)a/Koha/Schema/Result/BorrowerMessagePreference.pm (+1 lines)
Lines 203-208 Missing POD for koha_object_class. Link Here
203
sub koha_object_class {
203
sub koha_object_class {
204
  'Koha::Patron::MessagePreference';
204
  'Koha::Patron::MessagePreference';
205
}
205
}
206
206
=head2 koha_objects_class
207
=head2 koha_objects_class
207
208
208
Missing POD for koha_objects_class.
209
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/BorrowerMessageTransportPreference.pm (+1 lines)
Lines 122-127 Missing POD for koha_object_class. Link Here
122
sub koha_object_class {
122
sub koha_object_class {
123
  'Koha::Patron::MessagePreference::Transport::Preference';
123
  'Koha::Patron::MessagePreference::Transport::Preference';
124
}
124
}
125
125
=head2 koha_objects_class
126
=head2 koha_objects_class
126
127
127
Missing POD for koha_objects_class.
128
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/BorrowerModification.pm (+1 lines)
Lines 667-672 Missing POD for koha_object_class. Link Here
667
sub koha_object_class {
667
sub koha_object_class {
668
    'Koha::Patron::Modification';
668
    'Koha::Patron::Modification';
669
}
669
}
670
670
=head2 koha_objects_class
671
=head2 koha_objects_class
671
672
672
Missing POD for koha_objects_class.
673
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/BorrowerRelationship.pm (+1 lines)
Lines 133-138 Missing POD for koha_objects_class. Link Here
133
sub koha_objects_class {
133
sub koha_objects_class {
134
    'Koha::Patron::Relationships';
134
    'Koha::Patron::Relationships';
135
}
135
}
136
136
=head2 koha_object_class
137
=head2 koha_object_class
137
138
138
Missing POD for koha_object_class.
139
Missing POD for koha_object_class.
(-)a/Koha/Schema/Result/Branch.pm (+1 lines)
Lines 1029-1034 Missing POD for koha_object_class. Link Here
1029
sub koha_object_class {
1029
sub koha_object_class {
1030
    'Koha::Library';
1030
    'Koha::Library';
1031
}
1031
}
1032
1032
=head2 koha_objects_class
1033
=head2 koha_objects_class
1033
1034
1034
Missing POD for koha_objects_class.
1035
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/BranchTransferLimit.pm (+1 lines)
Lines 111-116 Missing POD for koha_object_class. Link Here
111
sub koha_object_class {
111
sub koha_object_class {
112
    'Koha::Item::Transfer::Limit';
112
    'Koha::Item::Transfer::Limit';
113
}
113
}
114
114
=head2 koha_objects_class
115
=head2 koha_objects_class
115
116
116
Missing POD for koha_objects_class.
117
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/BranchesOverdrive.pm (+1 lines)
Lines 87-92 Missing POD for koha_object_class. Link Here
87
sub koha_object_class {
87
sub koha_object_class {
88
    'Koha::Library::OverDriveInfo';
88
    'Koha::Library::OverDriveInfo';
89
}
89
}
90
90
=head2 koha_objects_class
91
=head2 koha_objects_class
91
92
92
Missing POD for koha_objects_class.
93
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/Branchtransfer.pm (+1 lines)
Lines 287-292 Missing POD for koha_object_class. Link Here
287
sub koha_object_class {
287
sub koha_object_class {
288
    'Koha::Item::Transfer';
288
    'Koha::Item::Transfer';
289
}
289
}
290
290
=head2 koha_objects_class
291
=head2 koha_objects_class
291
292
292
Missing POD for koha_objects_class.
293
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/CheckoutRenewal.pm (+1 lines)
Lines 194-199 Missing POD for koha_objects_class. Link Here
194
sub koha_objects_class {
194
sub koha_objects_class {
195
    'Koha::Checkouts::Renewals';
195
    'Koha::Checkouts::Renewals';
196
}
196
}
197
197
=head2 koha_object_class
198
=head2 koha_object_class
198
199
199
Missing POD for koha_object_class.
200
Missing POD for koha_object_class.
(-)a/Koha/Schema/Result/ClubEnrollment.pm (+1 lines)
Lines 203-208 Missing POD for koha_object_class. Link Here
203
sub koha_object_class {
203
sub koha_object_class {
204
    'Koha::Club::Enrollment';
204
    'Koha::Club::Enrollment';
205
}
205
}
206
206
=head2 koha_objects_class
207
=head2 koha_objects_class
207
208
208
Missing POD for koha_objects_class.
209
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/ClubEnrollmentField.pm (+1 lines)
Lines 116-121 Missing POD for koha_object_class. Link Here
116
sub koha_object_class {
116
sub koha_object_class {
117
    'Koha::Club::Enrollment::Field';
117
    'Koha::Club::Enrollment::Field';
118
}
118
}
119
119
=head2 koha_objects_class
120
=head2 koha_objects_class
120
121
121
Missing POD for koha_objects_class.
122
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/ClubField.pm (+1 lines)
Lines 116-121 Missing POD for koha_object_class. Link Here
116
sub koha_object_class {
116
sub koha_object_class {
117
    'Koha::Club::Field';
117
    'Koha::Club::Field';
118
}
118
}
119
119
=head2 koha_objects_class
120
=head2 koha_objects_class
120
121
121
Missing POD for koha_objects_class.
122
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/ClubHold.pm (+1 lines)
Lines 174-179 Missing POD for koha_objects_class. Link Here
174
sub koha_objects_class {
174
sub koha_objects_class {
175
    'Koha::Club::Holds';
175
    'Koha::Club::Holds';
176
}
176
}
177
177
=head2 koha_object_class
178
=head2 koha_object_class
178
179
179
Missing POD for koha_object_class.
180
Missing POD for koha_object_class.
(-)a/Koha/Schema/Result/ClubHoldsToPatronHold.pm (+1 lines)
Lines 172-177 Missing POD for koha_objects_class. Link Here
172
sub koha_objects_class {
172
sub koha_objects_class {
173
    'Koha::Club::Hold::PatronHolds';
173
    'Koha::Club::Hold::PatronHolds';
174
}
174
}
175
175
=head2 koha_object_class
176
=head2 koha_object_class
176
177
177
Missing POD for koha_object_class.
178
Missing POD for koha_object_class.
(-)a/Koha/Schema/Result/ClubTemplate.pm (+1 lines)
Lines 201-206 Missing POD for koha_object_class. Link Here
201
sub koha_object_class {
201
sub koha_object_class {
202
    'Koha::Club::Template';
202
    'Koha::Club::Template';
203
}
203
}
204
204
=head2 koha_objects_class
205
=head2 koha_objects_class
205
206
206
Missing POD for koha_objects_class.
207
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/ClubTemplateEnrollmentField.pm (+1 lines)
Lines 123-128 Missing POD for koha_object_class. Link Here
123
sub koha_object_class {
123
sub koha_object_class {
124
    'Koha::Club::Template::EnrollmentField';
124
    'Koha::Club::Template::EnrollmentField';
125
}
125
}
126
126
=head2 koha_objects_class
127
=head2 koha_objects_class
127
128
128
Missing POD for koha_objects_class.
129
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/ClubTemplateField.pm (+1 lines)
Lines 123-128 Missing POD for koha_object_class. Link Here
123
sub koha_object_class {
123
sub koha_object_class {
124
    'Koha::Club::Template::Field';
124
    'Koha::Club::Template::Field';
125
}
125
}
126
126
=head2 koha_objects_class
127
=head2 koha_objects_class
127
128
128
Missing POD for koha_objects_class.
129
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/CourseInstructor.pm (+1 lines)
Lines 107-112 Missing POD for koha_objects_class. Link Here
107
sub koha_objects_class {
107
sub koha_objects_class {
108
    'Koha::Course::Instructors';
108
    'Koha::Course::Instructors';
109
}
109
}
110
110
=head2 koha_object_class
111
=head2 koha_object_class
111
112
112
Missing POD for koha_object_class.
113
Missing POD for koha_object_class.
(-)a/Koha/Schema/Result/CourseItem.pm (+1 lines)
Lines 403-408 Missing POD for koha_objects_class. Link Here
403
sub koha_objects_class {
403
sub koha_objects_class {
404
    'Koha::Course::Items';
404
    'Koha::Course::Items';
405
}
405
}
406
406
=head2 koha_object_class
407
=head2 koha_object_class
407
408
408
Missing POD for koha_object_class.
409
Missing POD for koha_object_class.
(-)a/Koha/Schema/Result/CourseReserve.pm (+1 lines)
Lines 161-166 Missing POD for koha_objects_class. Link Here
161
sub koha_objects_class {
161
sub koha_objects_class {
162
    'Koha::Course::Reserves';
162
    'Koha::Course::Reserves';
163
}
163
}
164
164
=head2 koha_object_class
165
=head2 koha_object_class
165
166
166
Missing POD for koha_object_class.
167
Missing POD for koha_object_class.
(-)a/Koha/Schema/Result/CurbsidePickupPolicy.pm (+1 lines)
Lines 162-167 Missing POD for koha_object_class. Link Here
162
sub koha_object_class {
162
sub koha_object_class {
163
    'Koha::CurbsidePickupPolicy';
163
    'Koha::CurbsidePickupPolicy';
164
}
164
}
165
165
=head2 koha_objects_class
166
=head2 koha_objects_class
166
167
167
Missing POD for koha_objects_class.
168
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/Currency.pm (+1 lines)
Lines 197-202 Missing POD for koha_object_class. Link Here
197
sub koha_object_class {
197
sub koha_object_class {
198
    'Koha::Acquisition::Currency';
198
    'Koha::Acquisition::Currency';
199
}
199
}
200
200
=head2 koha_objects_class
201
=head2 koha_objects_class
201
202
202
Missing POD for koha_objects_class.
203
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/DeletedbiblioMetadata.pm (+1 lines)
Lines 174-179 Missing POD for koha_objects_class. Link Here
174
sub koha_objects_class {
174
sub koha_objects_class {
175
    'Koha::Old::Biblio::Metadatas';
175
    'Koha::Old::Biblio::Metadatas';
176
}
176
}
177
177
=head2 koha_object_class
178
=head2 koha_object_class
178
179
179
Missing POD for koha_object_class.
180
Missing POD for koha_object_class.
(-)a/Koha/Schema/Result/Deletedbiblioitem.pm (+1 lines)
Lines 326-331 Missing POD for koha_objects_class. Link Here
326
sub koha_objects_class {
326
sub koha_objects_class {
327
    'Koha::Old::Biblioitems';
327
    'Koha::Old::Biblioitems';
328
}
328
}
329
329
=head2 koha_object_class
330
=head2 koha_object_class
330
331
331
Missing POD for koha_object_class.
332
Missing POD for koha_object_class.
(-)a/Koha/Schema/Result/Deletedborrower.pm (+1 lines)
Lines 878-883 Missing POD for koha_objects_class. Link Here
878
sub koha_objects_class {
878
sub koha_objects_class {
879
    'Koha::Old::Patrons';
879
    'Koha::Old::Patrons';
880
}
880
}
881
881
=head2 koha_object_class
882
=head2 koha_object_class
882
883
883
Missing POD for koha_object_class.
884
Missing POD for koha_object_class.
(-)a/Koha/Schema/Result/Deleteditem.pm (+1 lines)
Lines 548-553 Missing POD for koha_objects_class. Link Here
548
sub koha_objects_class {
548
sub koha_objects_class {
549
    'Koha::Old::Items';
549
    'Koha::Old::Items';
550
}
550
}
551
551
=head2 koha_object_class
552
=head2 koha_object_class
552
553
553
Missing POD for koha_object_class.
554
Missing POD for koha_object_class.
(-)a/Koha/Schema/Result/ErmAgreement.pm (+1 lines)
Lines 321-326 Missing POD for koha_object_class. Link Here
321
sub koha_object_class {
321
sub koha_object_class {
322
    'Koha::ERM::Agreement';
322
    'Koha::ERM::Agreement';
323
}
323
}
324
324
=head2 koha_objects_class
325
=head2 koha_objects_class
325
326
326
Missing POD for koha_objects_class.
327
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/ErmAgreementLicense.pm (+1 lines)
Lines 170-175 Missing POD for koha_object_class. Link Here
170
sub koha_object_class {
170
sub koha_object_class {
171
    'Koha::ERM::Agreement::License';
171
    'Koha::ERM::Agreement::License';
172
}
172
}
173
173
=head2 koha_objects_class
174
=head2 koha_objects_class
174
175
175
Missing POD for koha_objects_class.
176
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/ErmAgreementPeriod.pm (+1 lines)
Lines 129-134 Missing POD for koha_object_class. Link Here
129
sub koha_object_class {
129
sub koha_object_class {
130
    'Koha::ERM::Agreement::Period';
130
    'Koha::ERM::Agreement::Period';
131
}
131
}
132
132
=head2 koha_objects_class
133
=head2 koha_objects_class
133
134
134
Missing POD for koha_objects_class.
135
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/ErmAgreementRelationship.pm (+1 lines)
Lines 142-147 Missing POD for koha_object_class. Link Here
142
sub koha_object_class {
142
sub koha_object_class {
143
    'Koha::ERM::Agreement::Relationship';
143
    'Koha::ERM::Agreement::Relationship';
144
}
144
}
145
145
=head2 koha_objects_class
146
=head2 koha_objects_class
146
147
147
Missing POD for koha_objects_class.
148
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/ErmCounterFile.pm (+1 lines)
Lines 156-161 Missing POD for koha_object_class. Link Here
156
sub koha_object_class {
156
sub koha_object_class {
157
    'Koha::ERM::EUsage::CounterFile';
157
    'Koha::ERM::EUsage::CounterFile';
158
}
158
}
159
159
=head2 koha_objects_class
160
=head2 koha_objects_class
160
161
161
Missing POD for koha_objects_class.
162
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/ErmCounterLog.pm (+1 lines)
Lines 202-207 Missing POD for koha_object_class. Link Here
202
sub koha_object_class {
202
sub koha_object_class {
203
    'Koha::ERM::EUsage::CounterLog';
203
    'Koha::ERM::EUsage::CounterLog';
204
}
204
}
205
205
=head2 koha_objects_class
206
=head2 koha_objects_class
206
207
207
Missing POD for koha_objects_class.
208
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/ErmDefaultUsageReport.pm (+1 lines)
Lines 85-90 Missing POD for koha_object_class. Link Here
85
sub koha_object_class {
85
sub koha_object_class {
86
    'Koha::ERM::EUsage::DefaultUsageReport';
86
    'Koha::ERM::EUsage::DefaultUsageReport';
87
}
87
}
88
88
=head2 koha_objects_class
89
=head2 koha_objects_class
89
90
90
Missing POD for koha_objects_class.
91
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/ErmDocument.pm (+1 lines)
Lines 207-212 Missing POD for koha_object_class. Link Here
207
sub koha_object_class {
207
sub koha_object_class {
208
    'Koha::ERM::Document';
208
    'Koha::ERM::Document';
209
}
209
}
210
210
=head2 koha_objects_class
211
=head2 koha_objects_class
211
212
212
Missing POD for koha_objects_class.
213
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/ErmEholdingsPackage.pm (+1 lines)
Lines 242-247 Missing POD for koha_object_class. Link Here
242
sub koha_object_class {
242
sub koha_object_class {
243
    'Koha::ERM::EHoldings::Package';
243
    'Koha::ERM::EHoldings::Package';
244
}
244
}
245
245
=head2 koha_objects_class
246
=head2 koha_objects_class
246
247
247
Missing POD for koha_objects_class.
248
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/ErmEholdingsPackagesAgreement.pm (+1 lines)
Lines 107-112 Missing POD for koha_object_class. Link Here
107
sub koha_object_class {
107
sub koha_object_class {
108
    'Koha::ERM::EHoldings::Package::Agreement';
108
    'Koha::ERM::EHoldings::Package::Agreement';
109
}
109
}
110
110
=head2 koha_objects_class
111
=head2 koha_objects_class
111
112
112
Missing POD for koha_objects_class.
113
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/ErmEholdingsResource.pm (+1 lines)
Lines 179-184 Missing POD for koha_objects_class. Link Here
179
sub koha_objects_class {
179
sub koha_objects_class {
180
    'Koha::ERM::EHoldings::Resources';
180
    'Koha::ERM::EHoldings::Resources';
181
}
181
}
182
182
=head2 koha_object_class
183
=head2 koha_object_class
183
184
184
Missing POD for koha_object_class.
185
Missing POD for koha_object_class.
(-)a/Koha/Schema/Result/ErmEholdingsTitle.pm (+1 lines)
Lines 306-311 Missing POD for koha_objects_class. Link Here
306
sub koha_objects_class {
306
sub koha_objects_class {
307
    'Koha::ERM::EHoldings::Titles';
307
    'Koha::ERM::EHoldings::Titles';
308
}
308
}
309
309
=head2 koha_object_class
310
=head2 koha_object_class
310
311
311
Missing POD for koha_object_class.
312
Missing POD for koha_object_class.
(-)a/Koha/Schema/Result/ErmLicense.pm (+1 lines)
Lines 231-236 Missing POD for koha_object_class. Link Here
231
sub koha_object_class {
231
sub koha_object_class {
232
    'Koha::ERM::License';
232
    'Koha::ERM::License';
233
}
233
}
234
234
=head2 koha_objects_class
235
=head2 koha_objects_class
235
236
236
Missing POD for koha_objects_class.
237
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/ErmUsageDataProvider.pm (+1 lines)
Lines 354-359 Missing POD for koha_object_class. Link Here
354
sub koha_object_class {
354
sub koha_object_class {
355
    'Koha::ERM::EUsage::UsageDataProvider';
355
    'Koha::ERM::EUsage::UsageDataProvider';
356
}
356
}
357
357
=head2 koha_objects_class
358
=head2 koha_objects_class
358
359
359
Missing POD for koha_objects_class.
360
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/ErmUsageMus.pm (+1 lines)
Lines 283-288 Missing POD for koha_object_class. Link Here
283
sub koha_object_class {
283
sub koha_object_class {
284
    'Koha::ERM::EUsage::MonthlyUsage';
284
    'Koha::ERM::EUsage::MonthlyUsage';
285
}
285
}
286
286
=head2 koha_objects_class
287
=head2 koha_objects_class
287
288
288
Missing POD for koha_objects_class.
289
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/ErmUsageTitle.pm (+1 lines)
Lines 220-225 Missing POD for koha_object_class. Link Here
220
sub koha_object_class {
220
sub koha_object_class {
221
    'Koha::ERM::EUsage::UsageTitle';
221
    'Koha::ERM::EUsage::UsageTitle';
222
}
222
}
223
223
=head2 koha_objects_class
224
=head2 koha_objects_class
224
225
225
Missing POD for koha_objects_class.
226
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/ErmUsageYus.pm (+1 lines)
Lines 274-279 Missing POD for koha_object_class. Link Here
274
sub koha_object_class {
274
sub koha_object_class {
275
    'Koha::ERM::EUsage::YearlyUsage';
275
    'Koha::ERM::EUsage::YearlyUsage';
276
}
276
}
277
277
=head2 koha_objects_class
278
=head2 koha_objects_class
278
279
279
Missing POD for koha_objects_class.
280
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/ErmUserRole.pm (+1 lines)
Lines 160-165 Missing POD for koha_object_class. Link Here
160
sub koha_object_class {
160
sub koha_object_class {
161
    'Koha::ERM::UserRole';
161
    'Koha::ERM::UserRole';
162
}
162
}
163
163
=head2 koha_objects_class
164
=head2 koha_objects_class
164
165
165
Missing POD for koha_objects_class.
166
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/ExportFormat.pm (+1 lines)
Lines 158-163 Missing POD for koha_object_class. Link Here
158
sub koha_object_class {
158
sub koha_object_class {
159
    'Koha::CsvProfile';
159
    'Koha::CsvProfile';
160
}
160
}
161
161
=head2 koha_objects_class
162
=head2 koha_objects_class
162
163
163
Missing POD for koha_objects_class.
164
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/HoldCancellationRequest.pm (+1 lines)
Lines 96-101 Missing POD for koha_object_class. Link Here
96
sub koha_object_class {
96
sub koha_object_class {
97
    'Koha::Hold::CancellationRequest';
97
    'Koha::Hold::CancellationRequest';
98
}
98
}
99
99
=head2 koha_objects_class
100
=head2 koha_objects_class
100
101
101
Missing POD for koha_objects_class.
102
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/HouseboundProfile.pm (+1 lines)
Lines 158-163 Missing POD for koha_object_class. Link Here
158
sub koha_object_class {
158
sub koha_object_class {
159
    'Koha::Patron::HouseboundProfile';
159
    'Koha::Patron::HouseboundProfile';
160
}
160
}
161
161
=head2 koha_objects_class
162
=head2 koha_objects_class
162
163
163
Missing POD for koha_objects_class.
164
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/HouseboundRole.pm (+1 lines)
Lines 100-105 Missing POD for koha_object_class. Link Here
100
sub koha_object_class {
100
sub koha_object_class {
101
    'Koha::Patron::HouseboundRole';
101
    'Koha::Patron::HouseboundRole';
102
}
102
}
103
103
=head2 koha_objects_class
104
=head2 koha_objects_class
104
105
105
Missing POD for koha_objects_class.
106
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/HouseboundVisit.pm (+1 lines)
Lines 170-175 Missing POD for koha_object_class. Link Here
170
sub koha_object_class {
170
sub koha_object_class {
171
    'Koha::Patron::HouseboundVisit';
171
    'Koha::Patron::HouseboundVisit';
172
}
172
}
173
173
=head2 koha_objects_class
174
=head2 koha_objects_class
174
175
175
Missing POD for koha_objects_class.
176
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/IdentityProvider.pm (+1 lines)
Lines 177-182 Missing POD for koha_object_class. Link Here
177
sub koha_object_class {
177
sub koha_object_class {
178
    'Koha::Auth::Identity::Provider';
178
    'Koha::Auth::Identity::Provider';
179
}
179
}
180
180
=head2 koha_objects_class
181
=head2 koha_objects_class
181
182
182
Missing POD for koha_objects_class.
183
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/IdentityProviderDomain.pm (+1 lines)
Lines 225-230 Missing POD for koha_object_class. Link Here
225
sub koha_object_class {
225
sub koha_object_class {
226
    'Koha::Auth::Identity::Provider::Domain';
226
    'Koha::Auth::Identity::Provider::Domain';
227
}
227
}
228
228
=head2 koha_objects_class
229
=head2 koha_objects_class
229
230
230
Missing POD for koha_objects_class.
231
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/Illcomment.pm (-1 / +2 lines)
Lines 141-147 __PACKAGE__->belongs_to( Link Here
141
141
142
# Created by DBIx::Class::Schema::Loader v0.07049 @ 2021-01-21 13:39:29
142
# Created by DBIx::Class::Schema::Loader v0.07049 @ 2021-01-21 13:39:29
143
# DO NOT MODIFY THIS OR ANYTHING ABOVE! md5sum:z5Y6mVTLtrYxmqmyAc/E7A
143
# DO NOT MODIFY THIS OR ANYTHING ABOVE! md5sum:z5Y6mVTLtrYxmqmyAc/E7A
144
#
144
145
=head2 koha_objects_class
145
=head2 koha_objects_class
146
146
147
Missing POD for koha_objects_class.
147
Missing POD for koha_objects_class.
Lines 151-156 Missing POD for koha_objects_class. Link Here
151
sub koha_objects_class {
151
sub koha_objects_class {
152
    'Koha::ILL::Comments';
152
    'Koha::ILL::Comments';
153
}
153
}
154
154
=head2 koha_object_class
155
=head2 koha_object_class
155
156
156
Missing POD for koha_object_class.
157
Missing POD for koha_object_class.
(-)a/Koha/Schema/Result/ImportAuth.pm (+1 lines)
Lines 109-114 Missing POD for koha_objects_class. Link Here
109
sub koha_objects_class {
109
sub koha_objects_class {
110
    'Koha::Import::Record::Auths';
110
    'Koha::Import::Record::Auths';
111
}
111
}
112
112
=head2 koha_object_class
113
=head2 koha_object_class
113
114
114
Missing POD for koha_object_class.
115
Missing POD for koha_object_class.
(-)a/Koha/Schema/Result/ImportBiblio.pm (+1 lines)
Lines 137-142 Missing POD for koha_object_class. Link Here
137
sub koha_object_class {
137
sub koha_object_class {
138
    'Koha::Import::Record::Biblio';
138
    'Koha::Import::Record::Biblio';
139
}
139
}
140
140
=head2 koha_objects_class
141
=head2 koha_objects_class
141
142
142
Missing POD for koha_objects_class.
143
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/ImportItem.pm (+1 lines)
Lines 129-134 Missing POD for koha_object_class. Link Here
129
sub koha_object_class {
129
sub koha_object_class {
130
    'Koha::Import::Record::Item';
130
    'Koha::Import::Record::Item';
131
}
131
}
132
132
=head2 koha_objects_class
133
=head2 koha_objects_class
133
134
134
Missing POD for koha_objects_class.
135
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/ImportRecord.pm (+1 lines)
Lines 274-279 Missing POD for koha_object_class. Link Here
274
sub koha_object_class {
274
sub koha_object_class {
275
    'Koha::Import::Record';
275
    'Koha::Import::Record';
276
}
276
}
277
277
=head2 koha_objects_class
278
=head2 koha_objects_class
278
279
279
Missing POD for koha_objects_class.
280
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/ImportRecordMatch.pm (+1 lines)
Lines 114-119 Missing POD for koha_object_class. Link Here
114
sub koha_object_class {
114
sub koha_object_class {
115
    'Koha::Import::Record::Match';
115
    'Koha::Import::Record::Match';
116
}
116
}
117
117
=head2 koha_objects_class
118
=head2 koha_objects_class
118
119
119
Missing POD for koha_objects_class.
120
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/Issue.pm (+1 lines)
Lines 434-439 Missing POD for koha_object_class. Link Here
434
sub koha_object_class {
434
sub koha_object_class {
435
    'Koha::Checkout';
435
    'Koha::Checkout';
436
}
436
}
437
437
=head2 koha_objects_class
438
=head2 koha_objects_class
438
439
439
Missing POD for koha_objects_class.
440
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/Item.pm (+1 lines)
Lines 1077-1082 __PACKAGE__->might_have( Link Here
1077
);
1077
);
1078
1078
1079
use C4::Context;
1079
use C4::Context;
1080
1080
=head2 effective_itemtype
1081
=head2 effective_itemtype
1081
1082
1082
Missing POD for effective_itemtype.
1083
Missing POD for effective_itemtype.
(-)a/Koha/Schema/Result/ItemGroup.pm (+1 lines)
Lines 184-189 Missing POD for koha_objects_class. Link Here
184
sub koha_objects_class {
184
sub koha_objects_class {
185
    'Koha::Biblio::ItemGroups';
185
    'Koha::Biblio::ItemGroups';
186
}
186
}
187
187
=head2 koha_object_class
188
=head2 koha_object_class
188
189
189
Missing POD for koha_object_class.
190
Missing POD for koha_object_class.
(-)a/Koha/Schema/Result/ItemGroupItem.pm (+1 lines)
Lines 141-146 Missing POD for koha_object_class. Link Here
141
sub koha_object_class {
141
sub koha_object_class {
142
    'Koha::Biblio::ItemGroup::Item';
142
    'Koha::Biblio::ItemGroup::Item';
143
}
143
}
144
144
=head2 koha_objects_class
145
=head2 koha_objects_class
145
146
146
Missing POD for koha_objects_class.
147
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/Itemtype.pm (+1 lines)
Lines 382-387 Missing POD for koha_object_class. Link Here
382
sub koha_object_class {
382
sub koha_object_class {
383
    'Koha::ItemType';
383
    'Koha::ItemType';
384
}
384
}
385
385
=head2 koha_objects_class
386
=head2 koha_objects_class
386
387
387
Missing POD for koha_objects_class.
388
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/Letter.pm (+1 lines)
Lines 253-258 Missing POD for koha_object_class. Link Here
253
sub koha_object_class {
253
sub koha_object_class {
254
    'Koha::Notice::Template';
254
    'Koha::Notice::Template';
255
}
255
}
256
256
=head2 koha_objects_class
257
=head2 koha_objects_class
257
258
258
Missing POD for koha_objects_class.
259
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/LibraryGroup.pm (+1 lines)
Lines 278-283 Missing POD for koha_object_class. Link Here
278
sub koha_object_class {
278
sub koha_object_class {
279
    'Koha::Library::Group';
279
    'Koha::Library::Group';
280
}
280
}
281
281
=head2 koha_objects_class
282
=head2 koha_objects_class
282
283
283
Missing POD for koha_objects_class.
284
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/LibraryHour.pm (+1 lines)
Lines 109-114 Missing POD for koha_objects_class. Link Here
109
sub koha_objects_class {
109
sub koha_objects_class {
110
    'Koha::Library::Hours';
110
    'Koha::Library::Hours';
111
}
111
}
112
112
=head2 koha_object_class
113
=head2 koha_object_class
113
114
114
Missing POD for koha_object_class.
115
Missing POD for koha_object_class.
(-)a/Koha/Schema/Result/Linktracker.pm (+1 lines)
Lines 178-183 Missing POD for koha_object_class. Link Here
178
sub koha_object_class {
178
sub koha_object_class {
179
    'Koha::TrackedLink';
179
    'Koha::TrackedLink';
180
}
180
}
181
181
=head2 koha_objects_class
182
=head2 koha_objects_class
182
183
183
Missing POD for koha_objects_class.
184
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/Message.pm (+1 lines)
Lines 179-184 Missing POD for koha_object_class. Link Here
179
sub koha_object_class {
179
sub koha_object_class {
180
    'Koha::Patron::Message';
180
    'Koha::Patron::Message';
181
}
181
}
182
182
=head2 koha_objects_class
183
=head2 koha_objects_class
183
184
184
Missing POD for koha_objects_class.
185
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/MessageAttribute.pm (+1 lines)
Lines 127-132 Missing POD for koha_object_class. Link Here
127
sub koha_object_class {
127
sub koha_object_class {
128
  'Koha::Patron::MessagePreference::Attribute';
128
  'Koha::Patron::MessagePreference::Attribute';
129
}
129
}
130
130
=head2 koha_objects_class
131
=head2 koha_objects_class
131
132
132
Missing POD for koha_objects_class.
133
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/MessageQueue.pm (+1 lines)
Lines 256-261 Missing POD for koha_object_class. Link Here
256
sub koha_object_class {
256
sub koha_object_class {
257
    'Koha::Notice::Message';
257
    'Koha::Notice::Message';
258
}
258
}
259
259
=head2 koha_objects_class
260
=head2 koha_objects_class
260
261
261
Missing POD for koha_objects_class.
262
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/MessageTransport.pm (+1 lines)
Lines 144-149 Missing POD for koha_object_class. Link Here
144
sub koha_object_class {
144
sub koha_object_class {
145
  'Koha::Patron::MessagePreference::Transport';
145
  'Koha::Patron::MessagePreference::Transport';
146
}
146
}
147
147
=head2 koha_objects_class
148
=head2 koha_objects_class
148
149
149
Missing POD for koha_objects_class.
150
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/MessageTransportType.pm (+1 lines)
Lines 165-170 Missing POD for koha_object_class. Link Here
165
sub koha_object_class {
165
sub koha_object_class {
166
  'Koha::Patron::MessagePreference::Transport::Type';
166
  'Koha::Patron::MessagePreference::Transport::Type';
167
}
167
}
168
168
=head2 koha_objects_class
169
=head2 koha_objects_class
169
170
170
Missing POD for koha_objects_class.
171
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/NeedMergeAuthority.pm (+1 lines)
Lines 114-119 Missing POD for koha_object_class. Link Here
114
sub koha_object_class {
114
sub koha_object_class {
115
    'Koha::Authority::MergeRequest';
115
    'Koha::Authority::MergeRequest';
116
}
116
}
117
117
=head2 koha_objects_class
118
=head2 koha_objects_class
118
119
119
Missing POD for koha_objects_class.
120
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/OaiServer.pm (+1 lines)
Lines 133-138 Missing POD for koha_object_class. Link Here
133
sub koha_object_class {
133
sub koha_object_class {
134
    'Koha::OAIServer';
134
    'Koha::OAIServer';
135
}
135
}
136
136
=head2 koha_objects_class
137
=head2 koha_objects_class
137
138
138
Missing POD for koha_objects_class.
139
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/OauthAccessToken.pm (+1 lines)
Lines 82-87 Missing POD for koha_object_class. Link Here
82
sub koha_object_class {
82
sub koha_object_class {
83
    'Koha::OAuthAccessToken';
83
    'Koha::OAuthAccessToken';
84
}
84
}
85
85
=head2 koha_objects_class
86
=head2 koha_objects_class
86
87
87
Missing POD for koha_objects_class.
88
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/OldIssue.pm (+1 lines)
Lines 414-419 Missing POD for koha_object_class. Link Here
414
sub koha_object_class {
414
sub koha_object_class {
415
    'Koha::Old::Checkout';
415
    'Koha::Old::Checkout';
416
}
416
}
417
417
=head2 koha_objects_class
418
=head2 koha_objects_class
418
419
419
Missing POD for koha_objects_class.
420
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/OldReserve.pm (+1 lines)
Lines 504-509 Missing POD for koha_object_class. Link Here
504
sub koha_object_class {
504
sub koha_object_class {
505
    'Koha::Old::Hold';
505
    'Koha::Old::Hold';
506
}
506
}
507
507
=head2 koha_objects_class
508
=head2 koha_objects_class
508
509
509
Missing POD for koha_objects_class.
510
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/Overduerule.pm (+1 lines)
Lines 207-212 Missing POD for koha_object_class. Link Here
207
sub koha_object_class {
207
sub koha_object_class {
208
    'Koha::OverdueRule';
208
    'Koha::OverdueRule';
209
}
209
}
210
210
=head2 koha_objects_class
211
=head2 koha_objects_class
211
212
212
Missing POD for koha_objects_class.
213
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/PatronConsent.pm (+1 lines)
Lines 119-124 Missing POD for koha_object_class. Link Here
119
sub koha_object_class {
119
sub koha_object_class {
120
    'Koha::Patron::Consent';
120
    'Koha::Patron::Consent';
121
}
121
}
122
122
=head2 koha_objects_class
123
=head2 koha_objects_class
123
124
124
Missing POD for koha_objects_class.
125
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/Patronimage.pm (+1 lines)
Lines 99-104 Missing POD for koha_object_class. Link Here
99
sub koha_object_class {
99
sub koha_object_class {
100
    'Koha::Patron::Image';
100
    'Koha::Patron::Image';
101
}
101
}
102
102
=head2 koha_objects_class
103
=head2 koha_objects_class
103
104
104
Missing POD for koha_objects_class.
105
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/PluginData.pm (+1 lines)
Lines 79-84 Missing POD for koha_objects_class. Link Here
79
sub koha_objects_class {
79
sub koha_objects_class {
80
    'Koha::Plugins::Datas';
80
    'Koha::Plugins::Datas';
81
}
81
}
82
82
=head2 koha_object_class
83
=head2 koha_object_class
83
84
84
Missing POD for koha_object_class.
85
Missing POD for koha_object_class.
(-)a/Koha/Schema/Result/PluginMethod.pm (+1 lines)
Lines 71-76 Missing POD for koha_objects_class. Link Here
71
sub koha_objects_class {
71
sub koha_objects_class {
72
    'Koha::Plugins::Methods';
72
    'Koha::Plugins::Methods';
73
}
73
}
74
74
=head2 koha_object_class
75
=head2 koha_object_class
75
76
76
Missing POD for koha_object_class.
77
Missing POD for koha_object_class.
(-)a/Koha/Schema/Result/PreservationProcessing.pm (+1 lines)
Lines 130-135 Missing POD for koha_object_class. Link Here
130
sub koha_object_class {
130
sub koha_object_class {
131
    'Koha::Preservation::Processing';
131
    'Koha::Preservation::Processing';
132
}
132
}
133
133
=head2 koha_objects_class
134
=head2 koha_objects_class
134
135
135
Missing POD for koha_objects_class.
136
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/PreservationProcessingAttribute.pm (+1 lines)
Lines 141-146 Missing POD for koha_objects_class. Link Here
141
sub koha_objects_class {
141
sub koha_objects_class {
142
    'Koha::Preservation::Processing::Attributes';
142
    'Koha::Preservation::Processing::Attributes';
143
}
143
}
144
144
=head2 koha_object_class
145
=head2 koha_object_class
145
146
146
Missing POD for koha_object_class.
147
Missing POD for koha_object_class.
(-)a/Koha/Schema/Result/PreservationProcessingAttributesItem.pm (+1 lines)
Lines 125-130 Missing POD for koha_object_class. Link Here
125
sub koha_object_class {
125
sub koha_object_class {
126
    'Koha::Preservation::Train::Item::Attribute';
126
    'Koha::Preservation::Train::Item::Attribute';
127
}
127
}
128
128
=head2 koha_objects_class
129
=head2 koha_objects_class
129
130
130
Missing POD for koha_objects_class.
131
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/PreservationTrain.pm (+1 lines)
Lines 199-204 Missing POD for koha_object_class. Link Here
199
sub koha_object_class {
199
sub koha_object_class {
200
    'Koha::Preservation::Train';
200
    'Koha::Preservation::Train';
201
}
201
}
202
202
=head2 koha_objects_class
203
=head2 koha_objects_class
203
204
204
Missing POD for koha_objects_class.
205
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/PreservationTrainsItem.pm (+1 lines)
Lines 199-204 Missing POD for koha_object_class. Link Here
199
sub koha_object_class {
199
sub koha_object_class {
200
    'Koha::Preservation::Train::Item';
200
    'Koha::Preservation::Train::Item';
201
}
201
}
202
202
=head2 koha_objects_class
203
=head2 koha_objects_class
203
204
204
Missing POD for koha_objects_class.
205
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/Reserve.pm (+1 lines)
Lines 515-520 Missing POD for koha_object_class. Link Here
515
sub koha_object_class {
515
sub koha_object_class {
516
    'Koha::Hold';
516
    'Koha::Hold';
517
}
517
}
518
518
=head2 koha_objects_class
519
=head2 koha_objects_class
519
520
520
Missing POD for koha_objects_class.
521
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/RestrictionType.pm (+1 lines)
Lines 123-128 Missing POD for koha_object_class. Link Here
123
sub koha_object_class {
123
sub koha_object_class {
124
    'Koha::Patron::Restriction::Type';
124
    'Koha::Patron::Restriction::Type';
125
}
125
}
126
126
=head2 koha_objects_class
127
=head2 koha_objects_class
127
128
128
Missing POD for koha_objects_class.
129
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/ReturnClaim.pm (+1 lines)
Lines 342-347 Missing POD for koha_objects_class. Link Here
342
sub koha_objects_class {
342
sub koha_objects_class {
343
    'Koha::Checkouts::ReturnClaims';
343
    'Koha::Checkouts::ReturnClaims';
344
}
344
}
345
345
=head2 koha_object_class
346
=head2 koha_object_class
346
347
347
Missing POD for koha_object_class.
348
Missing POD for koha_object_class.
(-)a/Koha/Schema/Result/SavedSql.pm (+1 lines)
Lines 202-207 Missing POD for koha_object_class. Link Here
202
sub koha_object_class {
202
sub koha_object_class {
203
    'Koha::Report';
203
    'Koha::Report';
204
}
204
}
205
205
=head2 koha_objects_class
206
=head2 koha_objects_class
206
207
207
Missing POD for koha_objects_class.
208
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/Serialitem.pm (+1 lines)
Lines 101-106 Missing POD for koha_object_class. Link Here
101
sub koha_object_class {
101
sub koha_object_class {
102
    'Koha::Serial::Item';
102
    'Koha::Serial::Item';
103
}
103
}
104
104
=head2 koha_objects_class
105
=head2 koha_objects_class
105
106
106
Missing POD for koha_objects_class.
107
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/SmsProvider.pm (+1 lines)
Lines 108-113 Missing POD for koha_object_class. Link Here
108
sub koha_object_class {
108
sub koha_object_class {
109
    'Koha::SMS::Provider';
109
    'Koha::SMS::Provider';
110
}
110
}
111
111
=head2 koha_objects_class
112
=head2 koha_objects_class
112
113
113
Missing POD for koha_objects_class.
114
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/Stockrotationitem.pm (+1 lines)
Lines 130-135 Missing POD for koha_object_class. Link Here
130
sub koha_object_class {
130
sub koha_object_class {
131
    'Koha::StockRotationItem';
131
    'Koha::StockRotationItem';
132
}
132
}
133
133
=head2 koha_objects_class
134
=head2 koha_objects_class
134
135
135
Missing POD for koha_objects_class.
136
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/Stockrotationrota.pm (+1 lines)
Lines 138-143 Missing POD for koha_object_class. Link Here
138
sub koha_object_class {
138
sub koha_object_class {
139
    'Koha::StockRotationRota';
139
    'Koha::StockRotationRota';
140
}
140
}
141
141
=head2 koha_objects_class
142
=head2 koha_objects_class
142
143
143
Missing POD for koha_objects_class.
144
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/Stockrotationstage.pm (+1 lines)
Lines 155-160 Missing POD for koha_object_class. Link Here
155
sub koha_object_class {
155
sub koha_object_class {
156
    'Koha::StockRotationStage';
156
    'Koha::StockRotationStage';
157
}
157
}
158
158
=head2 koha_objects_class
159
=head2 koha_objects_class
159
160
160
Missing POD for koha_objects_class.
161
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/SubscriptionFrequency.pm (+1 lines)
Lines 120-125 Missing POD for koha_object_class. Link Here
120
sub koha_object_class {
120
sub koha_object_class {
121
    'Koha::Subscription::Frequency';
121
    'Koha::Subscription::Frequency';
122
}
122
}
123
123
=head2 koha_objects_class
124
=head2 koha_objects_class
124
125
125
Missing POD for koha_objects_class.
126
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/SubscriptionNumberpattern.pm (+1 lines)
Lines 240-245 Missing POD for koha_object_class. Link Here
240
sub koha_object_class {
240
sub koha_object_class {
241
    'Koha::Subscription::Numberpattern';
241
    'Koha::Subscription::Numberpattern';
242
}
242
}
243
243
=head2 koha_objects_class
244
=head2 koha_objects_class
244
245
245
Missing POD for koha_objects_class.
246
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/Subscriptionhistory.pm (+1 lines)
Lines 145-150 Missing POD for koha_object_class. Link Here
145
sub koha_object_class {
145
sub koha_object_class {
146
    'Koha::Subscription::History';
146
    'Koha::Subscription::History';
147
}
147
}
148
148
=head2 koha_objects_class
149
=head2 koha_objects_class
149
150
150
Missing POD for koha_objects_class.
151
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/Subscriptionroutinglist.pm (+1 lines)
Lines 140-145 Missing POD for koha_object_class. Link Here
140
sub koha_object_class {
140
sub koha_object_class {
141
    'Koha::Subscription::Routinglist';
141
    'Koha::Subscription::Routinglist';
142
}
142
}
143
143
=head2 koha_objects_class
144
=head2 koha_objects_class
144
145
145
Missing POD for koha_objects_class.
146
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/Systempreference.pm (+1 lines)
Lines 101-106 Missing POD for koha_object_class. Link Here
101
sub koha_object_class {
101
sub koha_object_class {
102
    'Koha::Config::SysPref';
102
    'Koha::Config::SysPref';
103
}
103
}
104
104
=head2 koha_objects_class
105
=head2 koha_objects_class
105
106
106
Missing POD for koha_objects_class.
107
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/TagAll.pm (+1 lines)
Lines 153-158 Missing POD for koha_object_class. Link Here
153
sub koha_object_class {
153
sub koha_object_class {
154
    'Koha::Tag';
154
    'Koha::Tag';
155
}
155
}
156
156
=head2 koha_objects_class
157
=head2 koha_objects_class
157
158
158
Missing POD for koha_objects_class.
159
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/TagsApproval.pm (+1 lines)
Lines 144-149 Missing POD for koha_object_class. Link Here
144
sub koha_object_class {
144
sub koha_object_class {
145
    'Koha::Tags::Approval';
145
    'Koha::Tags::Approval';
146
}
146
}
147
147
=head2 koha_objects_class
148
=head2 koha_objects_class
148
149
149
Missing POD for koha_objects_class.
150
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/TagsIndex.pm (+1 lines)
Lines 118-123 Missing POD for koha_object_class. Link Here
118
sub koha_object_class {
118
sub koha_object_class {
119
    'Koha::Tags::Index';
119
    'Koha::Tags::Index';
120
}
120
}
121
121
=head2 koha_objects_class
122
=head2 koha_objects_class
122
123
123
Missing POD for koha_objects_class.
124
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/TicketUpdate.pm (+1 lines)
Lines 198-203 Missing POD for koha_object_class. Link Here
198
sub koha_object_class {
198
sub koha_object_class {
199
    'Koha::Ticket::Update';
199
    'Koha::Ticket::Update';
200
}
200
}
201
201
=head2 koha_objects_class
202
=head2 koha_objects_class
202
203
203
Missing POD for koha_objects_class.
204
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/Virtualshelve.pm (+1 lines)
Lines 231-236 Missing POD for koha_object_class. Link Here
231
sub koha_object_class {
231
sub koha_object_class {
232
    'Koha::Virtualshelf';
232
    'Koha::Virtualshelf';
233
}
233
}
234
234
=head2 koha_objects_class
235
=head2 koha_objects_class
235
236
236
Missing POD for koha_objects_class.
237
Missing POD for koha_objects_class.
(-)a/Koha/Schema/Result/Z3950server.pm (+1 lines)
Lines 238-243 Missing POD for koha_object_class. Link Here
238
sub koha_object_class {
238
sub koha_object_class {
239
    'Koha::Z3950Server';
239
    'Koha::Z3950Server';
240
}
240
}
241
241
=head2 koha_objects_class
242
=head2 koha_objects_class
242
243
243
Missing POD for koha_objects_class.
244
Missing POD for koha_objects_class.
(-)a/Koha/Template/Plugin/AuthorisedValues.pm (-12 / +8 lines)
Lines 35-46 sub GetByCode { Link Here
35
        : $code;
35
        : $code;
36
}
36
}
37
37
38
=head2 Get
39
40
Missing POD for Get.
41
42
=cut
43
44
sub Get {
38
sub Get {
45
    my ( $self, $category, $selected, $opac ) = @_;
39
    my ( $self, $category, $selected, $opac ) = @_;
46
    return GetAuthorisedValues( $category, $selected, $opac );
40
    return GetAuthorisedValues( $category, $selected, $opac );
Lines 60-71 sub GetAuthValueDropbox { Link Here
60
    );
54
    );
61
}
55
}
62
56
63
=head2 GetCategories
64
65
Missing POD for GetCategories.
66
67
=cut
68
69
sub GetCategories {
57
sub GetCategories {
70
    my ( $self, $params ) = @_;
58
    my ( $self, $params ) = @_;
71
    my $selected   = $params->{selected};
59
    my $selected   = $params->{selected};
Lines 122-131 Koha::Template::Plugin::AuthorisedValues - TT Plugin for authorised values Link Here
122
In a template, you can get the description for an authorised value with
110
In a template, you can get the description for an authorised value with
123
the following TT code: [% AuthorisedValues.GetByCode( 'CATEGORY', 'AUTHORISED_VALUE_CODE', 'IS_OPAC' ) %]
111
the following TT code: [% AuthorisedValues.GetByCode( 'CATEGORY', 'AUTHORISED_VALUE_CODE', 'IS_OPAC' ) %]
124
112
113
=head2 Get
114
115
Missing POD for Get.
116
125
=head2 GetAuthValueDropbox
117
=head2 GetAuthValueDropbox
126
118
127
The parameters are identical to those used by the subroutine C4::Koha::GetAuthValueDropbox
119
The parameters are identical to those used by the subroutine C4::Koha::GetAuthValueDropbox
128
120
121
=head2 GetCategories
122
123
Missing POD for GetCategories.
124
129
=head2 GetDescriptionsByKohaField
125
=head2 GetDescriptionsByKohaField
130
126
131
The parameters are identical to those used by the subroutine Koha::AuthorisedValues->get_descriptions_by_koha_field
127
The parameters are identical to those used by the subroutine Koha::AuthorisedValues->get_descriptions_by_koha_field
(-)a/t/lib/QA/TemplateFilters.pm (-6 / +3 lines)
Lines 122-133 sub _process_tt_content { Link Here
122
    return { errors => \@errors, new_content => $new_content };
122
    return { errors => \@errors, new_content => $new_content };
123
}
123
}
124
124
125
=head2 process_tt_block
126
127
Missing POD for process_tt_block.
128
129
=cut
130
131
sub process_tt_block {
125
sub process_tt_block {
132
    my ( $line, $params ) = @_;
126
    my ( $line, $params ) = @_;
133
    my $tt_block   = $params->{tt_block};
127
    my $tt_block   = $params->{tt_block};
Lines 280-285 and to not duplicate the code. Link Here
280
    * line is the line where the error has been found.
274
    * line is the line where the error has been found.
281
    * line_number is the line number where the error has been found.
275
    * line_number is the line number where the error has been found.
282
276
277
=head2 process_tt_block
278
279
Missing POD for process_tt_block.
283
280
284
=head1 AUTHORS
281
=head1 AUTHORS
285
282
(-)a/t/lib/Selenium.pm (-18 / +12 lines)
Lines 73-84 sub remove_error_handler { Link Here
73
    $self->{driver}->error_handler( sub { } );
73
    $self->{driver}->error_handler( sub { } );
74
}
74
}
75
75
76
=head2 config
77
78
Missing POD for config.
79
80
=cut
81
82
sub config {
76
sub config {
83
    return {
77
    return {
84
        login    => $ENV{KOHA_USER} || 'koha',
78
        login    => $ENV{KOHA_USER} || 'koha',
Lines 103-114 sub auth { Link Here
103
    $login_button->click();
97
    $login_button->click();
104
}
98
}
105
99
106
=head2 opac_auth
107
108
Missing POD for opac_auth.
109
110
=cut
111
112
sub opac_auth {
100
sub opac_auth {
113
    my ( $self, $login, $password ) = @_;
101
    my ( $self, $login, $password ) = @_;
114
102
Lines 309-320 sub click_when_visible { Link Here
309
    $elt->click unless $clicked;    # finally Raise the error
297
    $elt->click unless $clicked;    # finally Raise the error
310
}
298
}
311
299
312
=head2 max_retries
313
314
Missing POD for max_retries.
315
316
=cut
317
318
sub max_retries { 10 }
300
sub max_retries { 10 }
319
301
320
=head1 NAME
302
=head1 NAME
Lines 438-443 It will remove any kinds of error raised by the driver. Link Here
438
It can be useful in some cases, for instance if you want to make sure something will not happen and that could make the driver exploses otherwise.
420
It can be useful in some cases, for instance if you want to make sure something will not happen and that could make the driver exploses otherwise.
439
You certainly should call it for only one statement then must call add_error_handler right after.
421
You certainly should call it for only one statement then must call add_error_handler right after.
440
422
423
=head2 config
424
425
Missing POD for config.
426
427
=head2 opac_auth
428
429
Missing POD for opac_auth.
430
431
=head2 max_retries
432
433
Missing POD for max_retries.
434
441
=head1 AUTHORS
435
=head1 AUTHORS
442
436
443
Jonathan Druart <jonathan.druart@bugs.koha-community.org>
437
Jonathan Druart <jonathan.druart@bugs.koha-community.org>
(-)a/t/lib/TestBuilder.pm (-19 / +12 lines)
Lines 161-172 sub build { Link Here
161
    );
161
    );
162
}
162
}
163
163
164
=head2 build_sample_biblio
165
166
Missing POD for build_sample_biblio.
167
168
=cut
169
170
sub build_sample_biblio {
164
sub build_sample_biblio {
171
    my ( $self, $args ) = @_;
165
    my ( $self, $args ) = @_;
172
166
Lines 198-209 sub build_sample_biblio { Link Here
198
    return Koha::Biblios->find($biblio_id);
192
    return Koha::Biblios->find($biblio_id);
199
}
193
}
200
194
201
=head2 build_sample_item
202
203
Missing POD for build_sample_item.
204
205
=cut
206
207
sub build_sample_item {
195
sub build_sample_item {
208
    my ( $self, $args ) = @_;
196
    my ( $self, $args ) = @_;
209
197
Lines 602-613 sub _gen_text { Link Here
602
    return $random->randregex($regex);
590
    return $random->randregex($regex);
603
}
591
}
604
592
605
=head2 alt_rand
606
607
Missing POD for alt_rand.
608
609
=cut
610
611
sub alt_rand {    #Alternative randomizer
593
sub alt_rand {    #Alternative randomizer
612
    my ($max)  = @_;
594
    my ($max)  = @_;
613
    my $random = Bytes::Random::Secure->new( NonBlocking => 1 );
595
    my $random = Bytes::Random::Secure->new( NonBlocking => 1 );
Lines 830-835 if a record with that primary key already exists. Link Here
830
Given a plural Koha::Object-derived class, it creates a random element, and
812
Given a plural Koha::Object-derived class, it creates a random element, and
831
returns the corresponding Koha::Object.
813
returns the corresponding Koha::Object.
832
814
815
=head2 build_sample_biblio
816
817
Missing POD for build_sample_biblio.
818
819
=head2 build_sample_item
820
821
Missing POD for build_sample_item.
822
833
=head2 build_sample_ill_request
823
=head2 build_sample_ill_request
834
824
835
    my $ill_request = $builder->build_sample_ill_request({ biblio_id => $biblio_id });
825
    my $ill_request = $builder->build_sample_ill_request({ biblio_id => $biblio_id });
Lines 848-853 C<$args> is a hashref with the following optional keys: Link Here
848
838
849
=back
839
=back
850
840
841
=head2 alt_rand
842
843
Missing POD for alt_rand.
844
851
=head1 AUTHOR
845
=head1 AUTHOR
852
846
853
Yohann Dufour <yohann.dufour@biblibre.com>
847
Yohann Dufour <yohann.dufour@biblibre.com>
854
- 

Return to bug 39367