Fix ArrayIndexOutOfBoundsException

diff --git a/BUGS b/BUGS
index 56043eac3197b2b2d090df6c273449a0fb8a85b6..1cffebffb6992b32eae77ea9996f7af07c71bf4a 100644 (file)
--- a/BUGS
+++ b/BUGS
@@ -16,7 +16,7 @@
 + Софтклавиши для переключения предметов на ремне перепутаны
 Печи не сохраняются и не загружаются (не забыть инкрементировать версию формата карт)
 При создании мира с сундуком, оный может висеть в воздухе
-Зависание при попытке листать пустой список сохранений
++ Зависание при попытке листать пустой список сохранений
 Иногда вместо травы генерируется грязь.
 Перепроверить генерацию предметов в вокровищницах
 Починить спавнеры

diff --git a/src/CAVE.mpsrc b/src/CAVE.mpsrc
index 27145e52a878785f32dc010a5b14ce0a6b945ca9..623e6a4d509ddfd1ff5a337cce55a91ca9ee68de 100644 (file)
--- a/src/CAVE.mpsrc
+++ b/src/CAVE.mpsrc
@@ -1271,7 +1271,7 @@ function menu_game:boolean;
      if m_cur>3 then m_cur:=0;\r
     end;\r
 \r
-   if clickedKey(KEY_MENU_LEFT) then\r
+   if (max_r >= 0) and clickedKey(KEY_MENU_LEFT) then\r
     begin\r
      cur_name:=cur_name-1;\r
      if cur_name<0 then cur_name:=0;\r
@@ -1281,7 +1281,7 @@ function menu_game:boolean;
 \r
      if file_exists('/'+sd+'/cavecraft/saves/'+names[cur_name]+'/player.dat')=1 then\r
     end;\r
-   if clickedKey(KEY_MENU_RIGHT) then\r
+   if (max_r >= 0) and clickedKey(KEY_MENU_RIGHT) then\r
     begin\r
      cur_name:=cur_name+1;\r
      if cur_name>max_r then cur_name:=max_r;\r