← Back to branch summary

~ubuntu-branches/ubuntu/intrepid/libgtkada2/intrepid

« back to all changes in this revision

Viewing changes to src/gtkada-multi_paned.adb

  • Committer: Bazaar Package Importer
  • Author(s): Luca Falavigna
  • Date: 2008-08-11 09:46:51 UTC
  • mfrom: (6.1.1 squeeze)
  • Revision ID: james.westby@ubuntu.com-20080811094651-9mjd6acwa98ffw5c
Tags: 2.12.0-2ubuntu1
Add lpia to supported architectures.

Show diffs side-by-side

added added

removed removed

Lines of Context:
src/gtkada-multi_paned.adb
1
1
-----------------------------------------------------------------------
2
2
--               GtkAda - Ada95 binding for Gtk+/Gnome               --
3
3
--                                                                   --
 
4
--                 Copyright (C) 2003-2006, AdaCore                  --
4
5
--                                                                   --
5
6
-- This library is free software; you can redistribute it and/or     --
6
7
-- modify it under the terms of the GNU General Public               --
37
37
with Gdk.Window_Attr;      use Gdk.Window_Attr;
38
38
 
39
39
with Glib.Object;          use Glib.Object;
 
40
with Glib.Types;           use Glib.Types;
40
41
 
41
42
with Gtk.Arguments;        use Gtk.Arguments;
42
43
with Gtk.Enums;            use Gtk.Enums;
1094
1095
      end loop;
1095
1096
 
1096
1097
      return Default_Expose_Event_Handler
1097
 
        (Class_From_Type (Parent (Get_Type (Split))))
 
1098
        (Glib.Object.GObject_Class (Class_Ref (Parent (Get_Type (Split)))))
1098
1099
          (Get_Object (Split), Event);
1099
1100
   end Expose_Paned;
1100
1101