This is what I use in my .emacs file:

(put 'define-signal-handler 'common-lisp-indent-function 'lisp-indent-defmethod) --

which gives me Tab indentation like this:

(gtk:define-signal-handler cmio_noop :void (widget data) ;; widget is an unimplemented button, data is window. (cmio-print (widget->object data) :warning "Sorry, '~@(~A~)' not yet implemented." (gtk:button-get-label widget)))

BTW last week I implemented some code for running gtk:main-iteration-do as a polling function in SBCL and CMUCL, and as a process in OpenMCL, which frees up the REPL again when GTK windows are open. It seems to be working quite well. I think perhaps I should add this support to the lambda-gtk sources as two new exports: (gtk:main-start) and (gtk:main-stop)

--rick

On Jan 21, 2005, at 9:18 PM, Andrew P. Lentvorski, Jr. wrote:

I have noticed that the examples.lisp file indents much less for gtk:define-signal-handler than my editor defaults.

Could someone send me the magic incantations to indent like the examples file?

Thanks, -a

---

lambda-gtk-devel site list lambda-gtk-devel@common-lisp.net http://common-lisp.net/mailman/listinfo/lambda-gtk-devel