From 7c770e87ff4bec570e43970ffd79e4e30b3a39e5 Mon Sep 17 00:00:00 2001 From: "Kevin M. Rosenberg" Date: Mon, 14 Apr 2003 17:36:12 +0000 Subject: [PATCH 1/1] r4473: Auto commit for Debian build --- mop.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/mop.lisp b/mop.lisp index 2ee684b..cf431f0 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.49 2003/04/14 17:10:54 kevin Exp $ +;;;; $Id: mop.lisp,v 1.50 2003/04/14 17:36:12 kevin Exp $ ;;;; ;;;; This file is Copyright (c) 2000-2002 by Kevin M. Rosenberg ;;;; @@ -192,7 +192,7 @@ t))) (defmethod compute-effective-slot-definition :around ((cl hyperobject-class) - #-(or scl) name + #-(or cmu scl) name dsds) #+allegro (declare (ignore name)) (let* ((dsd (car dsds)) -- 2.34.1