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

Comparing COMP/SCRAM/src/ActiveDoc/Parse.pm (file contents):
Revision 1.2 by williamc, Fri Jan 14 15:55:16 2000 UTC vs.
Revision 1.3 by williamc, Fri Jan 14 18:48:46 2000 UTC

# Line 21 | Line 21
21   # tagstartline()        : return the linenumber of the last tag opening
22   # includeparse(Parse) : include the settings from another parse object
23   # tags()                : return list of defined tags
24 + # cleartags()           : clear of all tags
25  
26  
27   package ActiveDoc::Parse;
# Line 114 | Line 115 | sub addignoretags {
115                          "",$self, \&Ignore_End,$self);
116   }
117  
118 + sub cleartags {
119 +        my $self=shift;
120 +        $self->{tags}->cleartags();
121 + }
122 +
123 + sub tags {
124 +         my $self=shift;
125 +         return $self->{tags}->tags();
126 + }
127 +
128   # ---------  Basic Group Related Tags ---------------------------------
129  
130   sub Group_Start {
# Line 143 | Line 154 | sub Ignore_Start {
154          $self->{gc}->opencontext("ignore");
155   }
156  
146 sub tags {
147         my $self=shift;
148         return $self->{tags}->tags();
149 }
157   sub Ignore_End {
158          my $self=shift;
159          $self->{gc}->closecontext("ignore");

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines