Mercurial > pub > Impl
diff Lib/IMPL/Object/List.pm @ 405:cd6c6e61d442 ref20150831
Working on DI container
author | cin |
---|---|
date | Mon, 31 Aug 2015 10:23:42 +0300 |
parents | 4ddb27ff4a0b |
children | f23fcb19d3c1 |
line wrap: on
line diff
--- a/Lib/IMPL/Object/List.pm Fri Aug 28 19:54:53 2015 +0300 +++ b/Lib/IMPL/Object/List.pm Mon Aug 31 10:23:42 2015 +0300 @@ -2,6 +2,7 @@ use strict; use warnings; +use Carp qw(confess); use parent qw(IMPL::Object::ArrayObject); require IMPL::Exception; @@ -19,10 +20,16 @@ } sub Append { + confess "Appen method is obsolete use Push instead"; push @{$_[0]}, @_[1 .. $#_]; } +sub Push { + push @{$_[0]}, @_[1 .. $#_]; +} + sub AddLast { + confess "Appen method is obsolete use Push instead"; push @{$_[0]}, @_[1 .. $#_]; }