From d7da42b7c830203bad572620c63d3f513a2b505c Mon Sep 17 00:00:00 2001
From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Thu, 31 Aug 2000 15:22:29 +0000
Subject: Document UNTIE in a very minimalistic way.

p4raw-id: //depot/perl@6947
---
 pod/perlfunc.pod | 4 ++++
 pod/perltie.pod  | 5 +++++
 2 files changed, 9 insertions(+)

(limited to 'pod')

diff --git a/pod/perlfunc.pod b/pod/perlfunc.pod
index 99d99016f5..a1381f1d3a 100644
--- a/pod/perlfunc.pod
+++ b/pod/perlfunc.pod
@@ -5091,6 +5091,7 @@ A class implementing a hash should have the following methods:
     FIRSTKEY this
     NEXTKEY this, lastkey
     DESTROY this
+    UNTIE this
 
 A class implementing an ordinary array should have the following methods:
 
@@ -5107,6 +5108,7 @@ A class implementing an ordinary array should have the following methods:
     SPLICE this, offset, length, LIST
     EXTEND this, count
     DESTROY this
+    UNTIE this
 
 A class implementing a file handle should have the following methods:
 
@@ -5119,6 +5121,7 @@ A class implementing a file handle should have the following methods:
     PRINTF this, format, LIST
     CLOSE this
     DESTROY this
+    UNTIE this
 
 A class implementing a scalar should have the following methods:
 
@@ -5126,6 +5129,7 @@ A class implementing a scalar should have the following methods:
     FETCH this,
     STORE this, value
     DESTROY this
+    UNTIE this
 
 Not all methods indicated above need be implemented.  See L<perltie>,
 L<Tie::Hash>, L<Tie::Array>, L<Tie::Scalar>, and L<Tie::Handle>.
diff --git a/pod/perltie.pod b/pod/perltie.pod
index b39d7d5336..d08ed5630c 100644
--- a/pod/perltie.pod
+++ b/pod/perltie.pod
@@ -736,6 +736,11 @@ Here's how to use our little example:
     print FOO $a, " plus ", $b, " equals ", $a + $b, "\n";
     print <FOO>;
 
+=head2 UNTIE this
+
+You can define for all tie types an UNTIE method that will be called
+at untie().
+
 =head2 The C<untie> Gotcha
 
 If you intend making use of the object returned from either tie() or
-- 
cgit v1.2.1