From: Carl Shapiro
Subject: LispWorks FLET indentation
Date: 
Message-ID: <ouyd7l9gcxu.fsf@panix3.panix.com>
By default, the LispWorks editor indents FLET, LABELS, and MACROLET in
a naive way - it insists on placing the body of the local function (or
macro) right below the lambda list of that same local function.

(defun fn ()
  (flet ((local-fn (arg)
                    (...))) ; yuck!
    (...)))

However, other editors will indent the above code in a more attractive
fashion with the local function's body indented one (maybe two) spaces
from its name.

(defun fn ()
  (flet ((local-fn (arg)
           (...)))
    (...)))

How would I go about teaching the LispWorks editor to indent code like
this?