suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

recover slightly less gracelessly from bad keybindings files

Browse Source 
svn: r3224
This commit is contained in:
Robby Findler 2006-06-04 22:47:58 +00:00
parent 8dcbfb3128
commit a457e2f054
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
collects/drscheme/private/main.ss
View File

@ -360,7 +360,12 @@
(autosave:restore-autosave-files/gui)
;; install user's keybindings
(for-each keymap:add-user-keybindings-file (preferences:get 'drscheme:user-defined-keybindings))
(with-handlers ([exn?
(λ (exn)
(message-box (string-constant drscheme)
(exn-message exn)))])
(for-each keymap:add-user-keybindings-file
(preferences:get 'drscheme:user-defined-keybindings)))
;; the initial window doesn't set the
;; unit object's state correctly, yet.