Added object method

nigelhorne · Sep 28, 2019 · 2e856f8 · 2e856f8
1 parent fcf71e3
commit 2e856f8
Show file tree

Hide file tree

Showing 2 changed files with 16 additions and 0 deletions.
diff --git a/Changes b/Changes
@@ -1,5 +1,8 @@
 Revision history for Class::Simple::Readonly::Cached
 
+0.03
+	Added the objet() method
+
 0.02	Fri Sep 27 03:43:56 PDT 2019
 	Added hash mode
 

diff --git a/lib/Class/Simple/Readonly/Cached.pm b/lib/Class/Simple/Readonly/Cached.pm
@@ -77,6 +77,19 @@ sub new {
 	Carp::carp('Usage: ', __PACKAGE__, '->new(cache => $cache [, object => $object ], %args)');
 }
 
+=head2 object
+
+Return the encapsulated objet
+
+=cut
+
+sub object
+{
+	my $self = shift;
+
+	return $self->{'object'};
+}
+
 sub _caller_class
 {
 	my $self = shift;