Mercurial > pub > Impl

diff Lib/IMPL/Object/Abstract.pm @ 197:6b1dda998839

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Added IMPL::declare, IMPL::require, to simplify module definitions IMPL::Transform now admires object inheritance while searching for the transformation Added HTTP some exceptions IMPL::Web::Application::RestResource almost implemented
author sergey
date Thu, 19 Apr 2012 02:10:02 +0400
parents 4d0e1962161c
children ad93c9f4dd93
line wrap: on
line diff
--- a/Lib/IMPL/Object/Abstract.pm	Mon Apr 16 17:42:54 2012 +0400
+++ b/Lib/IMPL/Object/Abstract.pm	Thu Apr 19 02:10:02 2012 +0400
@@ -31,6 +31,8 @@
                     $this->$_($mapper->(@_)) foreach @$superSequence;
                 } if @$superSequence;
             }
+        } elsif ($mapper and not ref $mapper and $mapper eq '@_') {
+        	push @sequence,@$superSequence;
         } else {
             warn "Unsupported mapper type, in '$class' for the super class '$super'" if $mapper;
             push @sequence, sub {