--- a/water_cmd.c	Tue Sep 05 23:11:41 2006 +0000
+++ b/water_cmd.c	Tue Sep 05 23:21:41 2006 +0000
@@ -124,7 +124,7 @@
 	ret = DoCommand(tile, 0, 0, flags, CMD_LANDSCAPE_CLEAR);
 	if (CmdFailed(ret)) return CMD_ERROR;
 
-	delta = TileOffsByDir(dir);
+	delta = TileOffsByDiagDir(dir);
 	// lower tile
 	ret = DoCommand(tile - delta, 0, 0, flags, CMD_LANDSCAPE_CLEAR);
 	if (CmdFailed(ret)) return CMD_ERROR;
@@ -151,7 +151,7 @@
 
 static int32 RemoveShiplift(TileIndex tile, uint32 flags)
 {
-	TileIndexDiff delta = TileOffsByDir(GetLockDirection(tile));
+	TileIndexDiff delta = TileOffsByDiagDir(GetLockDirection(tile));
 
 	if (!CheckTileOwnership(tile)) return CMD_ERROR;