# HG changeset patch
# User belugas
# Date 1213405739 0
# Node ID d9b634a792b99abca657836b1bc74056fa8f91c2
# Parent  7c95f8cf046582dae9032cbe7db07b49a78ab199
(svn r13513) -Codechange: Give proper message when building a river fails.
Give proper description of a river tile with the Query Tool.
Extracted (in part) from FS#1884, by Ammler

diff -r 7c95f8cf0465 -r d9b634a792b9 src/lang/english.txt
--- a/src/lang/english.txt	Fri Jun 13 15:18:29 2008 +0000
+++ b/src/lang/english.txt	Sat Jun 14 01:08:59 2008 +0000
@@ -1291,6 +1291,9 @@
 STR_BUILD_LOCKS_TIP                                             :{BLACK}Build locks
 STR_LANDINFO_LOCK                                               :Lock
 
+STR_CANT_PLACE_RIVERS                                           :{WHITE}Can't place rivers here...
+STR_LANDINFO_RIVER                                              :River
+
 STR_BUOY_IS_IN_USE                                              :{WHITE}...buoy is in use!
 
 STR_LANDINFO_COORDS                                             :{BLACK}Coordinates: {LTBLUE}{NUM}x{NUM}x{NUM} ({STRING})
diff -r 7c95f8cf0465 -r d9b634a792b9 src/terraform_gui.cpp
--- a/src/terraform_gui.cpp	Fri Jun 13 15:18:29 2008 +0000
+++ b/src/terraform_gui.cpp	Sat Jun 14 01:08:59 2008 +0000
@@ -135,7 +135,7 @@
 			DoCommandP(end_tile, start_tile, _ctrl_pressed, CcBuildCanal, CMD_BUILD_CANAL | CMD_MSG(STR_CANT_BUILD_CANALS));
 			break;
 		case DDSP_CREATE_RIVER:
-			DoCommandP(end_tile, start_tile, 2, CcBuildCanal, CMD_BUILD_CANAL | CMD_MSG(STR_CANT_BUILD_CANALS));
+			DoCommandP(end_tile, start_tile, 2, CcBuildCanal, CMD_BUILD_CANAL | CMD_MSG(STR_CANT_PLACE_RIVERS));
 			break;
 		default:
 			return false;
diff -r 7c95f8cf0465 -r d9b634a792b9 src/water_cmd.cpp
--- a/src/water_cmd.cpp	Fri Jun 13 15:18:29 2008 +0000
+++ b/src/water_cmd.cpp	Sat Jun 14 01:08:59 2008 +0000
@@ -734,15 +734,16 @@
 {
 	switch (GetWaterTileType(tile)) {
 		case WATER_TILE_CLEAR:
-			if (!IsCanal(tile)) {
-				td->str = STR_3804_WATER;
-			} else {
-				td->str = STR_LANDINFO_CANAL;
+			switch (GetWaterClass(tile)) {
+				case WATER_CLASS_SEA:   td->str = STR_3804_WATER;     break;
+				case WATER_CLASS_CANAL: td->str = STR_LANDINFO_CANAL; break;
+				case WATER_CLASS_RIVER: td->str = STR_LANDINFO_RIVER; break;
+				default: assert(0); break;
 			}
 			break;
 		case WATER_TILE_COAST: td->str = STR_3805_COAST_OR_RIVERBANK; break;
-		case WATER_TILE_LOCK : td->str = STR_LANDINFO_LOCK; break;
-		case WATER_TILE_DEPOT: td->str = STR_3806_SHIP_DEPOT; break;
+		case WATER_TILE_LOCK : td->str = STR_LANDINFO_LOCK;           break;
+		case WATER_TILE_DEPOT: td->str = STR_3806_SHIP_DEPOT;         break;
 		default: assert(0); break;
 	}