-*- Mode: Text -*-
;;;>
;;;> *****************************************************************************************
;;;> ** (c) Copyright 1993-1990 Symbolics, Inc.  All rights reserved.
;;;> ** Portions of font library Copyright (c) 1984 Bitstream, Inc.  All Rights Reserved.
;;;>
;;;>    The software, data, and information contained herein are proprietary 
;;;> to, and comprise valuable trade secrets of, Symbolics, Inc., which intends 
;;;> to keep such software, data, and information confidential and to preserve 
;;;> them as trade secrets.  They are given in confidence by Symbolics pursuant 
;;;> to a written license agreement, and may be used, copied, transmitted, and 
;;;> stored only in accordance with the terms of such license.
;;;> 
;;;> Symbolics, Symbolics 3600, Symbolics 3670 (R), Symbolics 3675 (R), Symbolics
;;;> 3630, Symbolics 3640, Symbolics 3645 (R), Symbolics 3650 (R), Symbolics 3653,
;;;> Symbolics 3620 (R), Symbolics 3610 (R), Symbolics Common Lisp (R),
;;;> Symbolics-Lisp (R), Zetalisp (R), Genera (R), Wheels (R), Dynamic Windows (R),
;;;> SmartStore (R), Semanticue (R), Frame-Up (R), Firewall (R), Document Examiner (R),
;;;> Delivery Document Examiner, "Your Next Step in Computing" (R), Ivory, MacIvory,
;;;> MacIvory model 1, MacIvory model 2, MacIvory model 3, XL400, XL1200, XL1201,
;;;> Symbolics UX400S, Symbolics UX1200S, NXP1000, Symbolics C, Symbolics Pascal (R),
;;;> Symbolics Prolog, Symbolics Fortran (R), CLOE (R), CLOE Application Generator,
;;;> CLOE Developer, CLOE Runtime, Common Lisp Developer, Symbolics Concordia, Joshua,
;;;> Statice (R), and Minima are trademarks of Symbolics, Inc.
;;;> 
;;;> RESTRICTED RIGHTS LEGEND
;;;>    Use, duplication, and disclosure by the Government are subject to restrictions 
;;;> as set forth in subdivision (c)(1)(ii) of the Rights in Technical Data and Computer 
;;;> Software Clause at DFAR 52.227-7013.
;;;> 
;;;>      Symbolics, Inc.
;;;>      6 Concord Farms
;;;>      555 Virginia Road
;;;>      Concord, Massachusetts 01742-2727
;;;>      United States of America
;;;>      508-287-1000
;;;>
;;;> *****************************************************************************************
;;;>

Doc:

For Genera 8.0, we have removed obsolete fields from some classes
of namespace objects.  These fields were declared obsolete in Genera
7.0. These fields are:

For class host:
	:location
	:finger-location

For class printer:
	:default-font
	:header-font

For class site:
	:other-sites-ignored-in-zmail-summary


If your namespaces still contain objects that have these attributes, you
will receive notifications about it when you boot a Genera 8.0 world on your
namespace server.  You can ignore these notifications.  The offending
fields will be removed the next time the object is saved, so you can fix
things by resaving everything that you get a notification about.

To ease this transition, we are providing a tool to go through
namespaces and clean up objects with obsolete fields.  You must run this tool
D,#TD1PsT[Begin using 006 escapes](1 0 (NIL 0) (NIL :BOLD NIL) "CPTFONTCB")before 0booting your new world; it will be ineffective afterwards.  

You use it as follows:

(2 0 (NIL 0) (NIL SAGE::TYPEWRITER NIL) "CPTFONT")(cleanup-one-namespace (neti:find-object-named :namespace "(3 0 (NIL 0) (NIL :ITALIC NIL) "CPTFONTI")namespace2") nil)

0This will go through all the hosts, printers, and sites in namespace
3namespace0 and clean up any objects that need it.  

The second argument, "1nil0" in the example above, is the "really do the
update" flag.  If it is nil, no changes will be made to your namespace;
you will just get a listing of the changes it 3would0 have made.  We
recommend that you run the cleanup function once this way, before making
any permanent changes.  You can then update the objects by hand, if you
choose to, or run the tool again to do the updates for you, as follows:

2(cleanup-one-namespace (neti:find-object-named :namespace0 "3namespace2") t)


0You can also use

2(cleanup-all-namespaces nil)

0to run 1#'cleanup-one-namespace0 on all the namespaces in
1neti:*namespace-search-list*0.  The argument is the same flag as above;
1nil0 for test mode, 1t0 to make the updates real.