Undo this for now
This commit is contained in:
parent
0f6a5195b3
commit
78a69de14f
|
@ -11,7 +11,9 @@
|
|||
(define default-cmd
|
||||
(and suffix
|
||||
(case (string->symbol (bytes->string/utf-8 suffix))
|
||||
[(ss scm scrbl rkt sls) '(raco "test" "-q" "-s" "main" "-s" "test" *)]
|
||||
[(ss scm scrbl rkt sls)
|
||||
'(raco "test" "-q" "-s" "main" "-s" "test" *)
|
||||
'(racket *)]
|
||||
[(rktl) '(racket "-f" *)]
|
||||
[else #f])))
|
||||
(define (replace-* s)
|
||||
|
|
Loading…
Reference in New Issue
Block a user