X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=examples%2Fexample.lisp;h=0d6b3d5ac76858b20eeea370591f0632420e69fa;hb=cda49a13fa66d935f4d7db644364cc741b9c1c4c;hp=0e97b03f9e2a730d6aeda6e6ae699675a2ca737e;hpb=9d3930d7b2bacd5327ce55ad9fb0ce1392fe746b;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)