[Guile-commits] 03/03: Fix hash-table-merge! bug.

[Andy Wingo]

wingo pushed a commit to branch master
in repository guile.

commit 23042a1ef9ea5054feb0c4d33a36b10115e65e18
Author: Ricardo G. Herdt <r.herdt@posteo.de>
AuthorDate: Fri May 8 01:37:24 2020 +0200

    Fix hash-table-merge! bug.
    
    * module/srfi/srfi-69.scm : fold over second hash table.
---
 module/srfi/srfi-69.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/module/srfi/srfi-69.scm b/module/srfi/srfi-69.scm
index b9486c4..91bcc77 100644
--- a/module/srfi/srfi-69.scm
+++ b/module/srfi/srfi-69.scm
@@ -330,7 +330,7 @@ Answer the final F result."
   "Add all key/value pairs from OTHER-HT to HT, overriding HT's
 mappings where present.  Return HT."
   (hash-table-fold
-   ht (lambda (k v ign) (hash-table-set! ht k v)) #f)
+   other-ht (lambda (k v ign) (hash-table-set! ht k v)) #f)
   ht)
 
 ;;; srfi-69.scm ends here