From b2d601fcc40acb08a61cb3607f4455bfbd3126fc Mon Sep 17 00:00:00 2001 From: "Kevin M. Rosenberg" Date: Mon, 17 Feb 2003 06:48:46 +0000 Subject: [PATCH] r4056: Auto commit for Debian build --- base.lisp | 14 +++++++------- debian/changelog | 6 ++++++ 2 files changed, 13 insertions(+), 7 deletions(-) diff --git a/base.lisp b/base.lisp index 3e59034..4a03e71 100644 --- a/base.lisp +++ b/base.lisp @@ -7,7 +7,7 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Aug 2002 ;;;; -;;;; $Id: base.lisp,v 1.10 2003/02/10 19:49:18 kevin Exp $ +;;;; $Id: base.lisp,v 1.11 2003/02/17 06:48:46 kevin Exp $ ;;;; ;;;; This file, part of LML, is Copyright (c) 2002 by Kevin M. Rosenberg ;;;; @@ -201,11 +201,11 @@ (defmacro input (&rest args) `(with-no-endtag input ,@args)) -(defmacro meta (name content) - `(with meta :name ,name :content ,content)) +(defmacro link (&rest args) + `(with-no-endtag link ,@args)) -(defmacro meta-key (&key name content http-equiv) - `(with meta :name ,name :content ,content :http-equiv ,http-equiv)) +(defmacro meta (&rest args) + `(with-no-endtag meta ,@args)) (defmacro br (&rest args) `(with-no-endtag br ,@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 link)) - (export '(alink alink-c br hr img input meta meta-key)) + html title pre tt u dl dt dd kbd code form textarea)) + (export '(alink alink br hr img input meta link meta-key)) (export *macro-list*)) (loop for i in *macro-list* diff --git a/debian/changelog b/debian/changelog index d7756cb..0a04c70 100644 --- a/debian/changelog +++ b/debian/changelog @@ -1,3 +1,9 @@ +cl-lml (2.3.0-1) unstable; urgency=low + + * Change definition of link/meta + + -- Kevin M. Rosenberg Sun, 16 Feb 2003 23:46:37 -0700 + cl-lml (2.2.4-1) unstable; urgency=low * Move XHTML to version 1.1 -- 2.34.1