Author: spadkins
Date: Mon Dec 14 00:02:15 2009
New Revision: 13660

Modified:
   p5ee/trunk/App-Context/lib/App/Context.pm

Log:
fixed Repository alias'es

Modified: p5ee/trunk/App-Context/lib/App/Context.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Context.pm   (original)
+++ p5ee/trunk/App-Context/lib/App/Context.pm   Mon Dec 14 00:02:15 2009
@@ -633,10 +633,11 @@
     ##############################################################
     if (!$service_initialized && $service_conf) {
         my $alias = $service_conf->{alias};
-        if ($alias) {
+        if ($alias && $alias ne $name) {
+            $service = $session->{cache}{$type}{$alias};
+           $service = $self->service($type, $alias) if (!$service);
+            $service_conf = $conf->{$type}{$alias};
             $name = $alias;
-            $service = $session->{cache}{$type}{$name};
-            $service_conf = $conf->{$type}{$name};
         }
         elsif ($type ne "Authorization" && ($service_conf->{clone} || 
$service_conf->{auth_clone})) {
             my $clone = $self->get_auth_attrib_value($service_conf, $type, 
$name, "clone");

Reply via email to