From 09549bd9e3bf4f90a4534c5ae5d72f87572c7355 Mon Sep 17 00:00:00 2001
From: Chris Hanson <org/chris-hanson/cph>
Date: Sat, 24 Jul 2004 04:03:09 +0000
Subject: [PATCH] Fix thinko in call to MAKE-XML-!ENTITY.

---
 v7/src/xml/xhtml-entities.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/v7/src/xml/xhtml-entities.scm b/v7/src/xml/xhtml-entities.scm
index 34c58d268..8a9060fac 100644
--- a/v7/src/xml/xhtml-entities.scm
+++ b/v7/src/xml/xhtml-entities.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: xhtml-entities.scm,v 1.1 2004/07/24 03:45:39 cph Exp $
+$Id: xhtml-entities.scm,v 1.2 2004/07/24 04:03:09 cph Exp $
 
 Copyright 2004 Massachusetts Institute of Technology
 
@@ -279,7 +279,7 @@ USA.
     ))
 
 (define html-entities
-  (map (lambda (b) (apply make-xml-!entity b))
+  (map (lambda (b) (make-xml-!entity (car b) (cdr b)))
        html-entity-alist))
 
 (define html-char->name-map
-- 
2.25.1