public inbox for guile-gtk@sourceware.org
 help / color / mirror / Atom feed
* Re: a few more functions
@ 2003-01-22 17:54 Daniel Skarda
  0 siblings, 0 replies; 2+ messages in thread
From: Daniel Skarda @ 2003-01-22 17:54 UTC (permalink / raw)
  To: guile-gtk; +Cc: Kevin Ryde

Hello,

  thank you for you patch.

  Beside applying your patch, I also deprecated gtk-toggle-button-set-state (in
in favor of -set-active version) and removed exclamation mark from field setters
(I wrote about the removal last time).

0.

> 	* gdk-1.2.defs (GdkFont): Add ascent and descent fields.
> 	(gdk_window_get_events, gdk_window_at_pointer, gdk_window_get_pointer,
> 	gdk_window_raise, gdk_window_set_background,
> 	gdk_window_set_back_pixmap, gdk_window_set_events): New functions.
> 
>       * gtk-1.2.defs (GtkTreeItem): Add expanded field
>       (GtkMenuItem): Add submenu field.
>       (gtk_window_add_accel_group, gtk_window_remove_accel_group,
>       gtk_toggle_button_get_active): New functions.

^ permalink raw reply	[flat|nested] 2+ messages in thread

* a few more functions
@ 2003-01-20 23:39 Kevin Ryde
  0 siblings, 0 replies; 2+ messages in thread
From: Kevin Ryde @ 2003-01-20 23:39 UTC (permalink / raw)
  To: guile-gtk

[-- Attachment #1: Type: text/plain, Size: 727 bytes --]

While tinkering with various stuff I found uses for the following,

	* gdk-1.2.defs (GdkFont): Add ascent and descent fields.
	(gdk_window_get_events, gdk_window_at_pointer, gdk_window_get_pointer,
	gdk_window_raise, gdk_window_set_background,
	gdk_window_set_back_pixmap, gdk_window_set_events): New functions.

        * gtk-1.2.defs (GtkTreeItem): Add expanded field
        (GtkMenuItem): Add submenu field.
        (gtk_window_add_accel_group, gtk_window_remove_accel_group,
        gtk_toggle_button_get_active): New functions.

GtkToggleButton has "active" as a field as well as a get_active
function (in both gtk 1.2 and 2.0).  The gtk 2 doco doesn't mention
the field though, so it might be best to use the function.


[-- Attachment #2: gtk-1.2.defs.misc.diff --]
[-- Type: text/plain, Size: 1137 bytes --]

--- gtk-1.2.defs.~1.6.~	2003-01-05 06:01:11.000000000 +1000
+++ gtk-1.2.defs	2003-01-12 14:43:05.000000000 +1000
@@ -964,7 +964,9 @@
 
 ;; TreeItem
 
-(define-object GtkTreeItem (GtkItem))
+(define-object GtkTreeItem (GtkItem)
+  (fields
+   (bool expanded)))
 
 (define-func gtk_tree_item_new
   GtkWidget
@@ -1542,6 +1544,16 @@
 ;;  ((GtkWindow window)
 ;;   (GtkAcceleratorTable table)))
 
+(define-func gtk_window_add_accel_group
+ none
+ ((GtkWindow window)
+  (GtkAccelGroup accel_group)))
+
+(define-func gtk_window_remove_accel_group
+ none
+ ((GtkWindow window)
+  (GtkAccelGroup accel_group)))
+
 (define-func gtk_window_position
   none
   ((GtkWindow window)
@@ -1975,6 +1987,10 @@
   ((GtkToggleButton toggle_button)
    (bool draw_indicator)))
 
+(define-func gtk_toggle_button_get_active
+  bool
+  ((GtkToggleButton toggle_button)))
+
 (define-func gtk_toggle_button_set_state
   none
   ((GtkToggleButton toggle_button)
@@ -2665,7 +2681,9 @@
 
 ;; MenuItem
 
-(define-object GtkMenuItem (GtkItem))
+(define-object GtkMenuItem (GtkItem)
+  (fields
+   (GtkWidget submenu)))
 
 (define-func gtk_menu_item_new
   GtkWidget

[-- Attachment #3: gdk-1.2.defs.misc.diff --]
[-- Type: text/plain, Size: 1427 bytes --]

--- gdk-1.2.defs.~1.3.~	2002-12-08 04:25:58.000000000 +1000
+++ gdk-1.2.defs	2003-01-19 18:18:38.000000000 +1000
@@ -339,7 +339,9 @@
 (define-boxed GdkFont
   (copy gdk_font_ref)
   (free gdk_font_unref)
-  (conversion "sgtk_font_conversion"))
+  (conversion "sgtk_font_conversion")
+  (fields (int ascent)
+	  (int descent)))
 
 (add-options GdkFont (conversion "sgtk_font_conversion"))
 
@@ -810,10 +812,19 @@
   GdkDragContext
   ((GdkEvent event)))
 
+(define-func gdk_window_get_events
+  GdkEventMask
+  ((GdkWindow window)))
+
 (define-func gdk_get_leader_window_id
   uint
   ())
 
+(define-func gdk_window_at_pointer
+  (GdkWindow (values (x y)))
+  ((int x)
+   (int y)))
+
 (define-func gdk_window_get_id
   uint
   ((GdkWindow window)))
@@ -832,6 +843,33 @@
   GdkWindow
   ((GdkWindow window)))
 
+(define-func gdk_window_get_pointer
+  (GdkWindow (values (x y modifiers)))
+  ((GdkWindow window)
+   (int x)
+   (int y)
+   (GdkModifierType modifiers)))
+
+(define-func gdk_window_raise
+  none
+  ((GdkWindow window)))
+
+(define-func gdk_window_set_background
+  none
+  ((GdkWindow window)
+   (GdkColor  color)))
+
+(define-func gdk_window_set_back_pixmap
+  none
+  ((GdkWindow window)
+   (GdkPixmap pixmap (null-ok))
+   (bool      parent_relative)))
+
+(define-func gdk_window_set_events
+  none
+  ((GdkWindow window)
+   (GdkEventMask events)))
+
 ;;; glib functions - timer
 
 (define-func g_timer_new

^ permalink raw reply	[flat|nested] 2+ messages in thread

end of thread, other threads:[~2003-01-22 17:54 UTC | newest]

Thread overview: 2+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2003-01-22 17:54 a few more functions Daniel Skarda
  -- strict thread matches above, loose matches on Subject: below --
2003-01-20 23:39 Kevin Ryde

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).