From: Christopher Allan Webber <cwebber@dustycloud.org>
Date: Sun, 22 Jan 2017 02:01:27 +0000 (-0600)
Subject: removing pks
X-Git-Tag: fosdem-2017~103
X-Git-Url: https://jxself.org/git/?p=mudsync.git;a=commitdiff_plain;h=5b9d1025df991e96148eeefe5fb9653e033e7f82

removing pks
---

diff --git a/mudsync/gameobj.scm b/mudsync/gameobj.scm
index 44602df..370ba47 100644
--- a/mudsync/gameobj.scm
+++ b/mudsync/gameobj.scm
@@ -225,7 +225,7 @@ Assists in its replacement of occupants if necessary and nothing else."
          ;; A list of addresses... since our address object is (annoyingly)
          ;; currently a simple cons cell...
          ((exclude-1 ... exclude-rest)
-          (pk 'failboat (member occupant (pk 'exclude-lst exclude))))
+          (member occupant exclude))
          ;; Must be an individual address!
          (_ (equal? occupant exclude))))
      (if exclude-it?