--- trunk/Estraier.pm	2006/01/05 15:05:58	26
+++ trunk/Estraier.pm	2006/01/05 15:21:29	27
@@ -659,6 +659,34 @@
 }
 
 
+package Search::Estraier::Node;
+
+=head1 Search::Estraier::Node
+
+=head2 new
+
+  my $node = new Search::HyperEstraier::Node;
+
+=cut
+
+sub new {
+	my $class = shift;
+	my $self = {
+		pxport => -1,
+		timeout => -1,
+		dnum => -1,
+		wnum => -1,
+		size => -1.0,
+		wwidth => 480,
+		hwidth => 96,
+		awidth => 96,
+		status => -1,
+	};
+	bless($self, $class);
+
+	$self ? return $self : return undef;
+}
+
 package Search::Estraier::Master;
 
 use Carp;