summaryrefslogtreecommitdiffstats
path: root/otherlibs/labltk/browser/jg_config.ml
diff options
context:
space:
mode:
Diffstat (limited to 'otherlibs/labltk/browser/jg_config.ml')
-rw-r--r--otherlibs/labltk/browser/jg_config.ml10
1 files changed, 5 insertions, 5 deletions
diff --git a/otherlibs/labltk/browser/jg_config.ml b/otherlibs/labltk/browser/jg_config.ml
index a65d6b6e4..41e8e9cd1 100644
--- a/otherlibs/labltk/browser/jg_config.ml
+++ b/otherlibs/labltk/browser/jg_config.ml
@@ -13,13 +13,13 @@
(* $Id$ *)
-let fixed =
- if Sys.os_type = "Win32" then "{Courier New} 8" else "fixed"
-let variable =
- if Sys.os_type = "Win32" then "Arial 9" else "variable"
+open Jg_tk
+
+let fixed = if wingui then "{Courier New} 8" else "fixed"
+let variable = if wingui then "Arial 9" else "variable"
let init () =
- if Sys.os_type = "Win32" then Option.add ~path:"*font" fixed;
+ if wingui then Option.add ~path:"*font" fixed;
let font =
let font =
Option.get Widget.default_toplevel ~name:"variableFont" ~clas:"Font" in