--- server/unitfunc.c.orig	Wed Jul 14 14:09:53 1999
+++ server/unitfunc.c	Wed Jul 14 14:10:50 1999
@@ -1213,6 +1213,8 @@
 	map_clear_special(punit->x, punit->y, S_IRRIGATION);
       else if(map_get_special(punit->x, punit->y)&S_MINE)
         map_clear_special(punit->x, punit->y, S_MINE);
+      else if(map_get_special(punit->x, punit->y)&S_FORTRESS)
+	map_clear_special(punit->x, punit->y, S_FORTRESS);
       else if(map_get_special(punit->x, punit->y)&S_RAILROAD)
 	map_clear_special(punit->x, punit->y, S_RAILROAD);
       else 
--- common/unit.c.orig	Wed Jul 14 14:17:59 1999
+++ common/unit.c	Wed Jul 14 14:18:08 1999
@@ -770,6 +770,7 @@
   case ACTIVITY_PILLAGE:
     return is_ground_unit(punit) && punit->moves_left &&
            ((ptile->special&S_ROAD) || (ptile->special&S_RAILROAD) ||
+	    (ptile->special&S_FORTRESS) ||
 	    (ptile->special&S_IRRIGATION) || (ptile->special&S_MINE)) &&
 	   !is_unit_activity_on_tile(ACTIVITY_PILLAGE, punit->x, punit->y);