ViewVC Help
View File | Revision Log | Show Annotations | Root Listing
root/cvsroot/COMP/SCRAM/src/ActiveDoc/PreProcessedFile.pm
(Generate patch)

Comparing COMP/SCRAM/src/ActiveDoc/PreProcessedFile.pm (file contents):
Revision 1.5 by williamc, Fri Feb 18 10:32:16 2000 UTC vs.
Revision 1.6 by williamc, Mon Feb 21 14:30:08 2000 UTC

# Line 46 | Line 46 | sub realline {
46            $inc=$self->{includesdesc}[$i];
47            $startline=$inc->startline();
48            last if ( $line <= $startline );
49 <          if ( $line >= ($inc->lines()+$startline+2) ) {
49 >          if ( $line >= ($inc->lines()+$startline+2) ) {
50 >                                        # take out the 2 carriage returns added
51              $line=$line-($inc->lines()+$startline-$inc->endline())-2;
52   #+($inc->endline()-$startline);
53                           # n lines in original map to m lines in expanded
# Line 73 | Line 74 | sub url {
74          my $self=shift;
75  
76          if ( @_ ) {
77 <          my $url=shift;
78 <          ($self->{url}, $file)=$self->{urlhandler}->get($url);
79 <        }
80 <        else {
81 <          $self->{url};
82 <        }
77 >        my $url=shift;
78 >          ($self->{url}, $file)=$self->{urlhandler}->get($url);
79 >        }
80 >        else {
81 >          $self->{url};
82 >        }
83   }
84  
85   sub ProcessedFile {
# Line 93 | Line 94 | sub file {
94          return $file;
95   }
96  
97 + sub ProcessFile {
98 +        my $self=shift;
99 +        return $self->file();
100 + }
101  
102   sub update {
103          my $self=shift;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines