From ed38cba0d2ed61535a9911969bfd000d5ae1ffb9 Mon Sep 17 00:00:00 2001 From: "Kevin M. Rosenberg" Date: Wed, 14 May 2003 21:18:12 +0000 Subject: [PATCH] r4937: Auto commit for Debian build --- views.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/views.lisp b/views.lisp index e7fb1d6..d5536ce 100644 --- a/views.lisp +++ b/views.lisp @@ -7,7 +7,7 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Apr 2000 ;;;; -;;;; $Id: views.lisp,v 1.43 2003/05/14 21:15:11 kevin Exp $ +;;;; $Id: views.lisp,v 1.44 2003/05/14 21:18:12 kevin Exp $ ;;;; ;;;; This file is Copyright (c) 2000-2003 by Kevin M. Rosenberg ;;;; ************************************************************************* @@ -161,7 +161,7 @@ ) (defmacro write-simple (v s) - `(typecase v + `(typecase ,v (string (write-string ,v ,s)) #+allegro -- 2.34.1