summaryrefslogtreecommitdiff
path: root/fml/lib/FML/Ticket/System.pm
diff options
context:
space:
mode:
Diffstat (limited to 'fml/lib/FML/Ticket/System.pm')
-rw-r--r--fml/lib/FML/Ticket/System.pm12
1 files changed, 6 insertions, 6 deletions
diff --git a/fml/lib/FML/Ticket/System.pm b/fml/lib/FML/Ticket/System.pm
index d6c23aa6..0a2fb709 100644
--- a/fml/lib/FML/Ticket/System.pm
+++ b/fml/lib/FML/Ticket/System.pm
@@ -42,7 +42,7 @@ sub increment_id
}
-sub pcb_save_id
+sub _pcb_save_id
{
my ($self, $curproc, $id) = @_;
my $pcb = $curproc->{ pcb }; # FML::PCB object
@@ -50,7 +50,7 @@ sub pcb_save_id
}
-sub pcb_get_id
+sub _pcb_get_id
{
my ($self, $curproc) = @_;
my $pcb = $curproc->{ pcb }; # FML::PCB object
@@ -73,11 +73,11 @@ sub _update_cache_init
};
}
- if (defined $self->{ _cachefile }) {
- my $cachefile = $self->{ _cachefile };
- unless (-f $cachefile) {
+ if (defined $self->{ _cache_file }) {
+ my $cache_file = $self->{ _cache_file };
+ unless (-f $cache_file) {
use FML::Utils qw(touch);
- touch($cachefile) || do {
+ touch($cache_file) || do {
return undef;
};
}