scsh-conservatory
/
commander-s
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fix parsing problem with trailing whitespaces and no cursor-index.

This commit is contained in:
eknauel 2005-08-21 16:53:23 +00:00
parent bda54e8fbe
commit 80253ae452
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
scheme/cmdline.scm
View File

@ -139,7 +139,8 @@
(cond (cond
((eof-object? c) ((eof-object? c)
(lp c (if (or cursor? (lp c (if (or cursor?
(= (current-column port) cursor-index)) (and cursor-index
(= (current-column port) cursor-index)))
(cons (make-empty-to-complete cursor-index) (cons (make-empty-to-complete cursor-index)
tokens) tokens)
tokens))) tokens)))