# HG changeset patch
# User Steve Losh <steve@stevelosh.com>
# Date 1471915435 0
# Node ID 6bf3ae7ae6add9e527ae6ceae7b9627d24744c67
# Parent  0d0a740ed42e680299a3c9a1ed92ab0b48c805f9
Fix parameter name

diff -r 0d0a740ed42e -r 6bf3ae7ae6ad losh.lisp
--- a/losh.lisp	Tue Aug 23 01:23:06 2016 +0000
+++ b/losh.lisp	Tue Aug 23 01:23:55 2016 +0000
@@ -169,7 +169,7 @@
 
 
 ;;;; Functions
-(defun juxt (&rest fns)
+(defun juxt (&rest functions)
   "Return a function that will juxtapose the results of `functions`.
 
   This is like Clojure's `juxt`.  Given functions `(f0 f1 ... fn)`, this will
@@ -183,7 +183,7 @@
 
   "
   (lambda (&rest args)
-    (mapcar (rcurry #'apply args) fns)))
+    (mapcar (rcurry #'apply args) functions)))
 
 (defun nullary (function &optional result)
   "Return a new function that acts as a nullary-patched version of `function`.