bug 8215: (followup) make sure C4::CourseReserves doesn't export anything
[koha.git] / C4 / Patroncards / Template.pm
1 package C4::Patroncards::Template;
2
3 use strict;
4 use warnings;
5
6 use base qw(C4::Creators::Template);
7
8 use autouse 'Data::Dumper' => qw(Dumper);
9
10 BEGIN {
11     use version; our $VERSION = qv('3.07.00.049');
12 }
13
14 use constant TEMPLATE_TABLE => 'creator_templates';
15
16 __PACKAGE__ =~ m/^C4::(.+)::.+$/;
17 my $me = $1;
18
19 sub new {
20     my $self = shift;
21     push @_, "creator", $me;
22     return $self->SUPER::new(@_);
23 }
24
25 sub retrieve {
26     my $self = shift;
27     push @_, "table_name", TEMPLATE_TABLE, "creator", $me;
28     return $self->SUPER::retrieve(@_);
29 }
30
31 sub delete {
32     my $self = shift;
33     push @_, "table_name", TEMPLATE_TABLE, "creator", $me;
34     return $self->SUPER::delete(@_);
35 }
36
37 sub save {
38     my $self = shift;
39     push @_, "table_name", TEMPLATE_TABLE, "creator", $me;
40     return $self->SUPER::save(@_);
41 }
42
43 1;