Switching St. Ignucius statue to Hackthena

diff --git a/worlds/bricabrac.scm b/worlds/bricabrac.scm
index 28ba3dbbf172cd70531c96f7ffcebde097927593..0b29b6edb285cb172f30509dbc293562e0c0df80 100644 (file)
--- a/worlds/bricabrac.scm
+++ b/worlds/bricabrac.scm
@@ -379,13 +379,14 @@ this general shape in the 1990s."
    ('room:grand-hallway
     <room> #f
     #:name "Grand Hallway"
-    #:desc "  A majestic red carpet runs down the center of the room.
+    #:desc '((p "  A majestic red carpet runs down the center of the room.
 Busts of serious looking people line the walls, but there's no
-clear indication that they have any logical relation to this place.
-  In the center is a large statue of a bearded man.  You wonder what
-that's all about?
-  To the south is the lobby.  A door to the east is labeled \"smoking
-room\", while a door to the west is labeled \"playroom\"."
+clear indication that they have any logical relation to this place.")
+             (p "In the center is a large statue of a woman in a warrior's
+pose, but something is strange about her weapon and shield.  You wonder what
+that's all about?")
+             (p "To the south is the lobby.  A door to the east is labeled \"smoking
+room\", while a door to the west is labeled \"playroom\"."))
     #:exits
     (list (make <exit>
             #:name "south"
@@ -396,13 +397,19 @@ room\", while a door to the west is labeled \"playroom\"."
           (make <exit>
             #:name "east"
             #:to 'room:smoking-parlor)))
-   ('thing:ignucius-statue
+   ('thing:hackthena-statue
     <gameobj> 'room:grand-hallway
     #:name "a statue"
-    #:desc "  The statue is of a serious-looking bearded man with long, flowing hair.
-  It has a large physical halo.  Removing it is tempting, but it looks pretty
-well fastened."
-    #:goes-by '("statue" "st ignucius" "st. ignucius"))))
+    #:desc '((p "The base of the statue says \"Hackthena, guardian of the hacker
+spirit\".  You've heard of Hackthena... not a goddess, but spiritual protector of
+all good hacks, and reknowned hacker herself.")
+             (p "Hackthena holds the form of a human woman.  She wears flowing
+robes, has a pear of curly bovine-esque horns protruding from the sides of her
+head, wears a pair of horn-rimmed glasses, and appears posed as if for battle.
+But instead of a weapon, she seems to hold some sort of keyboard.  And her
+shield... well it's round like a shield, but something seems off about it.
+You'd better take a closer look to be sure."))
+    #:goes-by '("hackthena statue" "hackthena" "statue"))))
 
 \f
 ;;; Playroom