Alphabetical sorting of texture packs in menu (fixes #3487)

diff --git a/builtin/mainmenu/tab_texturepacks.lua b/builtin/mainmenu/tab_texturepacks.lua
index 5514d31f90ce55430066ae94bf41a268d659f021..d8b9ba35f2f28004c18dcf3585b26e4cb8fdc799 100644 (file)
--- a/builtin/mainmenu/tab_texturepacks.lua
+++ b/builtin/mainmenu/tab_texturepacks.lua
@@ -17,12 +17,16 @@
 
 --------------------------------------------------------------------------------
 local function filter_texture_pack_list(list)
-       local retval = {fgettext("None")}
+       local retval = {}
        for _, item in ipairs(list) do
                if item ~= "base" then
                        table.insert(retval, item)
                end
        end
+
+       table.sort(retval)
+       table.insert(retval, 1, fgettext("None"))
+
        return retval
 end