28 Preferences, Textual
(require framework/preferences) | package: gui-lib |
procedure
(preferences:get symbol) → any/c
symbol : symbol?
procedure
(preferences:set symbol value) → void?
symbol : symbol? value : any/c
preferences:set immediately writes the preference value to disk. It raises an exception matching exn:unknown-preference? if the preference’s default has not been set
Added in version 1.18 of package gui-lib.
procedure
(preferences:add-callback p f [weak?]) → (-> void?)
p : symbol? f : (-> symbol? any/c any) weak? : boolean? = #f
If weak? is true, the preferences system will only hold on to the callback weakly.
The callbacks will be called in the order in which they were added.
If you are adding a callback for a preference that requires marshalling and unmarshalling, you must set the marshalling and unmarshalling functions by calling preferences:set-un/marshall before adding a callback.
The result thunk removes the callback from the same preferences layer that p was in when preferences:add-callback was originally called.
procedure
(preferences:set-default symbol value test [ #:aliases aliases #:rewrite-aliases rewrite-aliases]) → void? symbol : symbol? value : any/c test : (any/c . -> . any) aliases : (listof symbol?) = '()
rewrite-aliases : (listof (-> any/c any)) = (map (lambda (x) values) aliases)
If you use preferences:set-un/marshall, you must call this function before calling it.
This sets the default value of the preference symbol to value. If the user has chosen a different setting, (reflected via a call to preferences:set, possibly in a different run of your program), the user’s setting will take precedence over the default value.
The test argument is used as a safeguard. That function is called to determine if a preference read in from a file is a valid preference. If test returns #t, then the preference is treated as valid. If test returns #f then the default is used.
The aliases and rewrite-aliases arguments aids in renaming preferences. If aliases is present, it is expected to be a list of symbols that correspond to old versions of the preferences. It defaults to '(). If rewrite-aliases is present, it is used to adjust the old values of the preferences when they are present in the saved file.
Changed in version 1.23 of package gui-lib: Allow preferences:set-default to be called even after a snapshot has been grabbed.
procedure
(preferences:default-set? pref) → boolean?
pref : symbol?
procedure
(preferences:set-un/marshall symbol marshall unmarshall) → void? symbol : symbol? marshall : (any/c . -> . printable/c) unmarshall : (printable/c . -> . any/c)
If the unmarshalling function returns a value that does not meet the guard passed to preferences:set-default for this preference, the default value is used.
The marshall function might be called with any value returned from read and it must not raise an error (although it can return arbitrary results if it gets bad input). This might happen when the preferences file becomes corrupted, or is edited by hand.
preferences:set-un/marshall must be called before calling preferences:get,preferences:set.
procedure
procedure
(preferences:register-save-callback callback) → symbol?
callback : (-> boolean? any)
The callback occurs on whichever thread happened to call preferences:set.
Pre- and post-write notifications are not necessarily paired; unregistration may cancel the post-write notification before it occurs.
procedure
key : symbol?
procedure
(exn:make-unknown-preference message continuation-marks) → exn:unknown-preference? message : string? continuation-marks : continuation-mark-set?
procedure
(exn:unknown-preference? exn) → boolean?
exn : any/c
parameter
→ (-> (listof symbol?) (listof any/c) any) (preferences:low-level-put-preferences put-preferences) → void? put-preferences : (-> (listof symbol?) (listof any/c) any)
parameter
→ (->* (symbol?) [(-> any)] any) (preferences:low-level-get-preference get-preference) → void? get-preference : (->* (symbol?) [(-> any)] any)
procedure
(preferences:snapshot? arg) → boolean?
arg : any/c
procedure
(preferences:restore-prefs-snapshot snapshot) → void?
snapshot : preferences:snapshot?
procedure
procedure
(preferences:new-layer previous-preferences-layer)
→ preferences:layer? previous-preferences-layer : (or/c #f preferences:layer?)
Added in version 1.30 of package gui-lib.
procedure
(preferences:layer? v) → boolean?
v : any/c
A preferences layer gives a form of scoping to preferences. When a new preference is first registered with this library (via a call to preferences:set-default or preferences:add-callback) it is put into the layer in preferences:current-layer (and not into any of that layer’s previous layers). When preferences:get, preferences:set, preferences:set-un/marshall are called, they consult and manipulate only the layer where the preference was first installed. Accordingly, preference layers give a way to discard some set of calls to preference:set-default and other preference configuration and to start over with a new set. Note that this affects only the configuration of the preferences for the library; the values are all stored centrally (see preferences:low-level-put-preferences) and are unaffected by the layers.
> (define original-layer (preferences:current-layer)) > (define layer2 (preferences:new-layer original-layer))
> (parameterize ([preferences:current-layer layer2]) ; initialize 'a-pref in layer2 (preferences:set-default 'a-pref 5 real?) (preferences:set 'a-pref 6) (preferences:get 'a-pref)) 6
> (define layer3 (preferences:new-layer original-layer))
> (parameterize ([preferences:current-layer layer3]) ; initialize 'a-pref again, this time in layer3 ; without the new layer in place, this would be an error (preferences:set-default 'a-pref 5 real?) ; the actual value of the preference remains ; from the previous call to preferences:set (preferences:get 'a-pref)) 6
Added in version 1.30 of package gui-lib.
parameter
(preferences:current-layer preferences-layer) → void? preferences-layer : preferences:layer?
Added in version 1.30 of package gui-lib.