From 2d8b75540ab8353a601d1e6645e9bc5a66fe5759 Mon Sep 17 00:00:00 2001
From: johns <>
Date: Sun, 11 Jun 2000 17:28:57 +0000
Subject: [PATCH] can-see-submarine wrong parsed.
---
src/unit/script_unittype.cpp | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/src/unit/script_unittype.cpp b/src/unit/script_unittype.cpp
index 743992866..35156db60 100644
--- a/src/unit/script_unittype.cpp
+++ b/src/unit/script_unittype.cpp
@@ -472,7 +472,7 @@ local SCM CclDefineUnitType(SCM list)
} else if( gh_eq_p(value,gh_symbol2scm("submarine")) ) {
type->Submarine=1;
} else if( gh_eq_p(value,gh_symbol2scm("can-see-submarine")) ) {
- type->CanSeeSubmarine=0;
+ type->CanSeeSubmarine=1;
} else if( gh_eq_p(value,gh_symbol2scm("cower-worker")) ) {
type->CowerWorker=1;
} else if( gh_eq_p(value,gh_symbol2scm("tanker")) ) {