Mercurial > pub > Impl
annotate Lib/IMPL/ORM/Helpers.pm @ 281:a8dbddf491dd
refactoring
*IMPL::declare reset abstractProps static property after implementing these props
*IMPL::Serialization: fixed bug with multiple text parts inside one node
*IMPL::Web::Handler::TTView: removed obsolete property 'location' from 'view' template variable
author | cin |
---|---|
date | Mon, 11 Feb 2013 00:58:22 +0400 |
parents | 16ada169ca75 |
children |
rev | line source |
---|---|
49 | 1 package IMPL::ORM::Helpers; |
2 use strict; | |
3 use warnings; | |
4 | |
5 require Exporter; | |
6 our @ISA = qw(Exporter); | |
7 our @EXPORT_OK = qw(&Map &Box); | |
8 | |
9 sub Map($$) { | |
10 my ($TKey,$TValue) = @_; | |
11 | |
12 $TKey =~ s/:://g; | |
13 $TValue =~ s/:://g; | |
14 | |
15 return "IMPL::ORM::Map::${TKey}${TValue}"; | |
16 } | |
17 | |
18 sub Box($) { | |
19 my ($TValue) = @_; | |
20 $TValue =~ s/:://g; | |
21 return "IMPL::ORM::Box::$TValue"; | |
22 } | |
23 | |
24 1; |