a suggestion for lisp-indent-function

a suggestion for lisp-indent-function

[Pascal Bourguignon]

As provided, lisp-indent-function (lisp-mode.el) indents the following
forms as:

(test ((hello) tralala
       titi tutu
       tata toto))

(test (:key1 tralala
             :key2 tutu
             :key3 titi))

(test (fun tralala
           :key2 tutu
           :key3 titi))


Obviously, a list beginning with a  keyword is not a function call but
still starts with a symbol...

So I would suggest to replace

    (if (and (elt state 2)
             (not (looking-at "\\sw\\|\\s_")))

with:

    (if (and (elt state 2)
             (or (looking-at ":") (not (looking-at "\\sw\\|\\s_"))))

to get these indentations:

(test ((hello) tralala
       titi tutu
       tata toto))

(test (:key1 tralala
       :key2 tutu
       :key3 titi))

(test (fun tralala
           :key2 tutu
           :key3 titi))


-- 
__Pascal_Bourguignon__
http://www.informatimago.com/