about summary refs log tree commit diff
path: root/emacs/.emacs.d/wpc/scope.el
diff options
context:
space:
mode:
Diffstat (limited to 'emacs/.emacs.d/wpc/scope.el')
-rw-r--r--emacs/.emacs.d/wpc/scope.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/emacs/.emacs.d/wpc/scope.el b/emacs/.emacs.d/wpc/scope.el
index c97a59b88bd6..e8a2ad2ecc8d 100644
--- a/emacs/.emacs.d/wpc/scope.el
+++ b/emacs/.emacs.d/wpc/scope.el
@@ -20,7 +20,7 @@
 (require 'alist)
 (require 'stack)
 (require 'struct)
-(require 'macros)
+(require '>)
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;; Create
@@ -47,7 +47,7 @@ The newest bindings eclipse the oldest."
   "Push a new, empty scope onto XS."
   (struct-update scope
                  scopes
-                 (>> (stack-push (alist-new)))
+                 (>-> (stack-push (alist-new)))
                  xs))
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
@@ -75,7 +75,7 @@ The newest bindings eclipse the oldest."
   "Set value, V, at key, K, in XS for the current scope."
   (struct-update scope
                  scopes
-                 (>> (stack-map-top (>> (alist-set k v))))
+                 (>-> (stack-map-top (>-> (alist-set k v))))
                  xs))
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;