Indenting (flet ((foo (arg)...

[Reed Hastings]

Can anyone tell me how to get the following indentation in lisp mode:

(defun fn ()
(flet ((local-fn (a b c)
(form) ;; this is the tricky line.
(form)))
(local-fn 1 2 3)))

This is how it currently indents:

(defun fn ()
(flet ((local-fn (a b c)
(form)
(form)))
(local-fn 1 2 3)))

Thanks! -Reed

Reed Hastings
DOMAIN: hast...@coherent.com
UUCP: ...!{ames,sun,uunet}!coherent!hastings
INTERNET: coherent!hast...@ames.arpa, ...@sun.com, ...@uunet.uu.net
USMAIL: Coherent Thought Inc. 3350 West Bayshore #205 Palo Alto CA 94303
VOICE: (415) 493-8805