diff options
| author | ppedrot | 2012-04-18 19:24:01 +0000 |
|---|---|---|
| committer | ppedrot | 2012-04-18 19:24:01 +0000 |
| commit | 6b0199b638da7bdc648fa4e53c94544d9c5b57cb (patch) | |
| tree | 82926a7e1b9ca3b85f2605c3a7dd4ef5a200e220 /ide/utils/configwin.ml | |
| parent | 2e13014849ef67bb5bab15ad22e68c883b4fb6b5 (diff) | |
Fixed the CoqIDE preference width
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@15217 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'ide/utils/configwin.ml')
| -rw-r--r-- | ide/utils/configwin.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ide/utils/configwin.ml b/ide/utils/configwin.ml index 3ff607991e..4606ef29fd 100644 --- a/ide/utils/configwin.ml +++ b/ide/utils/configwin.ml @@ -60,9 +60,9 @@ let html = Configwin_ihm.html let edit ?(apply=(fun () -> ())) - title ?(width=400) ?(height=400) + title ?width ?height conf_struct_list = - Configwin_ihm.edit ~with_apply: true ~apply title ~width ~height conf_struct_list + Configwin_ihm.edit ~with_apply: true ~apply title ?width ?height conf_struct_list let get = Configwin_ihm.edit ~with_apply: false ~apply: (fun () -> ()) |