Re: Bug in lisp indentation

[Stefan Monnier]

> +         ;; The last sexp may not be the first sexp on the line
> +         ;; where it begins, so find that one, instead.
> +         (when calculate-lisp-indent-last-sexp
> +           (goto-char calculate-lisp-indent-last-sexp)
> +           (beginning-of-line)
> +           (skip-chars-forward " \t")

That's wrong when you have things like

       (sdfgsdg dfgsd
                asfgasfg) (dfg)
     <TAB>sfgsfg

You want something along the lines of

   (while (not (at-indentation-p)) (forward-sexp -1))


-- Stefan