static Lisp_Object
ns_get_foreign_selection (Lisp_Object symbol, Lisp_Object target)
{
- NSDictionary<NSString *, NSString *> *typeLookup;
+ NSDictionary *typeLookup;
id pb;
pb = ns_symbol_to_pb (symbol);
#else
@"text/plain", NSFilenamesPboardType,
#endif
- @"text/html", NSPasteboardTypeHTML,
+#ifdef NS_IMPL_COCOA
+ /* FIXME: I believe these are actually available in recent
+ versions of GNUstep. */
@"text/plain", NSPasteboardTypeMultipleTextSelection,
- @"application/pdf", NSPasteboardTypePDF,
@"image/png", NSPasteboardTypePNG,
+#endif
+ @"text/html", NSPasteboardTypeHTML,
+ @"application/pdf", NSPasteboardTypePDF,
@"application/rtf", NSPasteboardTypeRTF,
@"application/rtfd", NSPasteboardTypeRTFD,
@"STRING", NSPasteboardTypeString,
= [typeLookup allKeysForObject:
[NSString stringWithLispString:SYMBOL_NAME (target)]];
else
- availableTypes = @[NSPasteboardTypeString];
+ availableTypes = [NSArray arrayWithObject:NSPasteboardTypeString];
t = [pb availableTypeFromArray:availableTypes];
#if !defined (NS_IMPL_COCOA) || !defined (MAC_OS_X_VERSION_10_14)
/* Deprecated in macOS 10.14. */
+/* FIXME: Some of these new names, if not all, are actually available
+ in some recent version of GNUstep. */
#define NSPasteboardTypeString NSStringPboardType
#define NSPasteboardTypeTabularText NSTabularTextPboardType
#define NSPasteboardTypeURL NSURLPboardType
+#define NSPasteboardTypeHTML NSHTMLPboardType
+#define NSPasteboardTypeMultipleTextSelection NSMultipleTextSelectionPboardType
+#define NSPasteboardTypePDF NSPDFPboardType
+#define NSPasteboardTypePNG NSPNGPboardType
+#define NSPasteboardTypeRTF NSRTFPboardType
+#define NSPasteboardTypeRTFD NSRTFDPboardType
+#define NSPasteboardTypeTIFF NSTIFFPboardType
#define NSControlStateValueOn NSOnState
#define NSControlStateValueOff NSOffState
#define NSBezelStyleRounded NSRoundedBezelStyle