From: Kevin M. Rosenberg <kevin@rosenberg.net>
Date: Fri, 7 Feb 2003 04:20:25 +0000 (+0000)
Subject: r3977: Auto commit for Debian build
X-Git-Tag: v2.5.5~111
X-Git-Url: http://git.kpe.io/?p=lml.git;a=commitdiff_plain;h=a9d2317b140c0709db1837922c8ec9528e6d8b76

r3977: Auto commit for Debian build
---

diff --git a/base.lisp b/base.lisp
index 167082f..dfc1162 100644
--- a/base.lisp
+++ b/base.lisp
@@ -7,7 +7,7 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Aug 2002
 ;;;;
-;;;; $Id: base.lisp,v 1.7 2003/02/07 02:37:18 kevin Exp $
+;;;; $Id: base.lisp,v 1.8 2003/02/07 04:20:25 kevin Exp $
 ;;;;
 ;;;; This file, part of LML, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
@@ -73,7 +73,7 @@
 (defmacro with-attr-string (tag attr-string &body body)
   (let ((attr (gensym)))
   `(let ((,attr ,attr-string))
-     (lml-format "<~(~A~)~A>" ',tag
+     (lml-format "<~(~A~) ~A>" ',tag
 	      (if (and (stringp ,attr) (plusp (length ,attr)))
 		  (format nil "~A" ,attr)
 		""))
@@ -85,7 +85,7 @@
 (defmacro with-no-endtag-attr-string (tag attr-string)
   (let ((attr (gensym)))
   `(let ((,attr ,attr-string))
-     (lml-format "<~(~A~)~A />" ',tag
+     (lml-format "<~(~A~) ~A />" ',tag
 	      (if (and (stringp ,attr) (plusp (length ,attr)))
 		  (format nil "~A" ,attr)
 		"")))))
diff --git a/debian/changelog b/debian/changelog
index ba29276..6c4c9f3 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -1,3 +1,9 @@
+cl-lml (2.2.3-1) unstable; urgency=low
+
+  * Add missing space character to output
+
+ -- Kevin M. Rosenberg <kmr@debian.org>  Thu,  6 Feb 2003 21:20:06 -0700
+
 cl-lml (2.2.2-1) unstable; urgency=low
 
   * Rename link to alink and add new link macro that produces a <link ...></link>