--- trunk/lib/WebPAC/Input.pm	2008/08/02 23:46:41	1100
+++ trunk/lib/WebPAC/Input.pm	2008/11/17 21:18:16	1121
@@ -296,8 +296,7 @@
 				$log->debug("-=> $f_nr ## $l");
 
 				# codepage conversion and recode_regex
-#				$l = decode($input_encoding, $l, 1);
-				from_to( $l, $input_encoding, 'utf-8', 1 );
+				$l = decode($input_encoding, $l, 1);
 				$l =~ s/($recode_regex)/$recode_map->{$1}/g if ($recode_regex && $recode_map);
 
 				# apply regexps
@@ -316,7 +315,7 @@
 							warn "*** $d\n" if ($debug);
 
 						}
-						$log->error("error applying regex: $r") if ($@);
+						$log->error("error applying regex: ",dump($r)) if ($@);
 					}
 				}
 
@@ -720,6 +719,8 @@
 				line => $.,
 			};
 			$log->debug("regex: $regex");
+		} else {
+			die "can't parse: $_";
 		}
 	}