[ruby-list:20737] Ruby/Gtk の CList にパッチ

安井です。
Ruby/GtkのCListで、movetoとrow_is_visibleが使いたかったのですが、まだ対応
していないようだったのでパッチを作成しました。取り込んでもらえると嬉しい
です。
row_is_visibleはrow_visible?とかのメソッド名の方がRubyらしいかもしれません
が、Ruby/Gtkでのメソッドのネーミングルールがわからなかったのでそのままに
してあります。

--- gtk-0.23.orig/src/rbgtkclist.c	Sat Jan  8 20:52:28 2000
+++ gtk-0.23/src/rbgtkclist.c	Tue Feb 15 19:01:26 2000
@@ -262,7 +262,7 @@
 {
     gtk_clist_moveto(GTK_CLIST(get_widget(self)),
 		     NUM2INT(row), NUM2INT(col),
-		     NUM2INT(row_align), NUM2INT(col_align));
+		     (gfloat)NUM2DBL(row_align), (gfloat)NUM2DBL(col_align));
     return self;
 }
 
@@ -645,6 +645,14 @@
     return INT2NUM(GTK_CLIST(get_widget(self))->columns);
 }
 
+static VALUE
+clist_row_is_visible(self, row)
+	 VALUE self;
+{
+	return INT2NUM(gtk_clist_row_is_visible(GTK_CLIST(get_widget(self)), 
+											NUM2INT(row)));
+}
+
 void Init_gtk_clist()
 {
     gCList = rb_define_class_under(mGtk, "CList", gContainer);
@@ -753,4 +761,5 @@
     rb_define_method(gCList, "set_vadjustment", clist_set_vadjustment, 1);
     rb_define_method(gCList, "vadjustment", clist_get_vadjustment, 0);
     rb_define_method(gCList, "get_vadjustment", clist_get_vadjustment, 0);
+    rb_define_method(gCList, "row_is_visible", clist_row_is_visible, 1);
 }
--
「ゴルゴダ・タワーの神は臆病者には微笑まない」
YASUI Kentarow <[e-mail]>   http://www.alles.or.jp/~kenyasui/