rktio: fix output of newlines in text files in Windows
This commit is contained in:
parent
4cf538f349
commit
24c6b2450c
|
@ -58,7 +58,7 @@
|
||||||
(check who path-string? path)
|
(check who path-string? path)
|
||||||
(define (mode->flags mode)
|
(define (mode->flags mode)
|
||||||
(case mode
|
(case mode
|
||||||
[(test) RKTIO_OPEN_TEXT]
|
[(text) RKTIO_OPEN_TEXT]
|
||||||
[(truncate truncate/replace) (+ RKTIO_OPEN_TRUNCATE
|
[(truncate truncate/replace) (+ RKTIO_OPEN_TRUNCATE
|
||||||
RKTIO_OPEN_CAN_EXIST)]
|
RKTIO_OPEN_CAN_EXIST)]
|
||||||
[(must-truncate) (+ RKTIO_OPEN_TRUNCATE
|
[(must-truncate) (+ RKTIO_OPEN_TRUNCATE
|
||||||
|
|
Loading…
Reference in New Issue
Block a user