/[Search-Estraier]/trunk/Estraier.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 /trunk/Estraier.pm

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

revision 25 by dpavlin, Thu Jan 5 15:01:56 2006 UTC revision 27 by dpavlin, Thu Jan 5 15:21:29 2006 UTC
# Line 659  sub hint { Line 659  sub hint {
659  }  }
660    
661    
662    package Search::Estraier::Node;
663    
664    =head1 Search::Estraier::Node
665    
666    =head2 new
667    
668      my $node = new Search::HyperEstraier::Node;
669    
670    =cut
671    
672    sub new {
673            my $class = shift;
674            my $self = {
675                    pxport => -1,
676                    timeout => -1,
677                    dnum => -1,
678                    wnum => -1,
679                    size => -1.0,
680                    wwidth => 480,
681                    hwidth => 96,
682                    awidth => 96,
683                    status => -1,
684            };
685            bless($self, $class);
686    
687            $self ? return $self : return undef;
688    }
689    
690  package Search::Estraier::Master;  package Search::Estraier::Master;
691    
692  use Carp;  use Carp;
Legend:
Removed from v.25  
changed lines
  Added in v.27
  ViewVC Help
Powered by ViewVC 1.1.26