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

update proftp

File:
1 edited

Legend:

Unmodified
Added
Removed
  • src/router/proftpd/tests/t/lib/ProFTPD/Tests/Commands/CDUP.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; 
     
    3635  return testsuite_get_runnable_tests($TESTS); 
    3736} 
    38  
    39 sub set_up { 
    40   my $self = shift; 
    41   $self->{tmpdir} = testsuite_get_tmp_dir(); 
    42  
    43   # Create temporary scratch dir 
    44   eval { mkpath($self->{tmpdir}) }; 
    45   if ($@) { 
    46     my $abs_path = File::Spec->rel2abs($self->{tmpdir}); 
    47     die("Can't create dir $abs_path: $@"); 
    48   } 
    49 } 
    50  
    51 sub tear_down { 
    52   my $self = shift; 
    53  
    54   # Remove temporary scratch dir 
    55   if ($self->{tmpdir}) { 
    56     eval { rmtree($self->{tmpdir}) }; 
    57   } 
    58  
    59   undef $self; 
    60 }; 
    6137 
    6238sub cdup_ok { 
     
    141117 
    142118      $expected = "CDUP command successful"; 
    143       chomp($resp_msg); 
    144119      $self->assert($expected eq $resp_msg, 
    145120        test_msg("Expected '$expected', got '$resp_msg'")); 
     
    256231 
    257232      $expected = "XCUP command successful"; 
    258       chomp($resp_msg); 
    259233      $self->assert($expected eq $resp_msg, 
    260234        test_msg("Expected '$expected', got '$resp_msg'")); 
Note: See TracChangeset for help on using the changeset viewer.