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

(-)a/Koha/ArticleRequest/Status.pm (-28 / +6 lines)
Lines 19-55 package Koha::ArticleRequest::Status; Link Here
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
22
use constant Requested  => 'REQUESTED';
23
use constant Pending    => 'PENDING';
24
use constant Processing => 'PROCESSING';
25
use constant Completed  => 'COMPLETED';
26
use constant Canceled   => 'CANCELED';
27
22
=head1 AUTHOR
28
=head1 AUTHOR
23
29
24
Kyle M Hall <kyle@bywatersolutions.com>
30
Kyle M Hall <kyle@bywatersolutions.com>
25
31
26
=cut
32
=cut
27
33
28
=head2 Requested
29
30
    returns constant string 'REQUESTED'
31
32
=cut
33
34
sub Requested {
35
    return 'REQUESTED';
36
}
37
38
sub Pending {
39
    return 'PENDING';
40
}
41
42
sub Processing {
43
    return 'PROCESSING';
44
}
45
46
sub Completed {
47
    return 'COMPLETED';
48
}
49
50
sub Canceled {
51
    return 'CANCELED';
52
}
53
54
55
1;
34
1;
56
- 

Return to bug 27944