Mercurial > emacs
diff src/nsfns.m @ 97584:06f7d5858c5a
* nsfns.m (ns-read-file-name): Add casts to avoid warning. (ns-convert-utf8-nfd-to-nfc): Warn if cannot execute correctly. * nsfont.m (nsfont_draw): Compare indexed colors to 0, not nil. * nsterm.h (EmacsView-unlockFocusNeedsFlush:): Add declaration. (EmacsApp-cursor_blink_handler): Remove declaration. * nsterm.m (ns_draw_glyph_string): Update first conditional body to match 01 Feb 2008 changes in xterm.c. (ns_read_socket): Add cast to avoid warning. (EmacsApp-application:openFiles:): Don't call replyToOpenOrPrint: on GNUstep.
author | Adrian Robert <Adrian.B.Robert@gmail.com> |
---|---|
date | Thu, 21 Aug 2008 02:48:58 +0000 |
parents | b7e30775f9ce |
children | 6a64532bbc7b |
line wrap: on
line diff
--- a/src/nsfns.m Thu Aug 21 02:31:45 2008 +0000 +++ b/src/nsfns.m Thu Aug 21 02:48:58 2008 +0000 @@ -1440,7 +1440,7 @@ dirS = [dirS stringByExpandingTildeInPath]; panel = NILP (isLoad) ? - [EmacsSavePanel savePanel] : [EmacsOpenPanel openPanel]; + (id)[EmacsSavePanel savePanel] : (id)[EmacsOpenPanel openPanel]; [panel setTitle: promptS]; @@ -1988,11 +1988,21 @@ (str) Lisp_Object str; { +/* TODO: If GNUstep ever implements precomposedStringWithCanonicalMapping, + remove this. */ NSString *utfStr; CHECK_STRING (str); - utfStr = [[NSString stringWithUTF8String: SDATA (str)] - precomposedStringWithCanonicalMapping]; + utfStr = [NSString stringWithUTF8String: SDATA (str)]; + if (![utfStr respondsToSelector: + @selector (precomposedStringWithCanonicalMapping)]) + { + message1 + ("Warning: ns-convert-utf8-nfd-to-nfc unsupported under GNUstep.\n"); + return Qnil; + } + else + utfStr = [utfStr precomposedStringWithCanonicalMapping]; return build_string ([utfStr UTF8String]); }