summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--ChangeLog4
-rw-r--r--doc/copy.n6
2 files changed, 7 insertions, 3 deletions
diff --git a/ChangeLog b/ChangeLog
index 235fe6b..f565152 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2009-06-08 Donal K. Fellows <dkf@users.sf.net>
+
+ * doc/copy.n: Fix error in example spotted by Venkat Iyer.
+
2009-06-02 Don Porter <dgp@users.sourceforge.net>
* generic/tclExecute.c: Replace dynamically-initialized table with
diff --git a/doc/copy.n b/doc/copy.n
index 023a281..018c696 100644
--- a/doc/copy.n
+++ b/doc/copy.n
@@ -4,7 +4,7 @@
'\" See the file "license.terms" for information on usage and redistribution
'\" of this file, and for a DISCLAIMER OF ALL WARRANTIES.
'\"
-'\" RCS: @(#) $Id: copy.n,v 1.2 2008/10/17 10:22:25 dkf Exp $
+'\" RCS: @(#) $Id: copy.n,v 1.3 2009/06/07 23:33:23 dkf Exp $
'\"
.so man.macros
.TH copy n 0.1 TclOO "TclOO Commands"
@@ -39,9 +39,9 @@ then demonstrates that the copied object is indeed a copy.
.PP
.CS
oo::object create src
-oo::define src method msg {} {puts foo}
+oo::objdefine src method msg {} {puts foo}
\fBoo::copy\fR src dst
-oo::define src method msg {} {puts bar}
+oo::objdefine src method msg {} {puts bar}
src msg \fI\(-> prints "bar"\fR
dst msg \fI\(-> prints "foo"\fR
.CE