Added id slots to plug and socket

[clg] / gtk / gtktypes.lisp

diff --git a/gtk/gtktypes.lisp b/gtk/gtktypes.lisp
index 118b95ada44ab315d40301f701c8d8fa3e025340..61816b4a7906aa6c337696b3492dcb7d0a033293 100644 (file)
--- a/gtk/gtktypes.lisp
+++ b/gtk/gtktypes.lisp
@@ -20,7 +20,7 @@
 ;; TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
 ;; SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
 
-;; $Id: gtktypes.lisp,v 1.44 2006-02-26 15:30:01 espen Exp $
+;; $Id: gtktypes.lisp,v 1.45 2006-02-26 23:37:18 espen Exp $
 
 (in-package "GTK")
 
@@ -495,6 +495,22 @@     (default-height :merge t :unbound -1)))
      :initarg :tearoff-state
      :type boolean)))
 
+  ("GtkPlug"
+   :slots
+   ((id
+     :allocation :virtual
+     :getter "gtk_plug_get_id"
+     :reader plug-id
+     :type gdk:native-window)))
+
+  ("GtkSocket"
+   :slots
+   ((id
+     :allocation :virtual
+     :getter "gtk_socket_get_id"
+     :reader socket-id
+     :type gdk:native-window)))
+
   ("GtkToolbar"
    :slots
    ((show-tooltips