diff --git a/MCServer/Plugins/Core/web_manageserver.lua b/MCServer/Plugins/Core/web_manageserver.lua
index 222736d50..4e8a9a747 100644
--- a/MCServer/Plugins/Core/web_manageserver.lua
+++ b/MCServer/Plugins/Core/web_manageserver.lua
@@ -6,19 +6,30 @@ function HandleRequest_ManageServer( Request )
 		cRoot:Get():GetPluginManager():ReloadPlugins()
 	elseif( Request.PostParams["StopServer"] ~= nil ) then
 		cRoot:Get():ExecuteConsoleCommand("stop")
+	elseif( Request.PostParams["WorldSaveAllChunks"] ~= nil ) then
+		cRoot:Get():GetWorld(Request.PostParams["WorldSaveAllChunks"]):SaveAllChunks()
 	end
 	Content = Content .. [[
-	<form method="POST">]]
-
-	Content = Content .. [[<table>
-	<tr style="padding-top:5px;">
-	<td><input type="submit" value="Restart Server" name="RestartServer"> <br /> restart the server</td>
-	<td><input type="submit" value="Reload Server" name="ReloadServer"> <br /> reload the server</td>
-	<td><input type="submit" value="Stop Server" name="StopServer"> <br /> stop the server</td>
-	</tr>
+	<form method="POST">
+	<table>
+	<th colspan="2">Manage Server</th>
+	<tr><td><input type="submit" value="Restart Server" name="RestartServer">  restart the server</td></tr> <br />
+	<tr><td><input type="submit" value="Reload Server" name="ReloadServer"> reload the server</td></tr> <br />
+	<tr><td><input type="submit" value="Stop Server" name="StopServer"> stop the server</td></tr> <br />
+	</th>
 	</table>
-	
+	<table>
+	<th colspan="2">Manage Worlds</th>
 	]]
+	local LoopWorlds = function( World )
+		Content = Content .. [[
+		<tr><td><input type="submit" value="]] .. World:GetName() .. [[" name="WorldSaveAllChunks"> Save all the chunks of world ]] .. World:GetName() .. [[</td></tr> <br />
+		
+		]]
+	end
+	cRoot:Get():ForEachWorld( LoopWorlds )
+	Content = Content .. "</th></table>"
+	
 	return Content
 end