diff options
Diffstat (limited to 'geiser/utils.scm')
| -rw-r--r-- | geiser/utils.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/geiser/utils.scm b/geiser/utils.scm index 632fe76..654cae8 100644 --- a/geiser/utils.scm +++ b/geiser/utils.scm @@ -30,8 +30,8 @@ (else (loop (cdr d) (cons (car d) s)))))) (define (make-location file line) - (list (cons 'file (if (string? file) file '())) - (cons 'line (if (number? line) (+ 1 line) '())))) + (list (cons "file" (if (string? file) file '())) + (cons "line" (if (number? line) (+ 1 line) '())))) (define (sort-symbols! syms) (let ((cmp (lambda (l r) |