From a926269442c828a75d46dadaa6c06468fda9f7a2 Mon Sep 17 00:00:00 2001
From: Camil Staps
Date: Mon, 28 Oct 2019 21:19:52 +0100
Subject: Add basic functionality for accelerators (i.e. shortcuts)

---
 src/Gtk/Internal.dcl | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'src/Gtk/Internal.dcl')

diff --git a/src/Gtk/Internal.dcl b/src/Gtk/Internal.dcl
index 3528628..25cb7fe 100644
--- a/src/Gtk/Internal.dcl
+++ b/src/Gtk/Internal.dcl
@@ -13,6 +13,10 @@ g_signal_connect :: !Int !Pointer !String !Int !.a -> .a
 g_timeout_add :: !Int !Int !.a -> .a
 g_timeout_add_seconds :: !Int !Int !.a -> .a
 
+gdk_keyval_from_name :: !String -> Int
+
+gtk_accel_group_new :: !.a -> (!Pointer, !.a)
+
 gtk_action_bar_new :: !.a -> (!Pointer, !.a)
 gtk_action_bar_pack_start :: !Pointer !Pointer !.a -> .a
 gtk_action_bar_pack_end :: !Pointer !Pointer !.a -> .a
@@ -143,6 +147,7 @@ gtk_tree_view_get_model :: !Pointer -> Pointer
 gtk_tree_view_get_selection :: !Pointer -> Pointer
 gtk_tree_view_new_with_model :: !Pointer !.a -> (!Pointer, !.a)
 
+gtk_widget_add_accelerator :: !Pointer !String !Pointer !Int !Int !Int !.a -> .a
 gtk_widget_destroy :: !Pointer !.a -> .a
 gtk_widget_get_screen :: !Pointer !.a -> (!Pointer, !.a)
 gtk_widget_get_style_context :: !Pointer !.a -> (!Pointer, !.a)
@@ -159,6 +164,7 @@ gtk_widget_set_valign :: !Pointer !Int !.a -> .a
 gtk_widget_set_vexpand :: !Pointer !Bool !.a -> .a
 gtk_widget_show :: !Pointer !.a -> .a
 
+gtk_window_add_accel_group :: !Pointer !Pointer !.a -> .a
 gtk_window_new :: !Bool !.a -> (!Pointer, !.a)
 gtk_window_set_title :: !Pointer !String !.a -> .a
 gtk_window_set_transient_for :: !Pointer !Pointer !.a -> .a
-- 
cgit v1.2.3