diff options
Diffstat (limited to 'ide/utils/configwin_ihm.ml')
| -rw-r--r-- | ide/utils/configwin_ihm.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ide/utils/configwin_ihm.ml b/ide/utils/configwin_ihm.ml index 03ca706c80..275a730b6f 100644 --- a/ide/utils/configwin_ihm.ml +++ b/ide/utils/configwin_ihm.ml @@ -560,8 +560,8 @@ class font_param_box param = let _ = dialog#connect#destroy GMain.Main.quit in let _ = wb_ok#connect#clicked (fun () -> - let font_opt = dialog#selection#font_name in -(* we#set_text (match font_opt with None -> "" | Some s -> s) ; +(* let font_opt = dialog#selection#font_name in + we#set_text (match font_opt with None -> "" | Some s -> s) ; set_entry_font font_opt;*) dialog#destroy () ) |