pragma Ada_2005;
pragma Warnings (Off, "*is already use-visible*");
with Glib; use Glib;
with Glib.Types; use Glib.Types;
with Gtk.Box; use Gtk.Box;
with Gtk.Buildable; use Gtk.Buildable;
with Gtk.Enums; use Gtk.Enums;
with Gtk.Orientable; use Gtk.Orientable;
with Gtk.Recent_Chooser; use Gtk.Recent_Chooser;
with Gtk.Recent_Filter; use Gtk.Recent_Filter;
with Gtk.Recent_Info; use Gtk.Recent_Info;
with Gtk.Recent_Manager; use Gtk.Recent_Manager;
package Gtk.Recent_Chooser_Widget is
type Gtk_Recent_Chooser_Widget_Record is new Gtk_Box_Record with null record;
type Gtk_Recent_Chooser_Widget is access all Gtk_Recent_Chooser_Widget_Record'Class;
type Gtk_Recent_Sort_Func is access function
(A : Gtk.Recent_Info.Gtk_Recent_Info;
B : Gtk.Recent_Info.Gtk_Recent_Info) return Gint;
procedure Gtk_New (Widget : out Gtk_Recent_Chooser_Widget);
procedure Initialize
(Widget : not null access Gtk_Recent_Chooser_Widget_Record'Class);
function Gtk_Recent_Chooser_Widget_New return Gtk_Recent_Chooser_Widget;
procedure Gtk_New_For_Manager
(Widget : out Gtk_Recent_Chooser_Widget;
Manager : not null access Gtk.Recent_Manager.Gtk_Recent_Manager_Record'Class);
procedure Initialize_For_Manager
(Widget : not null access Gtk_Recent_Chooser_Widget_Record'Class;
Manager : not null access Gtk.Recent_Manager.Gtk_Recent_Manager_Record'Class);
function Gtk_Recent_Chooser_Widget_New_For_Manager
(Manager : not null access Gtk.Recent_Manager.Gtk_Recent_Manager_Record'Class)
return Gtk_Recent_Chooser_Widget;
function Get_Type return Glib.GType;
pragma Import (C, Get_Type, "gtk_recent_chooser_widget_get_type");
procedure Set_Sort_Func
(Chooser : not null access Gtk_Recent_Chooser_Widget_Record;
Sort_Func : Gtk_Recent_Sort_Func;
Data_Destroy : Glib.G_Destroy_Notify_Address);
generic
type User_Data_Type (<>) is private;
with procedure Destroy (Data : in out User_Data_Type) is null;
package Set_Sort_Func_User_Data is
type Gtk_Recent_Sort_Func is access function
(A : Gtk.Recent_Info.Gtk_Recent_Info;
B : Gtk.Recent_Info.Gtk_Recent_Info;
User_Data : User_Data_Type) return Gint;
procedure Set_Sort_Func
(Chooser : not null access Gtk.Recent_Chooser_Widget.Gtk_Recent_Chooser_Widget_Record'Class;
Sort_Func : Gtk_Recent_Sort_Func;
Sort_Data : User_Data_Type;
Data_Destroy : Glib.G_Destroy_Notify_Address);
end Set_Sort_Func_User_Data;
function Get_Orientation
(Self : not null access Gtk_Recent_Chooser_Widget_Record)
return Gtk.Enums.Gtk_Orientation;
procedure Set_Orientation
(Self : not null access Gtk_Recent_Chooser_Widget_Record;
Orientation : Gtk.Enums.Gtk_Orientation);
procedure Add_Filter
(Chooser : not null access Gtk_Recent_Chooser_Widget_Record;
Filter : not null access Gtk.Recent_Filter.Gtk_Recent_Filter_Record'Class);
function Get_Current_Item
(Chooser : not null access Gtk_Recent_Chooser_Widget_Record)
return Gtk.Recent_Info.Gtk_Recent_Info;
function Get_Current_Uri
(Chooser : not null access Gtk_Recent_Chooser_Widget_Record)
return UTF8_String;
function Set_Current_Uri
(Chooser : not null access Gtk_Recent_Chooser_Widget_Record;
URI : UTF8_String) return Boolean;
function Get_Filter
(Chooser : not null access Gtk_Recent_Chooser_Widget_Record)
return Gtk.Recent_Filter.Gtk_Recent_Filter;
procedure Set_Filter
(Chooser : not null access Gtk_Recent_Chooser_Widget_Record;
Filter : not null access Gtk.Recent_Filter.Gtk_Recent_Filter_Record'Class);
function Get_Items
(Chooser : not null access Gtk_Recent_Chooser_Widget_Record)
return Gtk.Recent_Manager.Gtk_Recent_Info_List.Glist;
function Get_Limit
(Chooser : not null access Gtk_Recent_Chooser_Widget_Record)
return Gint;
procedure Set_Limit
(Chooser : not null access Gtk_Recent_Chooser_Widget_Record;
Limit : Gint);
function Get_Local_Only
(Chooser : not null access Gtk_Recent_Chooser_Widget_Record)
return Boolean;
procedure Set_Local_Only
(Chooser : not null access Gtk_Recent_Chooser_Widget_Record;
Local_Only : Boolean);
function Get_Select_Multiple
(Chooser : not null access Gtk_Recent_Chooser_Widget_Record)
return Boolean;
procedure Set_Select_Multiple
(Chooser : not null access Gtk_Recent_Chooser_Widget_Record;
Select_Multiple : Boolean);
function Get_Show_Icons
(Chooser : not null access Gtk_Recent_Chooser_Widget_Record)
return Boolean;
procedure Set_Show_Icons
(Chooser : not null access Gtk_Recent_Chooser_Widget_Record;
Show_Icons : Boolean);
function Get_Show_Not_Found
(Chooser : not null access Gtk_Recent_Chooser_Widget_Record)
return Boolean;
procedure Set_Show_Not_Found
(Chooser : not null access Gtk_Recent_Chooser_Widget_Record;
Show_Not_Found : Boolean);
function Get_Show_Private
(Chooser : not null access Gtk_Recent_Chooser_Widget_Record)
return Boolean;
procedure Set_Show_Private
(Chooser : not null access Gtk_Recent_Chooser_Widget_Record;
Show_Private : Boolean);
function Get_Show_Tips
(Chooser : not null access Gtk_Recent_Chooser_Widget_Record)
return Boolean;
procedure Set_Show_Tips
(Chooser : not null access Gtk_Recent_Chooser_Widget_Record;
Show_Tips : Boolean);
function Get_Sort_Type
(Chooser : not null access Gtk_Recent_Chooser_Widget_Record)
return Gtk.Recent_Chooser.Gtk_Recent_Sort_Type;
procedure Set_Sort_Type
(Chooser : not null access Gtk_Recent_Chooser_Widget_Record;
Sort_Type : Gtk.Recent_Chooser.Gtk_Recent_Sort_Type);
function List_Filters
(Chooser : not null access Gtk_Recent_Chooser_Widget_Record)
return Gtk.Recent_Filter.Gtk_Recent_Filter_List.GSlist;
procedure Remove_Filter
(Chooser : not null access Gtk_Recent_Chooser_Widget_Record;
Filter : not null access Gtk.Recent_Filter.Gtk_Recent_Filter_Record'Class);
procedure Select_All
(Chooser : not null access Gtk_Recent_Chooser_Widget_Record);
function Select_Uri
(Chooser : not null access Gtk_Recent_Chooser_Widget_Record;
URI : UTF8_String) return Boolean;
procedure Unselect_All
(Chooser : not null access Gtk_Recent_Chooser_Widget_Record);
procedure Unselect_Uri
(Chooser : not null access Gtk_Recent_Chooser_Widget_Record;
URI : UTF8_String);
package Implements_Gtk_Buildable is new Glib.Types.Implements
(Gtk.Buildable.Gtk_Buildable, Gtk_Recent_Chooser_Widget_Record, Gtk_Recent_Chooser_Widget);
function "+"
(Widget : access Gtk_Recent_Chooser_Widget_Record'Class)
return Gtk.Buildable.Gtk_Buildable
renames Implements_Gtk_Buildable.To_Interface;
function "-"
(Interf : Gtk.Buildable.Gtk_Buildable)
return Gtk_Recent_Chooser_Widget
renames Implements_Gtk_Buildable.To_Object;
package Implements_Gtk_Orientable is new Glib.Types.Implements
(Gtk.Orientable.Gtk_Orientable, Gtk_Recent_Chooser_Widget_Record, Gtk_Recent_Chooser_Widget);
function "+"
(Widget : access Gtk_Recent_Chooser_Widget_Record'Class)
return Gtk.Orientable.Gtk_Orientable
renames Implements_Gtk_Orientable.To_Interface;
function "-"
(Interf : Gtk.Orientable.Gtk_Orientable)
return Gtk_Recent_Chooser_Widget
renames Implements_Gtk_Orientable.To_Object;
package Implements_Gtk_Recent_Chooser is new Glib.Types.Implements
(Gtk.Recent_Chooser.Gtk_Recent_Chooser, Gtk_Recent_Chooser_Widget_Record, Gtk_Recent_Chooser_Widget);
function "+"
(Widget : access Gtk_Recent_Chooser_Widget_Record'Class)
return Gtk.Recent_Chooser.Gtk_Recent_Chooser
renames Implements_Gtk_Recent_Chooser.To_Interface;
function "-"
(Interf : Gtk.Recent_Chooser.Gtk_Recent_Chooser)
return Gtk_Recent_Chooser_Widget
renames Implements_Gtk_Recent_Chooser.To_Object;
end Gtk.Recent_Chooser_Widget;