Update of /cvsroot/htoolkit/gio/src/Graphics/UI/GIO
In directory sc8-pr-cvs1:/tmp/cvs-serv16025/src/Graphics/UI/GIO
Modified Files:
Layout.hs
Log Message:
Make *fill of high priority than *stretch
Index: Layout.hs
===================================================================
RCS file: /cvsroot/htoolkit/gio/src/Graphics/UI/GIO/Layout.hs,v
retrieving revision 1.9
retrieving revision 1.10
diff -C2 -d -r1.9 -r1.10
*** Layout.hs 19 Oct 2003 09:33:20 -0000 1.9
--- Layout.hs 19 Oct 2003 10:06:31 -0000 1.10
***************
*** 529,534 ****
dw = max 0 (w - prefW)
dh = max 0 (h - prefH)
! wfill = map (\col -> any fillX col || all stretchX col) (columns rows)
! hfill = map (\row -> any fillY row || all stretchY row) rows
dws = deltas dw wfill
dhs = deltas dh hfill
--- 529,534 ----
dw = max 0 (w - prefW)
dh = max 0 (h - prefH)
! wfill = map (\col -> any fillX col || (not fillx && all stretchX col)) (columns rows)
! hfill = map (\row -> any fillY row || (not filly && all stretchY row)) rows
dws = deltas dw wfill
dhs = deltas dh hfill
|
