Mercurial > pub > Impl
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 .. $#_]; }