Commits

Anonymous committed 6330874

Extracted the _next_traverse_to() method.

  • Participants
  • Parent commits 02ca695

Comments (0)

Files changed (3)

 
     - Refactoring: converted _movenext() from pseudo-conditionals
     to polymorphism by making it a method of ->_current().
+    - Refactoring: extracted the _next_traverse_to() method.
 
 0.1.2 - Sun Oct 26 12:57:55 IST 2008
     - Corrected the README.

File lib/File/Find/Object.pm

     # TODO :
     # Implement traversal to files with the filenames of exactly "0".
     if ($self->_curr_file(
-            shift(@{$top->_father($self)->_traverse_to()})
+            $top->_father($self)->_next_traverse_to()
        ))
     {
         $self->_reset_actions();

File lib/File/Find/Object/Base.pm

     return $self->_set_up_dir();
 }
 
+sub _next_traverse_to
+{
+    my $self = shift;
+
+    return shift(@{$self->_traverse_to()}); 
+}
+
 1;
 
 =head1 NAME