From d212fc7ebab8c91665fc84d44e9a1a8551fc08c2 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Wed, 16 Apr 2014 12:49:27 -0600
Subject: [PATCH] racket/draw Cocoa: fix surroate-pair patch for Pango

---
 native-pkgs                                   | 2 +-
 racket/src/native-libs/patches/coretext.patch | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/native-pkgs b/native-pkgs
index ac6f3873bb..d816900262 160000
--- a/native-pkgs
+++ b/native-pkgs
@@ -1 +1 @@
-Subproject commit ac6f3873bb45b88c965881c07057b431ccf6eb75
+Subproject commit d81690026213e2a1c5c08235e3bf22d4511e987a
diff --git a/racket/src/native-libs/patches/coretext.patch b/racket/src/native-libs/patches/coretext.patch
index 83349729ff..c9efd51fb3 100644
--- a/racket/src/native-libs/patches/coretext.patch
+++ b/racket/src/native-libs/patches/coretext.patch
@@ -64,7 +64,7 @@ diff -r -u old/pango-1.36.3/modules/basic/basic-coretext.c new/pango-1.36.3/modu
 +  gunichar c;
 +
 +  c = CFStringGetCharacterAtIndex (iter->cstr, iter->current_indices[iter->ct_i]);
-+  if (c & 0xD800) {
++  if ((c & 0xD800) == 0xD800) {
 +    /* surrogate pair */
 +    gunichar c2;
 +    c2 = CFStringGetCharacterAtIndex (iter->cstr, iter->current_indices[iter->ct_i]+1);