From 51a4c6abb7836aa58f9cf665a3ecc6213a05c081 Mon Sep 17 00:00:00 2001 From: short <> Date: Sun, 31 Jul 2005 08:50:32 +0000 Subject: [PATCH] Fixed handling of wrong-logged "(laceno)" lines. --- src/jaxam | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/jaxam b/src/jaxam index 4f3c70c..821d25a 100755 --- a/src/jaxam +++ b/src/jaxam @@ -54,6 +54,7 @@ sub schedule($$%) { my($r,$exam_from,%args)=@_; + return if $r->{"orig"}=~/\Q(laceno)\E/; my $time=$args{"time"}||time(); my $sum=0; for my $result (@{$r->{"result"}}) { @@ -210,7 +211,6 @@ sub edict_read($) ); while () { my $r=edict_line_parse() or next; - next if /\Q(laceno)\E/; push @R,$r; push @{$kana_to_r{$r->{"kana"}}},$r; keys(%check); -- 1.8.3.1