X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=examples%2Fexample.lisp;fp=examples%2Fexample.lisp;h=0d6b3d5ac76858b20eeea370591f0632420e69fa;hb=86ec4d5f1d54cc100dec0882d5bf7ecaf8d39af7;hp=0e97b03f9e2a730d6aeda6e6ae699675a2ca737e;hpb=a922259ecd7b9d02cccb8cc735e06ed8483f270a;p=hyperobject.git

diff --git a/examples/example.lisp b/examples/example.lisp
index 0e97b03..0d6b3d5 100644
--- a/examples/example.lisp
+++ b/examples/example.lisp
@@ -9,7 +9,7 @@
 ;;;;
 ;;;; A simple example file for hyperobjects
 ;;;;
-;;;; $Id: example.lisp,v 1.1 2002/11/25 04:47:23 kevin Exp $
+;;;; $Id: example.lisp,v 1.2 2002/11/26 21:51:10 kevin Exp $
 ;;;;
 ;;;; This file is Copyright (c) 2000-2002 by Kevin M. Rosenberg
 ;;;;
@@ -84,7 +84,7 @@
 
 
 (format t "~&Text Format~%")
-(print-hyperobject mary :subobjects t)
+(view mary :subobjects t)
 
 (format t "~&XML Format with field labels and hyperlinks~%")
-(print-hyperobject mary :subobjects t :label t :format :xmlref)
+(view mary :subobjects t :label t :format :xmlref)