diff options
-rw-r--r-- | parse-unidata.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/parse-unidata.tcl b/parse-unidata.tcl index b3beec1..5ae237f 100644 --- a/parse-unidata.tcl +++ b/parse-unidata.tcl @@ -57,7 +57,7 @@ while {[gets $f buf] >= 0} { set combining $codex } continue - } elseif {[exists combining]} { + } elseif {[info exists combining]} { lappend map(combining) $combining $codex unset combining } |