Fixed warn if duplicity.
[nethome.git] / src / jaxam
index 261428c..713e826 100755 (executable)
--- a/src/jaxam
+++ b/src/jaxam
@@ -160,7 +160,7 @@ sub edict_line_parse(;$)
        my($s,$line)=@_;
 
        $s=$_ if !defined $s;
-       $line=$. if !defined $s;
+       $line=$. if !defined $line;
        chomp $s;
        local $_=$s;
        s/;.*//;