--- trunk/lib/WebPAC/Normalize.pm	2006/10/08 18:21:26	752
+++ trunk/lib/WebPAC/Normalize.pm	2006/10/31 13:19:47	766
@@ -1022,7 +1022,7 @@
 sub lookup {
 	my ($what, $database, $input, $key, $having) = @_;
 
-	confess "lookup needs 5 arguments: what, database, input, key, having" unless ($#_ == 4);
+	confess "lookup needs 5 arguments: what, database, input, key, having\n" unless ($#_ == 4);
 
 	warn "## lookup ($database, $input, $key)", $/ if ($debug > 1);
 	return unless (defined($lookup->{$database}->{$input}->{$key}));