fix contracts for racket:get-color-prefs-table and

racket:get-white-on-black-color-prefs-table

Apparently these contracts have always been wrong;
5.2.1 had these exports with the wrong contracts and
5.2 didn't have them

closes PR 14664
This commit is contained in:
Robby Findler 2014-07-29 08:58:37 -05:00
parent 01a285f2de
commit 10ae6fbb90

View File

@ -1480,7 +1480,7 @@
(proc-doc/names (proc-doc/names
racket:get-color-prefs-table racket:get-color-prefs-table
(-> (listof (list/c symbol? (is-a?/c color%)))) (-> (listof (list/c symbol? (is-a?/c color%) string?)))
() ()
@{Returns a table mapping from symbols (naming the categories that the online @{Returns a table mapping from symbols (naming the categories that the online
colorer uses for Racket mode coloring) to their colors. colorer uses for Racket mode coloring) to their colors.
@ -1493,7 +1493,7 @@
(proc-doc/names (proc-doc/names
racket:get-white-on-black-color-prefs-table racket:get-white-on-black-color-prefs-table
(-> (listof (list/c symbol? (is-a?/c color%)))) (-> (listof (list/c symbol? (is-a?/c color%) string?)))
() ()
@{Returns a table mapping from symbols (naming the categories that the online @{Returns a table mapping from symbols (naming the categories that the online
colorer uses for Racket mode coloring) to their colors when the user colorer uses for Racket mode coloring) to their colors when the user