builtin/mainmenu/dlg_delete_world.lua

   1 --Minetest
   2 --Copyright (C) 2014 sapier
   3 --
   4 --This program is free software; you can redistribute it and/or modify
   5 --it under the terms of the GNU Lesser General Public License as published by
   6 --the Free Software Foundation; either version 2.1 of the License, or
   7 --(at your option) any later version.
   8 --
   9 --This program is distributed in the hope that it will be useful,
  10 --but WITHOUT ANY WARRANTY; without even the implied warranty of
  11 --MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12 --GNU Lesser General Public License for more details.
  13 --
  14 --You should have received a copy of the GNU Lesser General Public License along
  15 --with this program; if not, write to the Free Software Foundation, Inc.,
  16 --51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  17
  18
  19 local function delete_world_formspec(dialogdata)
  20         local retval =
  21                 "size[10,2.5,true]" ..
  22                 "label[0.5,0.5;" ..
  23                 fgettext("Delete World \"$1\"?", dialogdata.delete_name) .. "]" ..
  24                 "button[0.5,1.5;2.5,0.5;world_delete_confirm;" .. fgettext("Delete") .. "]" ..
  25                 "button[7.0,1.5;2.5,0.5;world_delete_cancel;" .. fgettext("Cancel") .. "]"
  26         return retval
  27 end
  28
  29 local function delete_world_buttonhandler(this, fields)
  30         if fields["world_delete_confirm"] then
  31                 if this.data.delete_index > 0 and
  32                                 this.data.delete_index <= #menudata.worldlist:get_raw_list() then
  33                         core.delete_world(this.data.delete_index)
  34                         menudata.worldlist:refresh()
  35                 end
  36                 this:delete()
  37                 return true
  38         end
  39
  40         if fields["world_delete_cancel"] then
  41                 this:delete()
  42                 return true
  43         end
  44
  45         return false
  46 end
  47
  48
  49 function create_delete_world_dlg(name_to_del, index_to_del)
  50         assert(name_to_del ~= nil and type(name_to_del) == "string" and name_to_del ~= "")
  51         assert(index_to_del ~= nil and type(index_to_del) == "number")
  52
  53         local retval = dialog_create("delete_world",
  54                                         delete_world_formspec,
  55                                         delete_world_buttonhandler,
  56                                         nil)
  57         retval.data.delete_name  = name_to_del
  58         retval.data.delete_index = index_to_del
  59
  60         return retval
  61 end