diff options
| author | fukachan <fukachan> | 2001-02-20 15:03:55 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2001-02-20 15:03:55 +0000 |
| commit | a26eb812e065e82546a9c93bd9c721101ac59f69 (patch) | |
| tree | f90fb35bbd487e07511c452561387976b619d362 /fml/lib/FML/Ticket/System.pm | |
| parent | 60120edb4f3e83a82874a61b623d6c09e2978803 (diff) | |
| download | fml8-a26eb812e065e82546a9c93bd9c721101ac59f69.tar.gz fml8-a26eb812e065e82546a9c93bd9c721101ac59f69.tar.bz2 fml8-a26eb812e065e82546a9c93bd9c721101ac59f69.zip | |
move FML::SequenceFile and Utils to File::
add File::Errors also to avoid errors
Diffstat (limited to 'fml/lib/FML/Ticket/System.pm')
| -rw-r--r-- | fml/lib/FML/Ticket/System.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/fml/lib/FML/Ticket/System.pm b/fml/lib/FML/Ticket/System.pm index 8e2c2def..67ffe5c3 100644 --- a/fml/lib/FML/Ticket/System.pm +++ b/fml/lib/FML/Ticket/System.pm @@ -33,8 +33,8 @@ sub increment_id { my ($self, $seq_file) = @_; - use FML::SequenceFile; - my $sfh = new FML::SequenceFile { sequence_file => $seq_file }; + use File::Sequence; + my $sfh = new File::Sequence { sequence_file => $seq_file }; my $id = $sfh->increment_id; $self->error_reason( $sfh->error ); @@ -66,9 +66,9 @@ sub _init_ticket_db_dir if (defined $self->{ _db_dir }) { my $db_dir = $self->{ _db_dir }; unless (-d $db_dir) { - use FML::Utils qw(mkdirhier); + use File::Utils qw(mkdirhier); mkdirhier($db_dir, $config->{ default_directory_mode }) || do { - $self->error_reason( FML::Utils->error() ); + $self->error_reason( File::Utils->error() ); return undef; }; } |