Commit fab40715 authored by Troels Henriksen's avatar Troels Henriksen
Browse files

Fixed error when attempting to indenting a buffer in Lisp syntax with

only comment contents.
parent 6aecc2db
......@@ -2777,7 +2777,7 @@ object. Otherwise, nil will be returned.")
(define-simple-indentor (clim:define-application-frame indent-list indent-list))
(defun compute-path-in-trees (trees n offset)
(cond ((or (null trees)
(cond ((or (null (first-noncomment trees))
(>= (start-offset (first-noncomment trees)) offset))
(list n))
((or (< (start-offset (first-noncomment trees)) offset (end-offset (first-noncomment trees)))
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment