fix GUI builder due to `pasteboard%' change way back

- the `insert' method of `pasteboard%' was always
   documented as inserting to the back by default, but the
   old C++ implementation actually inserted at the front for
   one of the overloadings; keeping the releatively new
   behavior supports more recent code at the expense of old
   code, and this commit is for old code
This commit is contained in:
Matthew Flatt 2011-05-25 07:30:04 -06:00
parent 909aaddf3d
commit c54355482f

View File

@ -125,7 +125,7 @@
[else (cons (car l) (loop (cdr l) (sub1 p)))])))
(when pb
(send c gb-install pb this)
(send pb insert c x (+ y h)))
(send pb insert c (send pb find-first-snip) x (+ y h)))
(gb-need-recalc-size)]))
(gb-remove-child
(lambda (c)
@ -147,7 +147,7 @@
(set! id (send pb new-id))
(for-each
(lambda (c)
(send pb insert c x (+ y h))
(send pb insert c (send pb find-first-snip) x (+ y h))
(send c gb-install pb this))
children)))