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

Comparing COMP/SCRAM/src/ActiveDoc/Switcher.pm (file contents):
Revision 1.13 by williamc, Wed Mar 1 11:48:11 2000 UTC vs.
Revision 1.14 by williamc, Fri Apr 7 13:39:46 2000 UTC

# Line 105 | Line 105 | sub parse {
105           } # end char while
106          } # End String while loop
107          undef $filehandle;
108 <        $self->_printstream();
108 >        # make sure we close the last buffer
109 >        $self->_calltag($self->{textcontext}, $self->{textcontext},
110 >                                                        $self->_getstore());
111 >        #$self->_printstream();
112   }
113  
114   #
# Line 168 | Line 171 | sub _nextchar() {
171          my $self=shift;
172          my $char;
173          $char=substr($self->{currentline},$self->{stringpos}++,1);
174 < #       print "Debug : Fetching character $char\n";
174 >        #print "Debug : Fetching character $char\n";
175  
176          # Keep a record for any stream processes
177          $self->{streamstore}=$self->{streamstore}.$char;

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines