From: Kevin M. Rosenberg Date: Fri, 7 Feb 2003 02:37:18 +0000 (+0000) Subject: r3973: Auto commit for Debian build X-Git-Tag: v2.5.5~112 X-Git-Url: http://git.kpe.io/?p=lml.git;a=commitdiff_plain;h=dc3d60708af336b85c4766dc5a3aefd1a82b278d r3973: Auto commit for Debian build --- diff --git a/base.lisp b/base.lisp index 577622c..167082f 100644 --- a/base.lisp +++ b/base.lisp @@ -7,7 +7,7 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Aug 2002 ;;;; -;;;; $Id: base.lisp,v 1.6 2003/01/26 21:35:27 kevin Exp $ +;;;; $Id: base.lisp,v 1.7 2003/02/07 02:37:18 kevin Exp $ ;;;; ;;;; This file, part of LML, is Copyright (c) 2002 by Kevin M. Rosenberg ;;;; @@ -189,10 +189,10 @@ (lml-format "~A~%" (xml-prologue-string)) (lml-format "~A~%" (xhtml-prologue-string)))) -(defmacro link (dest &body body) +(defmacro alink (dest &body body) `(with a :href ,dest ,@body)) -(defmacro link-c (class dest &body body) +(defmacro alink-c (class dest &body body) `(with a :href ,dest :class (quote ,class) ,@body)) (defmacro img (dest &rest args) @@ -229,8 +229,8 @@ (eval-when (:compile-toplevel :load-toplevel :execute) (defparameter *macro-list* '(a div span h1 h2 h3 h4 h5 h6 i b p li ul ol table tbody td th tr body head - html title pre tt u dl dt dd kbd code form textarea)) - (export '(link link-c br hr img input meta meta-key)) + html title pre tt u dl dt dd kbd code form textarea link)) + (export '(alink alink-c br hr img input meta meta-key)) (export *macro-list*)) (loop for i in *macro-list* diff --git a/debian/changelog b/debian/changelog index d92c054..ba29276 100644 --- a/debian/changelog +++ b/debian/changelog @@ -1,3 +1,9 @@ +cl-lml (2.2.2-1) unstable; urgency=low + + * Rename link to alink and add new link macro that produces a + + -- Kevin M. Rosenberg Thu, 6 Feb 2003 19:36:42 -0700 + cl-lml (2.2.1-1) unstable; urgency=low * Upstream change