Mercurial > pub > Impl
comparison Lib/IMPL/Web/Application/ControllerUnit.pm @ 280:c6d0f889ef87
+IMPL::declare now supports meta attributes
*bugfixes related to the typeof() operator
| author | cin |
|---|---|
| date | Wed, 06 Feb 2013 02:15:48 +0400 |
| parents | 4d0e1962161c |
| children | 77df11605d3a |
comparison
equal
deleted
inserted
replaced
| 279:af8af4b8337e | 280:c6d0f889ef87 |
|---|---|
| 237 my ($this) = @_; | 237 my ($this) = @_; |
| 238 | 238 |
| 239 my $methods = $this->class_data(CONTROLLER_METHODS); | 239 my $methods = $this->class_data(CONTROLLER_METHODS); |
| 240 | 240 |
| 241 my $namespace = $this->unitNamespace; | 241 my $namespace = $this->unitNamespace; |
| 242 (my $module = typeof $this) =~ s/^$namespace//; | 242 (my $module = typeof($this)) =~ s/^$namespace//; |
| 243 | 243 |
| 244 my %smd = ( | 244 my %smd = ( |
| 245 module => [grep $_, split /::/, $module ], | 245 module => [grep $_, split /::/, $module ], |
| 246 ); | 246 ); |
| 247 | 247 |