/[webpac2]/Webpacus/lib/Webpacus/Model/WebPAC.pm
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 /Webpacus/lib/Webpacus/Model/WebPAC.pm

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

revision 398 by dpavlin, Sun Jan 22 11:32:40 2006 UTC revision 399 by dpavlin, Sun Feb 19 12:37:27 2006 UTC
# Line 87  sub new { Line 87  sub new {
87          $log->fatal("can't create Search::Estraier::Node $url") unless ($self->{est_node});          $log->fatal("can't create Search::Estraier::Node $url") unless ($self->{est_node});
88    
89          # save config parametars in object          # save config parametars in object
90          foreach my $f (qw/db_path template_path hits_on_page webpac_encoding defaultdepth/) {          foreach my $f (qw/
91                    db_path template_path hits_on_page webpac_encoding defaultdepth
92                    masterurl
93                    /) {
94                  $self->{$f} = $c->config->{hyperestraier}->{$f} ||                  $self->{$f} = $c->config->{hyperestraier}->{$f} ||
95                          $c->config->{webpac}->{$f};                          $c->config->{webpac}->{$f};
96                  $log->debug("self->{$f} = " . $self->{$f});                  $log->debug("self->{$f} = " . $self->{$f});
# Line 138  sub new { Line 141  sub new {
141    
142  }  }
143    
144    =head2 setup_site
145    
146     $self->setup_site('site_name');
147    
148    Change node URL and database name according to site name (if available)
149    
150    =cut
151    
152    sub setup_site {
153            my $self = shift;
154    
155            my $site = shift || return;
156    
157            my $url = $self->{masterurl} . '/node/' . $site;
158            $self->{est_node}->set_url( $url );
159            $self->{log}->debug("setup_site $site");
160    }
161    
162  =head2 search  =head2 search
163    
Legend:
Removed from v.398  
changed lines
  Added in v.399
  ViewVC Help
Powered by ViewVC 1.1.26