[mcclim-devel] Re: with-output-as-gadget

[Paul Werkowski]

| |Yes, it's really better. Some of my tests and also Xophe's gadget-test
| |work now. But there is still a SIMPLE-ERROR
| |   "There is no applicable method for the generic function|
| |   #<STANDARD-GENERIC-FUNCTION SHEET-NATIVE-TRANSFORMATION (6)> |when
| |   called with arguments (NIL)."
| |for my example that has a WITH-OUTPUT-AS-GADGET inside an
| |ACCEPTING-VALUES..
|
| Btw. I've attached a patch for my interpretation of the description
| you've given for your changes..
|
| I will try some more test - my Lispworks application uses w-o-a-g a lot
| so maybe that will turn more info. I will also try something with
| accepting-values.

Looks like some more problems here when using accepting-values.

1) The function SETUP-GADGET-RECORD wants
(WITH-SLOTS (HEIGHT) ...) but the ACCEPTING-VALUES-STREAM has no such slot :(

2) INVOKE-ACCEPTING-VALUES calls ERASE-OUTPUT-RECORD
which signals SHEET-IS-NOT-A-CHILD with child being the gadget - a
TOGGLE-BUTTON-PANE in my case, and sheet being the APPLICATION-PANE, the stream
arg to
ACCEPTING-VALUES. How did that happen?

When the gadget is like CHECK-BOX-PANE (with children), then there is the same
problem as
before where the pane is not yet adopted when someone wants the
native-transformation.
So, the A-V stream must have a different protocol in play?

| I'll post a more coherent patch, maybe tomorrow if testing goes well.

I guess my fix is not ready for prime time as yet. Too bad, having gadget-based
accept methods
depends on all this working right.

Paul