diff options
| author |  coq <coq@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2004-02-04 15:30:44 +0000 |
|---|---|---|
| committer | coq <coq@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2004-02-04 15:30:44 +0000 |
| commit | 836276d44d2bad23c2dbc8ee66a74c7f71856a5f (patch) | |
| tree | 1d3325b539b6635979e813019be9f6da53a8dbc5 /ide/preferences.ml | |
| parent | cf45343a65cc1c84dc5c521a34c6c112fb7b5fe7 (diff) | |
search window
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@5288 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'ide/preferences.ml')
| -rw-r--r-- | ide/preferences.ml | 8 |
1 files changed, 2 insertions, 6 deletions
diff --git a/ide/preferences.ml b/ide/preferences.ml index 309cc150e..c4976748e 100644 --- a/ide/preferences.ml +++ b/ide/preferences.ml @@ -12,13 +12,9 @@ open Configwin open Printf open Util -let pref_file = - try (Filename.concat (Sys.getenv "HOME") ".coqiderc") - with _ -> ".coqiderc" +let pref_file = Filename.concat System.home ".coqiderc" -let accel_file = - try (Filename.concat (Sys.getenv "HOME") ".coqide.keys") - with _ -> ".coqide.keys" +let accel_file = Filename.concat System.home ".coqide.keys" let mod_to_str (m:Gdk.Tags.modifier) = match m with |