From 33f7600640bc10b6f2f4125fa32bcd50baae9c42 Mon Sep 17 00:00:00 2001 From: Alex Shinn Date: Wed, 11 May 2011 06:59:15 +0900 Subject: [PATCH] fixing spacing in definition highlighting --- lib/chibi/highlight.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/chibi/highlight.scm b/lib/chibi/highlight.scm index 11f37fda..050ed93f 100644 --- a/lib/chibi/highlight.scm +++ b/lib/chibi/highlight.scm @@ -209,8 +209,8 @@ (sym (string->symbol id))) (cond ((highlight-scheme-definition? sym) - (let* ((res (cons (read-whitespace in) res)) - (res (cons (highlight-class "keyword" id) res)) + (let* ((res (cons (highlight-class "keyword" id) res)) + (res (cons (read-whitespace in) res)) (res (if (eqv? #\( (peek-char in)) (cons (string (read-char in)) res) res)))