10 lines
199 B
Racket
10 lines
199 B
Racket
#lang racket/base
|
|
;; owner: ryanc
|
|
(require framework/preferences)
|
|
(provide pref:get/set)
|
|
|
|
(define (pref:get/set sym)
|
|
(case-lambda
|
|
[() (preferences:get sym)]
|
|
[(v) (preferences:set sym v)]))
|