From af0ca89b1991b08325a31a11c133fc6000c5a2cd Mon Sep 17 00:00:00 2001
From: rbuj <robert.buj@gmail.com>
Date: Tue, 1 Oct 2019 11:54:14 +0200
Subject: Show archive type in properties dialog

---
 src/dlg-prop.c       |  5 +++++
 src/ui/properties.ui | 29 +++++++++++++++++++++++++++++
 2 files changed, 34 insertions(+)

diff --git a/src/dlg-prop.c b/src/dlg-prop.c
index 5a42166..b7087f2 100644
--- a/src/dlg-prop.c
+++ b/src/dlg-prop.c
@@ -165,6 +165,11 @@ dlg_prop (FrWindow *window)
 	gtk_label_set_text (GTK_LABEL (label), s);
 	g_free (s);
 
+	/**/
+
+	label = _gtk_builder_get_widget (data->builder, "p_mime_type_label");
+	gtk_label_set_text (GTK_LABEL (label), window->archive->command->mime_type);
+
 	/* Set the signals handlers. */
 
 	g_signal_connect (G_OBJECT (data->dialog),
diff --git a/src/ui/properties.ui b/src/ui/properties.ui
index 99eae7d..9b5a94d 100644
--- a/src/ui/properties.ui
+++ b/src/ui/properties.ui
@@ -265,6 +265,35 @@
                 <property name="top_attach">2</property>
               </packing>
             </child>
+            <child>
+              <object class="GtkLabel" id="p_mime_type_label_label">
+                <property name="visible">True</property>
+                <property name="can_focus">False</property>
+                <property name="halign">start</property>
+                <property name="label" translatable="yes">Type:</property>
+                <property name="justify">center</property>
+                <attributes>
+                  <attribute name="weight" value="bold"/>
+                </attributes>
+              </object>
+              <packing>
+                <property name="left_attach">0</property>
+                <property name="top_attach">7</property>
+              </packing>
+            </child>
+            <child>
+              <object class="GtkLabel" id="p_mime_type_label">
+                <property name="visible">True</property>
+                <property name="can_focus">False</property>
+                <property name="halign">start</property>
+                <property name="selectable">True</property>
+                <property name="ellipsize">start</property>
+              </object>
+              <packing>
+                <property name="left_attach">1</property>
+                <property name="top_attach">7</property>
+              </packing>
+            </child>
           </object>
           <packing>
             <property name="expand">False</property>
-- 
cgit v1.2.1