X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=composite.lisp;fp=composite.lisp;h=230a33bd79bbe6d50e6455bcaebae89a3f8f38a8;hb=16330812b9a0fef2394d2a45889ab04bec5d3859;hp=e4fbcfe85988ef067e3773660734f94c2569fcdd;hpb=39a479e5f9a18b8e9211cac3e8391ee29e54c3ee;p=umlisp.git diff --git a/composite.lisp b/composite.lisp index e4fbcfe..230a33b 100644 --- a/composite.lisp +++ b/composite.lisp @@ -7,7 +7,7 @@ ;;;; Author: Kevin M. Rosenberg ;;;; Date Started: Apr 2000 ;;;; -;;;; $Id: composite.lisp,v 1.24 2003/06/10 22:30:16 kevin Exp $ +;;;; $Id: composite.lisp,v 1.25 2003/07/21 00:53:27 kevin Exp $ ;;;; ;;;; This file, part of UMLisp, is ;;;; Copyright (c) 2000-2003 by Kevin M. Rosenberg, M.D. @@ -184,7 +184,7 @@ (defun find-ucon2_freq-coc-tui-all (tui) (find-ucon2_freq-tui-all tui #'find-ucon2-coc-tui)) -#+(or cmu scl) +#+(or scl) (dolist (c '(ucon_freq ustr_freq usty_freq usrl_freq)) (let ((cl #+cmu (pcl:find-class c) #+scl (find-class c)))