--- trunk/Estraier.pm	2006/01/05 15:33:48	30
+++ trunk/Estraier.pm	2006/01/05 15:36:25	31
@@ -733,6 +733,20 @@
 	$self->{timeout} = $sec;
 }
 
+=head2 set_auth
+
+Specify name and password for authentication to node server.
+
+  $node->set_auth('clint','eastwood');
+
+=cut
+
+sub set_auth {
+	my $self = shift;
+	my ($login,$passwd) = @_;
+	$self->{auth} = "$login:$passwd";
+}
+
 package Search::Estraier::Master;
 
 use Carp;