--- trunk/lib/WebPAC/Input.pm	2006/09/07 15:01:45	652
+++ trunk/lib/WebPAC/Input.pm	2006/09/25 09:49:28	697
@@ -640,7 +640,7 @@
 
 	my $regexpes;
 
-	CORE::open(my $fh, $modify_path) || $log->die("can't open modify file $modify_path: $!");
+	CORE::open(my $fh, $modify_path) || $log->logdie("can't open modify file $modify_path: $!");
 
 	my ($f,$sf);