diff options
Diffstat (limited to 'otherlibs/labltk/builtin/builtini_GetCursor.ml')
| -rw-r--r-- | otherlibs/labltk/builtin/builtini_GetCursor.ml | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/otherlibs/labltk/builtin/builtini_GetCursor.ml b/otherlibs/labltk/builtin/builtini_GetCursor.ml index b3e1af075..8f4e3971f 100644 --- a/otherlibs/labltk/builtin/builtini_GetCursor.ml +++ b/otherlibs/labltk/builtin/builtini_GetCursor.ml @@ -1,12 +1,12 @@ ##ifdef CAMLTK let cCAMLtoTKcolor = function - NamedColor x -> TkToken x - | Black -> TkToken "black" - | White -> TkToken "white" - | Red -> TkToken "red" - | Green -> TkToken "green" - | Blue -> TkToken "blue" + NamedColor x -> TkToken x + | Black -> TkToken "black" + | White -> TkToken "white" + | Red -> TkToken "red" + | Green -> TkToken "green" + | Blue -> TkToken "blue" | Yellow -> TkToken "yellow" ;; |