Ignore:
Timestamp:
11/11/11 13:17:43 (19 months ago)
Author:
BrainSlayer
Message:

update proftp

File:
1 edited

Legend:

Unmodified
Added
Removed

  • src/router/proftpd/tests/t/lib/ProFTPD/Tests/Config/StoreUniquePrefix.pm

    r14672 r17876  
    22 
    33use lib qw(t/lib); 
    4 use base qw(Test::Unit::TestCase ProFTPD::TestSuite::Child); 
     4use base qw(ProFTPD::TestSuite::Child); 
    55use strict; 
    66 
    7 use File::Path qw(mkpath rmtree); 
    87use File::Spec; 
    98use IO::Handle; 
    … …  
    2928sub list_tests { 
    3029  return testsuite_get_runnable_tests($TESTS); 
    31 } 
    32  
    33 sub set_up { 
    34   my $self = shift; 
    35   $self->{tmpdir} = testsuite_get_tmp_dir(); 
    36  
    37   # Create temporary scratch dir 
    38   eval { mkpath($self->{tmpdir}) }; 
    39   if ($@) { 
    40     my $abs_path = File::Spec->rel2abs($self->{tmpdir}); 
    41     die("Can't create dir $abs_path: $@"); 
    42   } 
    43 } 
    44  
    45 sub tear_down { 
    46   my $self = shift; 
    47  
    48   # Remove temporary scratch dir 
    49   if ($self->{tmpdir}) { 
    50     eval { rmtree($self->{tmpdir}) }; 
    51   } 
    52  
    53   undef $self; 
    5430} 
    5531 
Note: See TracChangeset for help on using the changeset viewer.