Adjust disc-shield description

[mudsync.git] / worlds / bricabrac.scm

diff --git a/worlds/bricabrac.scm b/worlds/bricabrac.scm
index 3f71ce71aef194b94786bc7012c023403654fd39..49fcff0e236ca894f3240ea407de1ed073dff134 100644 (file)
--- a/worlds/bricabrac.scm
+++ b/worlds/bricabrac.scm
@@ -423,9 +423,10 @@ this general shape in the 1990s."
                   player)  ;; set loc to player to put in player's inventory
   (<- player 'tell
       #:text '((p "As you attempt to pull the shield / disk platter
-from the statue, there is a bright glow...  and a completely separate,
-glowing copy of the disc materializes into your hands!")
-               (p "You hear a voice whispering in your ear: "
+from the statue a shining outline appears around it... and a
+completely separate, glowing copy of the disc materializes into your
+hands!")
+               (p "You hear a voice whispering: "
                   (i "\"Share the software... and you'll be free...\"")))))
 
 ;;; This is the disc that gets put in the player's inventory
@@ -533,10 +534,10 @@ Hackthena must be an emacs user."
    ('grand-hallway:disc-platter
     <disc-shield> 'grand-hallway
     #:name "Hackthena's shield"
-    #:desc "This isn't a shield after all, it seems to be a hard disk
-platter!  It has \"RL02.5\" written on it.  It looks kind of loose..."
+    #:desc "No wonder the \"shield\" looks unusual... it seems to be a hard disk
+platter!  It has \"RL02.5\" written on it.  It looks kind of loose."
     #:invisible? #t
-    #:goes-by '("hackthena's shield" "shield" "platter"))))
+    #:goes-by '("hackthena's shield" "shield" "platter" "hard disk platter"))))
 
 \f
 ;;; Playroom