aboutsummaryrefslogtreecommitdiff
path: root/src/stringprep/uni_parse2.tcl
diff options
context:
space:
mode:
authorAlexey Shchepin <alexey@process-one.net>2005-05-18 23:47:33 +0000
committerAlexey Shchepin <alexey@process-one.net>2005-05-18 23:47:33 +0000
commit77f681b3209dbd01e5446c4154f6aa78aed4f15c (patch)
treeb173f8a9663b0736028ef1363cdc900a8f2f6521 /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.tcl2
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]