/[iselect]/ISelect.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /ISelect.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 16 by dpavlin, Thu Oct 25 19:21:12 2007 UTC revision 17 by dpavlin, Thu Oct 25 19:32:15 2007 UTC
# Line 221  sub loop { Line 221  sub loop {
221          my $callback = shift;          my $callback = shift;
222          confess "expect callback as first arg" unless ref($callback) eq 'CODE';          confess "expect callback as first arg" unless ref($callback) eq 'CODE';
223    
224          my @lines = $self->lines;          my @lines = @{ $self->lines };
225    
226          # find which lines are selectable in input file          # find which lines are selectable in input file
227          for my $l (0 .. $#lines) {          for my $l (0 .. $#lines) {

Legend:
Removed from v.16  
changed lines
  Added in v.17

  ViewVC Help
Powered by ViewVC 1.1.26