[slime-devel] Feature request: #+foo foo #-foo not-foo indentation

[Nikodemus Siivola]

Currently, Slime indents like so:

(defun foo (x)
  (typecase x
    (#+foo foo
           #-foo fake-foo
           :foo)
    (t
     :not-foo)))

whereas it should be like so:

(defun foo (x)
  (typecase x
    (#+foo foo
     #-foo fake-foo
     :foo)
    (t
     :not-foo)))

Is there a way to coax Slime/Emacs to do the right thing here?

Cheers,

 -- Nikodemus