--- trunk/lib/WebPAC/Validate.pm	2007/05/27 17:09:47	858
+++ trunk/lib/WebPAC/Validate.pm	2007/05/27 22:24:30	864
@@ -106,7 +106,7 @@
 		$log->logdie("can't open validate path $path: $!");
 
 	my $v;
-	delete( $self->{must_exists} );
+	delete( $self->{must_exist} );
 	delete( $self->{must_exist_sf} );
 	delete( $self->{dont_validate} );
 	my $curr_line = 1;
@@ -188,6 +188,7 @@
 	} else {
 		$log->warn("delimiters path $path doesn't exist, it will be created after this run");
 	}
+	$self->{delimiters_path} = $path;
 }
 
 =head2 validate_rec
@@ -372,7 +373,7 @@
 				$self->{_delimiters_templates}->{$f}->{$t};
 		}
 	}
-	$log->debug("_accumulated_delimiters_templates = ", sub { dump( $self->{_accumulated_delimiter_templates} ) } );
+	$log->debug("_accumulated_delimiters_templates = ", sub { dump( $self->{_accumulated_delimiters_templates} ) } );
 	delete ($self->{_delimiters_templates});
 }
 
@@ -566,18 +567,20 @@
 sub save_delimiters_templates {
 	my $self = shift;
 
-	my $path = $self->{delimiters_path};
-
-	return unless ( $path );
+	my $path = shift;
+	$path ||= $self->{delimiters_path};
 
 	my $log = $self->_get_logger;
 
+	$log->logdie("need path") unless ( $path );
+
+
 	if ( ! $self->{_accumulated_delimiters_templates} ) {
 		$log->error('no _accumulated_delimiters_templates found, reset');
 		$self->reset;
 	}
 
-	if ( ! $self->{_delimiters_templates} ) {
+	if ( $self->{_delimiters_templates} ) {
 		$log->error('found _delimiters_templates, calling reset');
 		$self->reset;
 	}