mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-01-14 13:21:54 -08:00
Code Issues Projects Releases Packages Wiki Activity

Fix yet another typo in cmpwt.lsp.

Browse source
This commit is contained in:
Juan Jose Garcia Ripoll 2009-07-01 14:02:32 +02:00
parent 79d6eb5873
commit 8d06d5b7fa
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/cmp/cmpwt.lsp
View file

@ -111,7 +111,7 @@
((char= x #\")
(princ "\\\"" stream))
(t (princ x stream)))))
(princ (if one-liner #\" " \"" stream))
(princ (if one-liner "\"" " \"") stream)
string))
;;; ======================================================================