X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=ml-class.lisp;fp=ml-class.lisp;h=902c1c134422676cd7f62584237e9ffb95337fd2;hb=30c2e8bd2c7043d845024395e19b3030d039eae2;hp=57fd07cb5a52bec2ba79ad55f7d3fabb0a252b98;hpb=3f50791d43f83b9141e4022ce1fd2460edf62436;p=kmrcl.git

diff --git a/ml-class.lisp b/ml-class.lisp
index 57fd07c..902c1c1 100644
--- a/ml-class.lisp
+++ b/ml-class.lisp
@@ -11,7 +11,7 @@
 ;;;; in Text, HTML, and XML formats. This includes hyperlinking
 ;;;; capability and sub-objects.
 ;;;;
-;;;; $Id: ml-class.lisp,v 1.18 2002/10/16 22:56:07 kevin Exp $
+;;;; $Id: ml-class.lisp,v 1.19 2002/10/16 23:34:33 kevin Exp $
 ;;;;
 ;;;; This file, part of KMRCL, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
@@ -322,6 +322,8 @@ Format is ((field-name field-lookup-func other-link-params) ...)")
 (defparameter *default-textformat* nil)
 (defparameter *default-htmlformat* nil)
 (defparameter *default-htmlrefformat* nil)
+(defparameter *default-xhtmlformat* nil)
+(defparameter *default-xhtmlrefformat* nil)
 (defparameter *default-xmlformat* nil)
 (defparameter *default-xmlrefformat* nil)
 (defparameter *default-ie-xmlrefformat* nil)