X-Git-Url: https://git.stderr.nl/gitweb?a=blobdiff_plain;f=libchimara%2Fgestalt.c;h=e3529094233d4f88cf055abc7af0023b76562421;hb=bdca86598f7604d7c20f91ac810d825513c72090;hp=2316dca52cc9992e6abe2d498ff2b7ff1342e944;hpb=13b21e2a9ba53c7109ae0bbfd774f16f0c9d4413;p=rodin%2Fchimara.git

diff --git a/libchimara/gestalt.c b/libchimara/gestalt.c
index 2316dca..e352909 100644
--- a/libchimara/gestalt.c
+++ b/libchimara/gestalt.c
@@ -108,19 +108,28 @@ glk_gestalt_ext(glui32 sel, glui32 val, glui32 *arr, glui32 arrlen)
 		case gestalt_Hyperlinks:
 			return 1;
 
-		/* Hyperlinks supported on textbuffers only at the moment */
+		/* Hyperlinks supported on textbuffers and textgrids */
 		case gestalt_HyperlinkInput:
-			return val == wintype_TextBuffer;
-			
-		/* Unsupported capabilities */
+			return val == wintype_TextBuffer || val == wintype_TextGrid;
+
+		/* Mouse support present in textgrids */
 		case gestalt_MouseInput:
+			return val == wintype_TextGrid;
+
 		case gestalt_Graphics:
+			return 1;
+
 		case gestalt_DrawImage:
+			return val == wintype_Graphics || val == wintype_TextBuffer;
+
+		case gestalt_GraphicsTransparency:
+			return 1;
+			
+		/* Unsupported capabilities */
 		case gestalt_Sound:
 		case gestalt_SoundVolume:
 		case gestalt_SoundNotify:
 		case gestalt_SoundMusic:
-		case gestalt_GraphicsTransparency:
 		/* Selector not supported */	
 		default:
 			return 0;