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

lang preference no longer depends on the version

Browse Source 
svn: r1170
This commit is contained in:
Robby Findler 2005-10-26 20:58:10 +00:00
parent 95460a186c
commit b671f3825c
2 changed files with 3 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
collects/drscheme/private/language-configuration.ss
View File

@ -32,12 +32,8 @@
[drscheme:help-desk : drscheme:help-desk^]) [drscheme:help-desk : drscheme:help-desk^])
;; settings-preferences-symbol : symbol ;; settings-preferences-symbol : symbol
;; the preferences key for the language settings. ;; this pref used to depend on `version', but no longer does.
;; depends on the version number, so people can use multiple versions (define settings-preferences-symbol 'drscheme:language-settings)
;; of drscheme and maintain separate language settings for each
;; of them.
(define settings-preferences-symbol
(string->symbol (format "drscheme:~a-settings" (version:version))))
;; get-settings-preferences-symbol : -> symbol ;; get-settings-preferences-symbol : -> symbol
(define (get-settings-preferences-symbol) settings-preferences-symbol) (define (get-settings-preferences-symbol) settings-preferences-symbol)

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

@ -287,7 +287,7 @@
;; test for this preference, reverting back to the default. ;; test for this preference, reverting back to the default.
;; In that case, the default is specified in the pref.ss file ;; In that case, the default is specified in the pref.ss file
;; of the default collection and may not be the default ;; of the default collection and may not be the default
;; specified below. ;; specified above (of course).
(preferences:set-un/marshall (preferences:set-un/marshall
drscheme:language-configuration:settings-preferences-symbol drscheme:language-configuration:settings-preferences-symbol
(λ (x) (λ (x)