map menu cleanups

git-svn-id: https://sauerbraten.svn.sourceforge.net/svnroot/sauerbraten@3655 ac1f7847-fce6-4368-a212-70e9bdee79d4
wrack · Aug 14, 2011 · 5460537 · 5460537
1 parent db58afc
commit 5460537
Showing 1 changed file with 24 additions and 8 deletions.
diff --git a/data/menus.cfg b/data/menus.cfg
@@ -64,82 +64,98 @@ maprotation (concat $mainmaps $moremaps1 $moremaps2 $moremaps3 $moremaps4)
 maprotation (concat $capturemaps1 $capturemaps2 $capturemaps3) capture_
 maprotation (concat $ctfmaps1 $ctfmaps2 $ctfmaps3) ctf_
 
-alias showmapshot [ guibar; guiimage (concatword "packages/base/" (if (> $numargs 0) [result $arg1] [result (at $guirollovername 0)]) ".jpg") $guirolloveraction 4 1 "data/cube.png"]
+showmapshot = [ 
+    guibar
+    guiimage (concatword "packages/base/" (if (> $numargs 0) [result $arg1] [at $guirollovername 0]) ".jpg") $guirolloveraction 4 1 "data/cube.png"
+]
 
 newgui maps [
     guilist [
+      guistrut 17 1
       guilist [ guistrut 14 1; genmapitems $mainmaps ]
       guilist [ guistrut 14 1 ]
       showmapshot
     ]
     guitab 2
     guilist [
+      guistrut 17 1
       guilist [ guistrut 14 1; genmapitems $moremaps1 ]
       guilist [ guistrut 14 1; genmapitems $moremaps2 ]
       showmapshot
     ]
     guitab 3
     guilist [
+      guistrut 17 1
       guilist [ guistrut 14 1; genmapitems $moremaps3 ]
       guilist [ guistrut 14 1; genmapitems $moremaps4 ]
       showmapshot
     ]
     guitab capture
     guilist [
+      guistrut 17 1
       guilist [ guistrut 14 1; genmapitems $capturemaps1 ]
       guilist [ guistrut 14 1; genmapitems $capturemaps2 ]
       showmapshot
     ]
     guitab 2
     guilist [
+      guistrut 17 1
       guilist [ guistrut 14 1; genmapitems $capturemaps3 ]
       guilist [ guistrut 14 1 ]
       showmapshot
     ]
     guitab ctf
     guilist [
+        guistrut 17 1
         guilist [ guistrut 14 1; genmapitems $ctfmaps1 ]
         guilist [ guistrut 14 1; genmapitems $ctfmaps2 ]
         showmapshot
     ]
     guitab 2
     guilist [
+        guistrut 17 1
         guilist [ guistrut 14 1; genmapitems $ctfmaps3 ]
         guilist [ guistrut 14 1 ]
         showmapshot
     ]
 
     guitab concept
     guilist [
+        guistrut 17 1
         guilist [ guistrut 14 1; genmapitems $conceptmaps ]
         guilist [ guistrut 14 1 ]
-        guistrut 20 1
         showmapshot
     ]
 ]
 
 newgui capturemaps [
     guilist [
-      guilist [ genmapitems $capturemaps1 ]
-      guilist [ genmapitems $capturemaps2 ]
+      guistrut 17 1
+      guilist [ guistrut 14 1; genmapitems $capturemaps1 ]
+      guilist [ guistrut 14 1; genmapitems $capturemaps2 ]
       showmapshot
     ]
     guitab 2
     guilist [
-      guilist [ genmapitems $capturemaps3 ]
+      guistrut 17 1
+      guilist [ guistrut 14 1; genmapitems $capturemaps3 ]
+      guilist [ guistrut 14 1 ]
       showmapshot
     ]
 ] "capture maps"
 
 newgui ctfmaps [
     guilist [
-        guilist [ genmapitems $ctfmaps1 ]
-        guilist [ genmapitems $ctfmaps2 ]
+        guistrut 17 1
+        guilist [ guistrut 14 1; genmapitems $ctfmaps1 ]
+        guilist [ guistrut 14 1; genmapitems $ctfmaps2 ]
         showmapshot
     ]
     guitab 2
     guilist [
-        guilist [ genmapitems $ctfmaps3 ]
+        guistrut 17 1
+        guilist [ guistrut 14 1; genmapitems $ctfmaps3 ]
+        guilist [ guistrut 14 1 ]
         showmapshot
     ]
 ] "ctf maps"