diff options
| author | fukachan <fukachan> | 2001-01-25 14:51:30 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2001-01-25 14:51:30 +0000 |
| commit | 6673092a67518caf7edd98700f23d94cca68950f (patch) | |
| tree | a02f9d0780075648a130fe43598113f535b930e3 /fml/lib/FML/Ticket/System.pm | |
| parent | 60c35e19d60ad6a78619849cb373afe9410b9457 (diff) | |
| download | fml8-6673092a67518caf7edd98700f23d94cca68950f.tar.gz fml8-6673092a67518caf7edd98700f23d94cca68950f.tar.bz2 fml8-6673092a67518caf7edd98700f23d94cca68950f.zip | |
clean up, log ticket-id extracted from subject
Diffstat (limited to 'fml/lib/FML/Ticket/System.pm')
| -rw-r--r-- | fml/lib/FML/Ticket/System.pm | 12 |
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; }; } |