diff options
| author | Paul A. Patience <paul@apatience.com> | 2021-09-10 20:58:44 -0400 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2021-09-11 09:27:10 -0700 |
| commit | 30a88bbde181cbc6f66e7646591bb1582756ce06 (patch) | |
| tree | 74174f7c342bc24b21348896fcc321071adb4ef2 | |
| parent | 3bd7d7c0ce366100c9acda10d337286e8ad73195 (diff) | |
| download | txr-30a88bbde181cbc6f66e7646591bb1582756ce06.tar.gz txr-30a88bbde181cbc6f66e7646591bb1582756ce06.tar.bz2 txr-30a88bbde181cbc6f66e7646591bb1582756ce06.zip | |
sockets: remove excess apostrophe in sock-peer.
* stdlib/socket.tl (sock-peer): Remove excess apostrophe in
getter.
| -rw-r--r-- | stdlib/socket.tl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/stdlib/socket.tl b/stdlib/socket.tl index cb8bef2f..0b39151e 100644 --- a/stdlib/socket.tl +++ b/stdlib/socket.tl @@ -269,6 +269,6 @@ (defplace (sock-peer sock) body (getter setter - ^(macrolet ((,getter () ^(sock-peer ',',sock)) + ^(macrolet ((,getter () ^(sock-peer ,',sock)) (,setter (val) ^(sock-set-peer ,',sock ,val))) ,body))) |