diff options
author | Alexey Shchepin <alexey@process-one.net> | 2003-10-08 18:27:48 +0000 |
---|---|---|
committer | Alexey Shchepin <alexey@process-one.net> | 2003-10-08 18:27:48 +0000 |
commit | 8e7106dd748b8b07da95f91a328ef145dc002997 (patch) | |
tree | 3f8f01715e1059c936268a90cd59b105a71e9fc1 /src/stringprep/uni_parse.tcl | |
parent | * (all): Changed JID storage format, added support for stringprep (diff) |
* src/ejabberd_c2s.erl: Added support for "jid-malformed" error
* src/stringprep/stringprep_drv.c: Bugfix
SVN Revision: 145
Diffstat (limited to 'src/stringprep/uni_parse.tcl')
-rw-r--r-- | src/stringprep/uni_parse.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/stringprep/uni_parse.tcl b/src/stringprep/uni_parse.tcl index 08eced103..447c54510 100644 --- a/src/stringprep/uni_parse.tcl +++ b/src/stringprep/uni_parse.tcl @@ -131,7 +131,7 @@ proc uni::load_tables {data} { lappend tablemap($val) $table } } - } elseif {$table == "B.3"} { + } elseif {$table == "B.2"} { if {[regexp {^ ([[:xdigit:]]+); ([[:xdigit:]]+);} $line \ temp from to]} { scan $from %x from @@ -165,7 +165,7 @@ proc uni::load_tables {data} { #puts "missed: $line" } - } elseif {$table != "B.2"} { + } elseif {$table != "B.3"} { if {[regexp {^ ([[:xdigit:]]+)-([[:xdigit:]]+)} $line \ temp from to]} { scan $from %x from |