From f5bb04660a51569e924df0bde82ce71821edd30d Mon Sep 17 00:00:00 2001
From: Patrick McDermott <pj@pehjota.net>
Date: Mon, 23 Oct 2017 07:02:33 -0400
Subject: MqNotebook: Add (non-functional) tab list button

---
(limited to 'src')

diff --git a/src/notebook.c b/src/notebook.c
index bdcbacb..5124d7b 100644
--- a/src/notebook.c
+++ b/src/notebook.c
@@ -134,6 +134,7 @@ static void
 mq_notebook_init(MqNotebook *notebook)
 {
 	GtkWidget *new_tab_button;
+	GtkWidget *tab_list_button;
 
 	notebook->tree = MQ_TAB_TREE(mq_tree_insert_root_allocated(
 			MQ_TREE(g_new0(MqTabTree, 1)), NULL));
@@ -153,6 +154,14 @@ mq_notebook_init(MqNotebook *notebook)
 	g_signal_connect(new_tab_button, "clicked",
 		G_CALLBACK(new_tab_clicked_cb), notebook);
 
+	tab_list_button = gtk_button_new_from_icon_name("pan-down-symbolic",
+		GTK_ICON_SIZE_BUTTON);
+	gtk_button_set_relief(GTK_BUTTON(tab_list_button), GTK_RELIEF_NONE);
+	gtk_widget_set_tooltip_text(tab_list_button, "Tab list");
+	gtk_notebook_set_action_widget(GTK_NOTEBOOK(notebook), tab_list_button,
+		GTK_PACK_END);
+	gtk_widget_show_all(tab_list_button);
+
 	g_signal_connect(notebook, "switch-page",
 		G_CALLBACK(switch_page_cb), NULL);
 }
--
cgit v0.9.1