From: short <>
Date: Sun, 31 Jul 2005 08:50:32 +0000 (+0000)
Subject: Fixed handling of wrong-logged "(laceno)" lines.
X-Git-Url: https://git.jankratochvil.net/?p=nethome.git;a=commitdiff_plain;h=51a4c6abb7836aa58f9cf665a3ecc6213a05c081;ds=sidebyside

Fixed handling of wrong-logged "(laceno)" lines.
---

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 (<EDICT>) {
 		my $r=edict_line_parse() or next;
-		next if /\Q(laceno)\E/;
 		push @R,$r;
 		push @{$kana_to_r{$r->{"kana"}}},$r;
 		keys(%check);