diff Lib/IMPL/Object/List.pm @ 406:f23fcb19d3c1 ref20150831

implemented ServicesBag
author cin
date Mon, 31 Aug 2015 20:22:16 +0300
parents cd6c6e61d442
children
line wrap: on
line diff
--- a/Lib/IMPL/Object/List.pm	Mon Aug 31 10:23:42 2015 +0300
+++ b/Lib/IMPL/Object/List.pm	Mon Aug 31 20:22:16 2015 +0300
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-use Carp qw(confess);
+use Carp qw(carp);
 use parent qw(IMPL::Object::ArrayObject);
 require IMPL::Exception;
 
@@ -20,7 +20,7 @@
 }
 
 sub Append {
-	confess "Appen method is obsolete use Push instead";
+	carp "Appen method is obsolete use Push instead";
     push @{$_[0]}, @_[1 .. $#_];
 }
 
@@ -29,7 +29,7 @@
 }
 
 sub AddLast {
-	confess "Appen method is obsolete use Push instead";
+	carp "Appen method is obsolete use Push instead";
     push @{$_[0]}, @_[1 .. $#_];
 }