projects
/
mudsync.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
Use msg-val everywhere and fix some definitions' argument lists.
[mudsync.git]
/
mudsync
/
player.scm
diff --git
a/mudsync/player.scm
b/mudsync/player.scm
index 844aaf96f031fbf4112a05b602a3bd5e0f4e5813..113770f72aa5d43ce23a34a87c95f4b8adfb5aa1 100644
(file)
--- a/
mudsync/player.scm
+++ b/
mudsync/player.scm
@@
-113,9
+113,7
@@
(define inv-names
(map
(lambda (inv-item)
- (msg-receive (_ #:key val)
- (<-wait player inv-item 'get-name)
- val))
+ (msg-val (<-wait player inv-item 'get-name)))
(gameobj-occupants player)))
(define text-to-show
(if (eq? inv-names '())