From: Kevin M. Rosenberg <kevin@rosenberg.net>
Date: Sat, 29 Mar 2003 07:17:47 +0000 (+0000)
Subject: r4280: Auto commit for Debian build
X-Git-Tag: debian-2.11.0-2~189
X-Git-Url: http://git.kpe.io/?a=commitdiff_plain;h=76eab2690449f19f15b223399ed0f3738d5fac2e;hp=94301d812a0e096b96568a267414a759c0ca1a28;p=hyperobject.git

r4280: Auto commit for Debian build
---

diff --git a/mop.lisp b/mop.lisp
index 788df53..5a42585 100644
--- a/mop.lisp
+++ b/mop.lisp
@@ -11,7 +11,7 @@
 ;;;; in Text, HTML, and XML formats. This includes hyperlinking
 ;;;; capability and sub-objects.
 ;;;;
-;;;; $Id: mop.lisp,v 1.22 2003/03/29 07:12:10 kevin Exp $
+;;;; $Id: mop.lisp,v 1.23 2003/03/29 07:17:47 kevin Exp $
 ;;;;
 ;;;; This file is Copyright (c) 2000-2002 by Kevin M. Rosenberg
 ;;;;
@@ -292,7 +292,8 @@
   (unless *queued-definitions-stream*
     (setq *queued-definitions-stream* (open *queued-definitions-pathname*
 					    :direction :output
-					    :if-exists :supersede)))
+					    :if-exists :supersede))
+    (format *queued-definitions-stream* "(in-package #:hyperobject)~%"))
   (format *queued-definitions-stream* "~A~%" def))
 
 (defun process-queued-definitions ()