diff options
Diffstat (limited to 'srfi')
-rw-r--r-- | srfi/srfi-1.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/srfi/srfi-1.scm b/srfi/srfi-1.scm index 96042d6e6..f0968bc15 100644 --- a/srfi/srfi-1.scm +++ b/srfi/srfi-1.scm @@ -710,7 +710,7 @@ (let lp ((a alist)) (if (null? a) '() - (if (k= (caar a) key) + (if (k= key (caar a)) (lp (cdr a)) (cons (car a) (lp (cdr a)))))))) |