last typo, hopefully
svn: r14729
This commit is contained in:
parent
82d1267553
commit
ebc179f059
|
@ -98,7 +98,7 @@ the state transitions / contracts are:
|
||||||
;; no value read, take the default value
|
;; no value read, take the default value
|
||||||
(default-value (hash-ref defaults p))
|
(default-value (hash-ref defaults p))
|
||||||
;; found a saved value, unmarshall it
|
;; found a saved value, unmarshall it
|
||||||
(unmarshall-pref p marshalled))])
|
(unmarshall-pref p v))])
|
||||||
;; set the value for future reference and return it
|
;; set the value for future reference and return it
|
||||||
(hash-set! preferences p v)
|
(hash-set! preferences p v)
|
||||||
v)]
|
v)]
|
||||||
|
|
Loading…
Reference in New Issue
Block a user