bugfix: duplicate gtk2.set_tab_pos

This commit is contained in:
Andreas Rumpf 2010-03-29 22:54:54 +02:00
commit 0d63b2519b
4 changed files with 17 additions and 18 deletions

View file

@ -7732,7 +7732,6 @@ proc set_homogeneous*(a: PNotebook, `homogeneous`: guint)
proc show_border*(a: PNotebook): guint
proc set_show_border*(a: PNotebook, `show_border`: guint)
proc tab_pos*(a: PNotebook): guint
proc set_tab_pos*(a: PNotebook, `tab_pos`: guint)
proc scrollable*(a: PNotebook): guint
proc set_scrollable*(a: PNotebook, `scrollable`: guint)
proc in_child*(a: PNotebook): guint
@ -14219,11 +14218,6 @@ proc tab_pos*(a: PNotebook): guint =
result = (a.Notebookflag0 and bm_TGtkNotebook_tab_pos) shr
bp_TGtkNotebook_tab_pos
proc set_tab_pos*(a: PNotebook, `tab_pos`: guint) =
a.Notebookflag0 = a.Notebookflag0 or
(int16(`tab_pos` shl bp_TGtkNotebook_tab_pos) and
bm_TGtkNotebook_tab_pos)
proc scrollable*(a: PNotebook): guint =
result = (a.Notebookflag0 and bm_TGtkNotebook_scrollable) shr
bp_TGtkNotebook_scrollable