| # | Line 35 | Line 35 | sub new { | |
|---|---|---|
| 35 | my $self={}; | |
| 36 | bless $self, $class; | |
| 37 | $self->{dbstore}=shift; | |
| 38 | + | $self->cache($self->{dbstore}->cache()); |
| 39 | bless $self, $class; | |
| 40 | return $self; | |
| 41 | } | |
| # | Line 51 | Line 52 | sub cache { | |
| 52 | sub init { | |
| 53 | my $self=shift; | |
| 54 | $self->{lastsequence}=-1; | |
| 55 | < | $self->{switch}=ActiveDoc::ActiveDoc-> |
| 56 | < | new($self->{cache},$self->{dbstore}); |
| 55 | > | $self->{switch}=ActiveDoc::ActiveDoc->new($self->{dbstore}); |
| 56 | > | |
| 57 | # -- Specific Tags | |
| 58 | $self->{switch}->newparse("include"); | |
| 59 | $self->{switch}->addbasetags("include"); | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |