Clean up whitespace
This commit is contained in:
parent
c0ad41ca0d
commit
950d974f67
|
@ -5,7 +5,7 @@
|
||||||
pandoc-server-strings->sxml
|
pandoc-server-strings->sxml
|
||||||
pandoc-server-files->json
|
pandoc-server-files->json
|
||||||
pandoc-server-files->sxml)
|
pandoc-server-files->sxml)
|
||||||
|
|
||||||
(import (scheme)
|
(import (scheme)
|
||||||
(chicken base)
|
(chicken base)
|
||||||
(only (chicken port) with-input-from-string)
|
(only (chicken port) with-input-from-string)
|
||||||
|
@ -46,7 +46,7 @@
|
||||||
input-format
|
input-format
|
||||||
(map (lambda (filename) (with-input-from-file filename read-string))
|
(map (lambda (filename) (with-input-from-file filename read-string))
|
||||||
input-filenames)))
|
input-filenames)))
|
||||||
|
|
||||||
(define (pandoc-server-strings->sxml input-format input-strings)
|
(define (pandoc-server-strings->sxml input-format input-strings)
|
||||||
(map pandoc-json->sxml
|
(map pandoc-json->sxml
|
||||||
(pandoc-server-strings->json input-format input-strings)))
|
(pandoc-server-strings->json input-format input-strings)))
|
||||||
|
|
Loading…
Reference in New Issue