--- a/Lib/IMPL/ORM/Helpers.pm	Fri Feb 26 01:43:42 2010 +0300
+++ b/Lib/IMPL/ORM/Helpers.pm	Fri Feb 26 10:49:21 2010 +0300
@@ -1,24 +1,24 @@
-package IMPL::ORM::Helpers;
-use strict;
-use warnings;
-
-require Exporter;
-our @ISA = qw(Exporter);
-our @EXPORT_OK = qw(&Map &Box);
-
-sub Map($$) {
-    my ($TKey,$TValue) = @_;
-    
-    $TKey =~ s/:://g;
-    $TValue =~ s/:://g;
-    
-    return "IMPL::ORM::Map::${TKey}${TValue}";
-}
-
-sub Box($) {
-    my ($TValue) = @_;
-    $TValue =~ s/:://g;
-    return "IMPL::ORM::Box::$TValue";
-}
-
-1;
+package IMPL::ORM::Helpers;
+use strict;
+use warnings;
+
+require Exporter;
+our @ISA = qw(Exporter);
+our @EXPORT_OK = qw(&Map &Box);
+
+sub Map($$) {
+    my ($TKey,$TValue) = @_;
+    
+    $TKey =~ s/:://g;
+    $TValue =~ s/:://g;
+    
+    return "IMPL::ORM::Map::${TKey}${TValue}";
+}
+
+sub Box($) {
+    my ($TValue) = @_;
+    $TValue =~ s/:://g;
+    return "IMPL::ORM::Box::$TValue";
+}
+
+1;