From 6c682f3665b0ec9a2a73b62593ab3762676f4e7a Mon Sep 17 00:00:00 2001
From: johns <>
Date: Mon, 1 May 2000 18:05:15 +0000
Subject: [PATCH] fancy buildings made configurable

---
 ui/script_ui.cpp | 11 +++++++++++
 ui/ui.cpp        |  1 +
 2 files changed, 12 insertions(+)

diff --git a/ui/script_ui.cpp b/ui/script_ui.cpp
index bb3dab294..985cbb6e4 100644
--- a/ui/script_ui.cpp
+++ b/ui/script_ui.cpp
@@ -808,6 +808,16 @@ local SCM CclRightButtonMoves(void)
     return SCM_UNSPECIFIED;
 }
 
+/**
+**	Enable fancy buildings
+*/
+local SCM CclFancyBuildings(void)
+{
+    FancyBuildings=1;
+
+    return SCM_UNSPECIFIED;
+}
+
 /**
 **	Register CCL features for UI.
 */
@@ -836,6 +846,7 @@ global void UserInterfaceCclRegister(void)
     gh_new_procedure0_0("show-command-key",CclShowCommandKey);
     gh_new_procedure0_0("right-button-attacks",CclRightButtonAttacks);
     gh_new_procedure0_0("right-button-moves",CclRightButtonMoves);
+    gh_new_procedure0_0("fancy-buildings",CclFancyBuildings);
  
 }
 
diff --git a/ui/ui.cpp b/ui/ui.cpp
index b8fb2f071..5a73f1af5 100644
--- a/ui/ui.cpp
+++ b/ui/ui.cpp
@@ -34,6 +34,7 @@
 global int RaceAdd;			// FIXME: debug solution
 
 global char RightButtonAttacks;		/// right button 0 move, 1 attack
+global char FancyBuildings;		/// Mirror buildings 1 yes, 0 now.
 
 /**
 **	The user interface configuration