X-Git-Url: https://jxself.org/git/?p=mudsync.git;a=blobdiff_plain;f=worlds%2Fgoblin-hq.scm;h=bd79b800e0734d0d3c5f2f52496c7b0b36dface6;hp=34b430d372def445e64fb70543ad959934c71398;hb=d539213774955a5593ec760f06022aeecf4e1abc;hpb=7525c62ccdf9e3480214831fb14d9a2d30ab139d

diff --git a/worlds/goblin-hq.scm b/worlds/goblin-hq.scm
index 34b430d..bd79b80 100644
--- a/worlds/goblin-hq.scm
+++ b/worlds/goblin-hq.scm
@@ -28,9 +28,9 @@
 ;;; ----------
 
 (define-class <fridge> (<gameobj>)
-  #:name "fridge"
-  #:desc "The refrigerator is humming.  To you?  To itself?
-Only the universe knows.")
+  (name #:init-value "fridge")
+  (desc #:init-value "The refrigerator is humming.  To you?  To itself?
+Only the universe knows."))
 
 
 ;;; The typewriter
@@ -69,7 +69,7 @@ You type some gibberish on the typewriter.\n"))
 (define (type-thing actor message type-text)
   (<- actor (message-from message) 'tell
       #:text
-      (format #f "You type out a note.\nThe note says: ~s"
+      (format #f "You type out a note.\nThe note says: ~s\n"
               type-text)))
 
 (define-mhandler (typewriter-cmd-type-something