use C4::Context;
use C4::Debug;
-use C4::Creators::Profile 1.000000;
-use C4::Creators::Lib 1.000000 qw(get_unit_values);
+use C4::Creators::Profile;
+use C4::Creators::Lib qw(get_unit_values);
-BEGIN {
- use version; our $VERSION = qv('3.07.00.049');
-}
sub _check_params {
shift if $_[0] =~ m/::/; # this seems a bit hackish
push @query_params, $opts{'template_id'}, $opts{'creator'};
}
if (scalar(@query_params) < 2) { # If there is no template id or creator type then we cannot delete it
- warn sprintf('%s : Cannot delete template as the template id is invalid or non-existant.', $call_type) if !$query_params[0];
- warn sprintf('%s : Cannot delete template as the creator type is invalid or non-existant.', $call_type) if !$query_params[1];
+ warn sprintf('%s : Cannot delete template as the template id is invalid or non-existent.', $call_type) if !$query_params[0];
+ warn sprintf('%s : Cannot delete template as the creator type is invalid or non-existent.', $call_type) if !$query_params[1];
return -1;
}
my $query = "DELETE FROM creator_templates WHERE template_id = ? AND creator = ?";
my $template = C4::Labels::Template->new(profile_id => 1, page_width => 8.5, page_height => 11.0, units => 'INCH'); # Creates and returns a new template object using
the supplied values to override the defaults
- B<NOTE:> This template is I<not> written to the database untill save() is invoked. You have been warned!
+ B<NOTE:> This template is I<not> written to the database until save() is invoked. You have been warned!
=head2 retrieve(template_id => $template_id)