Renaming re: Eli
This commit is contained in:
parent
b6abe53002
commit
8f6c0d415c
|
@ -36,7 +36,7 @@
|
|||
; XXX Document on help page
|
||||
; XXX Use in computing "changes?"
|
||||
(define (path-random? a-path)
|
||||
(get-prop a-path 'drdr:random?))
|
||||
(get-prop a-path 'drdr:random))
|
||||
|
||||
(provide/contract
|
||||
[PROP:command-line string?]
|
||||
|
|
|
@ -487,7 +487,7 @@ path/s is either such a string or a list of them.
|
|||
number->string)
|
||||
;; --------------------
|
||||
(make-prop
|
||||
'drdr:random?
|
||||
'drdr:random
|
||||
"is file output random?"
|
||||
(lambda (str)
|
||||
(if (regexp-match? #rx"^(yes|no)$" str)
|
||||
|
@ -1345,9 +1345,9 @@ path/s is either such a string or a list of them.
|
|||
"collects/tests/drracket/language-test.rkt" drdr:command-line "mred ~s" drdr:timeout 600
|
||||
"collects/tests/drracket/module-lang-test-utils.rkt" drdr:command-line "mred-text -t ~s"
|
||||
"collects/tests/drracket/module-lang-test.rkt" drdr:command-line "mred ~s" drdr:timeout 120
|
||||
"collects/tests/drracket/randomly-click-language-dialog.rkt" drdr:command-line "mzc ~s" drdr:random? #t
|
||||
"collects/tests/drracket/randomly-click-preferences.rkt" drdr:command-line "mzc ~s" drdr:random? #t
|
||||
"collects/tests/drracket/randomly-click.rkt" drdr:command-line "" drdr:random? #t
|
||||
"collects/tests/drracket/randomly-click-language-dialog.rkt" drdr:command-line "mzc ~s" drdr:random #t
|
||||
"collects/tests/drracket/randomly-click-preferences.rkt" drdr:command-line "mzc ~s" drdr:random #t
|
||||
"collects/tests/drracket/randomly-click.rkt" drdr:command-line "" drdr:random #t
|
||||
"collects/tests/drracket/repl-test.rkt" drdr:command-line "mred ~s" drdr:timeout 600
|
||||
"collects/tests/drracket/sample-solutions-one-window.rkt" drdr:command-line "mred-text -t ~s"
|
||||
"collects/tests/drracket/save-teaching-lang-file.rkt" drdr:command-line "mred ~s"
|
||||
|
|
Loading…
Reference in New Issue
Block a user