diff --git a/collects/drscheme/drscheme.filetypes b/collects/drscheme/drscheme.filetypes index c833614f95..7afec38eb5 100644 --- a/collects/drscheme/drscheme.filetypes +++ b/collects/drscheme/drscheme.filetypes @@ -17,4 +17,12 @@ ("CFBundleTypeOSTypes" (array "PLT_" "WXME")) ("CFBundleTypeExtensions" - (array "plt")))) + (array "plt"))) + (("CFBundleTypeName" + "Scheme Doc Source") + ("CFBundleTypeRole" + "Viewer") + ("CFBundleTypeOSTypes" + (array "TEXT" "WXME")) + ("CFBundleTypeExtensions" + (array "scrbl")))) diff --git a/collects/drscheme/drscheme.utiexports b/collects/drscheme/drscheme.utiexports index 7d0c93b5ea..9b683ad7fc 100644 --- a/collects/drscheme/drscheme.utiexports +++ b/collects/drscheme/drscheme.utiexports @@ -12,4 +12,18 @@ "TEXT") (assoc-pair "public.filename-extension" (array "ss" - "scm")))))) + "scm"))))) + (("UTTypeConformsTo" + (array + "public.text" + "public.plain-text")) + ("UTTypeDescription" + "PLT Scheme documentation source") + ("UTTypeIdentifier" + "org.plt-scheme.scribble") + ("UTTypeTagSpecification" + (dict + (assoc-pair "com.apple.ostype" + "TEXT") + (assoc-pair "public.filename-extension" + (array "scrbl"))))))