diff options
author | Alexey Shchepin <alexey@process-one.net> | 2005-05-18 23:47:33 +0000 |
---|---|---|
committer | Alexey Shchepin <alexey@process-one.net> | 2005-05-18 23:47:33 +0000 |
commit | 77f681b3209dbd01e5446c4154f6aa78aed4f15c (patch) | |
tree | b173f8a9663b0736028ef1363cdc900a8f2f6521 /src/stringprep/uni_parse2.tcl | |
parent | * src/mod_irc/mod_irc_connection.erl: Added support for WHOIS (diff) |
* src/mod_pubsub/mod_pubsub.erl: Now possible to subscribe to a
pubsub node with a JID that includes a resource (thanks to Martijn
van Beers)
* src/stringprep/uni_parse2.tcl: Bugfix
* src/stringprep/stringprep_drv.c: Likewise
* src/stringprep/uni_norm.c: Regenerated
SVN Revision: 350
Diffstat (limited to '')
-rw-r--r-- | src/stringprep/uni_parse2.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/stringprep/uni_parse2.tcl b/src/stringprep/uni_parse2.tcl index 0a40534ad..950090a09 100644 --- a/src/stringprep/uni_parse2.tcl +++ b/src/stringprep/uni_parse2.tcl @@ -261,7 +261,7 @@ proc uni::buildTables {} { } elseif {$comp_second($ch2) == 1 && ![info exists comp_first($ch2)]} { set i [llength $comp_second_list] lappend comp_second_list [list $ch1 $comp_map($comp)] - set comp_info_map($ch2) [expr {$i | (1 << 16)}] + set comp_info_map($ch2) [expr {$i | (1 << 16) | (1 << 17)}] } else { if {[lsearch -exact $comp_x_list $ch1] < 0} { set i [llength $comp_x_list] |