diff options
| author | Yves Fischer <yvesf-git@xapek.org> | 2014-07-25 21:45:34 +0200 |
|---|---|---|
| committer | Yves Fischer <yvesf-git@xapek.org> | 2014-07-25 21:46:00 +0200 |
| commit | cfb0c10631bbbd31b525e7992b59de06d3c2e550 (patch) | |
| tree | ee438760e4445c435aec49eaca28e0cc2adcaf8e /ebus-racket/dumper.rkt | |
| parent | 0f2f355d75ddba7cd556a812ed80e0ac322ec102 (diff) | |
| download | ebus-alt-cfb0c10631bbbd31b525e7992b59de06d3c2e550.tar.gz ebus-alt-cfb0c10631bbbd31b525e7992b59de06d3c2e550.zip | |
remove sxml dependency
Diffstat (limited to 'ebus-racket/dumper.rkt')
| -rwxr-xr-x | ebus-racket/dumper.rkt | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/ebus-racket/dumper.rkt b/ebus-racket/dumper.rkt index bc60590..62ca64e 100755 --- a/ebus-racket/dumper.rkt +++ b/ebus-racket/dumper.rkt @@ -38,9 +38,9 @@ (define (read-ebus-loop7 input-port) (let ([fields (layer7-read-ebus (current-input-port))]) - (if (not (void? fields)) - (pretty-print fields) - (display "")) + ;(if (not (void? fields)) + ;(pretty-print fields) + ;(display "")) (cond ((not (eof-object? fields)) (read-ebus-loop7 input-port))))) (if (layer7?) |