X-Git-Url: https://jxself.org/git/?p=mudsync.git;a=blobdiff_plain;f=mudsync%2Froom.scm;h=c1e853689d81422e46fa07c5870bfdc7b9dacf70;hp=877e2fa564589cff7a2ae5bf4353f618b1a82bc6;hb=bbf45570e7dfe20e132cc8e4601ccbf2de667ff3;hpb=e859c0e73638a433413ea4c6ac08476268331663

diff --git a/mudsync/room.scm b/mudsync/room.scm
index 877e2fa..c1e8536 100644
--- a/mudsync/room.scm
+++ b/mudsync/room.scm
@@ -211,10 +211,8 @@
            (mbody-val (<-wait matching-object 'get-desc
                             #:whos-looking (message-from message)))))
       (if obj-desc
-          (<- (message-from message) 'tell
-              #:text (string-append obj-desc "\n"))
-          (<- (message-from message) 'tell
-              #:text (string-append %formless-desc "\n")))))
+          (<- (message-from message) 'tell #:text obj-desc)
+          (<- (message-from message) 'tell #:text %formless-desc))))
    (else
     (<- (message-from message) 'tell
         #:text "You don't see that here, so you can't look at it.\n"))))