From 2c9f8fdb2fb48a348b1b871002737dfefaff4dc5 Mon Sep 17 00:00:00 2001 From: gambas Date: Tue, 20 Feb 2018 13:26:55 +0100 Subject: [PATCH] Stock: Add 'Gambas' and 'Gambas-Mono' to the icon theme list. [DEVELOPMENT ENVIRONMENT] * NEW: Option dialog: Remove 'Gambas' and 'Gambas-Mono' from the theme list as they are now returned by the Stock.Themes property. [GB.FORM] * NEW: Stock: Add 'Gambas' and 'Gambas-Mono' to the icon theme list. --- app/src/gambas3/.src/Options/FOption.class | 2 +- comp/src/gb.form/.src/Stock.class | 1 + 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/app/src/gambas3/.src/Options/FOption.class b/app/src/gambas3/.src/Options/FOption.class index b22ea180b..04c3e50af 100644 --- a/app/src/gambas3/.src/Options/FOption.class +++ b/app/src/gambas3/.src/Options/FOption.class @@ -81,7 +81,7 @@ Public Sub _new() cmbTheme.List = $aThemeName.Copy().Sort(gb.Language) cmbTheme.Add(("Custom"), 0) - cmbIconTheme.List = [("Desktop"), "Gambas", "Gambas-Mono", "Gnome", "KDE", "Trinity", "KDE4", "KDE5", "LXDE", "Mate", "XFCE"].Insert(Stock.Themes) + cmbIconTheme.List = [("Desktop"), "Gnome", "KDE", "Trinity", "KDE4", "KDE5", "LXDE", "Mate", "XFCE"].Insert(Stock.Themes) cmbBrowser.List = [("(Default)"), "Konqueror", "Rekonq", "Firefox", "Iceweasel", "Epiphany", "SeaMonkey", "Opera", "Chromium"] cmbTerminal.List = [("(Default)"), "Konsole", "Gnome Terminal", "XFCE Terminal", "lxterminal", "XTerm"] txtEditorFont.Default = Project.DEFAULT_FONT diff --git a/comp/src/gb.form/.src/Stock.class b/comp/src/gb.form/.src/Stock.class index 1f7ca9814..7e1ffba51 100644 --- a/comp/src/gb.form/.src/Stock.class +++ b/comp/src/gb.form/.src/Stock.class @@ -769,6 +769,7 @@ Static Private Function Themes_Read() As String[] Next Next + aTheme.Insert(["Gambas", "Gambas-Mono"]) aTheme.Sort(gb.IgnoreCase) Return aTheme