Changeset cc27237 for perl/modules/Jabber/lib/BarnOwl/Message/Jabber.pm

Timestamp:

Jan 7, 2014, 6:02:25 PM (9 years ago)

Author:

Jason Gross <jgross@mit.edu>

Children:

611236e

Parents:

4b9c3b9

git-author:

Jason Gross <jgross@mit.edu> (01/01/14 20:59:51)

git-committer:

Jason Gross <jgross@mit.edu> (01/07/14 18:02:25)

Message:

Use g_utf8_casefold and g_utf8_normalize

We define a convenience function compat_casefold in util.c for reuse in
filters.

File:

• perl/modules/Jabber/lib/BarnOwl/Message/Jabber.pm (modified) (2 diffs)

perl/modules/Jabber/lib/BarnOwl/Message/Jabber.pm

@@ -15 +15 @@
 
 use base qw( BarnOwl::Message );
-use Unicode::Normalize qw( NFKC );
 
 sub jtype { shift->{jtype} };
@@ -174 +173 @@
 
 sub log_filenames {
-    return map { lc(NFKC($_)) } BarnOwl::Message::log_filenames(@_);
+    return map { BarnOwl::compat_casefold($_) } BarnOwl::Message::log_filenames(@_);
 }