/[iselect]/iselect.pl
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.pl

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

revision 9 by dpavlin, Thu Oct 25 14:55:00 2007 UTC revision 10 by dpavlin, Thu Oct 25 15:12:43 2007 UTC
# Line 83  sub chunk { Line 83  sub chunk {
83  sub redraw_line {  sub redraw_line {
84          my ($l,$line) = @_;          my ($l,$line) = @_;
85    
86          if ( defined $selectable_line->{ $l } ) {          if ( defined $selectable_line->{ $l + $top_screen_line } ) {
87                  $scr->at($l,0)->bold()->puts( full_line( chunk($line) ) )->normal();                  $scr->at($l,0)->bold()->puts( full_line( chunk($line) ) )->normal();
88          } else {          } else {
89                  $scr->at($l,0)->puts( full_line( chunk($line) ) );                  $scr->at($l,0)->puts( full_line( chunk($line) ) );
Legend:
Removed from v.9  
changed lines
  Added in v.10
  ViewVC Help
Powered by ViewVC 1.1.26