From 0f358c4052cf766a74b0354124736cb3652cda1d Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Tue, 15 Sep 2015 02:18:07 -0400
Subject: - :: no longer demands prefixes for the struct members - Fixed both
 lux/control/comonad;be & lux/codata/stream;\stream

---
 source/lux.lux | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'source/lux.lux')

diff --git a/source/lux.lux b/source/lux.lux
index e155af794..7d00cd077 100644
--- a/source/lux.lux
+++ b/source/lux.lux
@@ -3049,10 +3049,10 @@
                          (lambda [so-far part]
                            (case part
                              [_ (#SymbolS slot)]
-                             (return (` (get@ (~ (tag$ slot)) (~ so-far))))
+                             (return (` (using (~ so-far) (~ (symbol$ slot)))))
 
                              (\ [_ (#FormS (@list& [_ (#SymbolS slot)] args))])
-                             (return (` ((get@ (~ (tag$ slot)) (~ so-far))
+                             (return (` ((using (~ so-far) (~ (symbol$ slot)))
                                          (~@ args))))
 
                              _
-- 
cgit v1.2.3