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 | 8335ac0f99cfe816afd5be341aae9a1c968deb2c (patch) | |
| tree | 74174f7c342bc24b21348896fcc321071adb4ef2 | |
| parent | 033d2395431a2d42ab5b127030ac6b1f61347541 (diff) | |
| download | txr-8335ac0f99cfe816afd5be341aae9a1c968deb2c.tar.gz txr-8335ac0f99cfe816afd5be341aae9a1c968deb2c.tar.bz2 txr-8335ac0f99cfe816afd5be341aae9a1c968deb2c.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))) |