CLIM indentation and the Allegro Emacs-Lisp interface

[jsp@watson.ibm.com (Scott Penberthy)]

Jon,

   I've attached some indentation hackery that I find useful.

Cheers,
Scott


(put 'defclass 'fi:common-lisp-indent-hook 2)
(put 'menu-choose-from-drawer 'fi:common-lisp-indent-hook 2)
(put 'with-text-face 'fi:common-lisp-indent-hook 1)
(put 'with-menu 'fi:common-lisp-indent-hook 1)
(put 'with-translation 'fi:common-lisp-indent-hook 1)
(put 'define-ucpop-command 'fi:common-lisp-indent-hook 2)
(put 'formatting-item-list 'fi:common-lisp-indent-hook 1)
(put 'formatting-cell 'fi:common-lisp-indent-hook 1)
(put 'with-output-as-presentation 'fi:common-lisp-indent-hook 1)
(put 'with-text-style 'fi:common-lisp-indent-hook 1)
(put 'accepting-values 'fi:common-lisp-indent-hook 1)
(put 'surrounding-output-with-border 'fi:common-lisp-indent-hook 1)
(put 'define-border-type 'fi:common-lisp-indent-hook 2)
(put 'with-output-to-output-record 'fi:common-lisp-indent-hook 1)
(put 'with-room-for-graphics 'fi:common-lisp-indent-hook 1)