Sorry,
as I expected the Update failed!!!!
Error loading EBox::SysInfo::Composite::General: Attempt to reload TryCatch.pm aborted.
Compilation failed in require at /usr/share/perl5/EBox/Model/Composite.pm line 55.
BEGIN failed--compilation aborted at /usr/share/perl5/EBox/Model/Composite.pm line 55.
Compilation failed in require at (eval 1907) line 2.
...propagated at /usr/share/perl/5.18/base.pm line 83.
BEGIN failed--compilation aborted at /usr/share/perl5/EBox/SysInfo/Composite/General.pm line 21.
Compilation failed in require at (eval 1906) line 2.
BEGIN failed--compilation aborted at (eval 1906) line 2.
at /usr/share/perl5/EBox/Model/Manager.pm line 270
in EBox::Model::Manager::_component at /usr/share/perl5/EBox/Model/Manager.pm line 270
267:
268: my $class = $global->_className($moduleName) . '::' . ucfirst($kind) . "::$name";
269: eval "use $class";
270: if ($@) {
271: throw EBox::Exceptions::Internal("Error loading $class: $@");
272: }
273:
Show function arguments
in EBox::Model::Manager::_componentByPath at /usr/share/perl5/EBox/Model/Manager.pm line 246
243: }
244:
245: my $module = EBox::Global->getInstance($readonly)->modInstance($moduleName);
246: return $self->_component($kind, $module, $compName);
247: }
248:
249: sub _component
Show function arguments
in EBox::Model::Manager::composite at /usr/share/perl5/EBox/Model/Manager.pm line 159
156: {
157: my ($self, $path, $readonly) = @_;
158:
159: return $self->_componentByPath('composite', $path, $readonly);
160: }
161:
162: # Method: component
Show function arguments
in EBox::CGI::Run::_instanceComponent at /usr/share/perl5/EBox/CGI/Run.pm line 238
235:
236: my $manager = EBox::Model::Manager->instance();
237: my $model = undef;
238: if ($type eq 'Composite') {
239: $model = $manager->composite($path);
240: } else {
241: $model = $manager->model($path);
Show function arguments
in EBox::CGI::Run::_instanceModelCGI at /usr/share/perl5/EBox/CGI/Run.pm line 261
258: my $path = lc ($namespace) . "/$modelName";
259: return undef unless $manager->componentExists($path);
260:
261: my $model = $self->_instanceComponent($path, $type);
262:
263: if ($model) {
264: $menuNamespace = $model->menuNamespace();
Show function arguments
in (eval) at /usr/share/perl5/EBox/CGI/Run.pm line 75
72: push (@extraParams, htmlblocks => $htmlblocks);
73: }
74:
75: my $handler = $self->_instanceModelCGI($effectiveUrl, @extraParams);
76:
77: unless ($handler) {
78: my $classname = $self->urlToClass($effectiveUrl);
in EBox::CGI::Run::run at /usr/share/perl5/EBox/CGI/Run.pm line 68
65: $redis->begin();
66:
67: my $url = $self->urlFromRequest($request);
68: try {
69: my $effectiveUrl = _urlAlias($url);
70: my @extraParams = (request => $request);
71: if ($htmlblocks) {
Show function arguments
in main::__ANON__ at /usr/share/zentyal/psgi/zentyal.psgi line 46
43: local $SIG{__WARN__} = sub { EBox::warn($_[0]) };
44:
45: my $req = Plack::Request->new($env);
46: return EBox::CGI::Run->run($req);
47: };
48:
49: my $builder = new Plack::Builder();
Show function arguments
in Plack::App::URLMap::call at /usr/share/perl5/Plack/App/URLMap.pm line 71
68: return $self->response_cb($app->($env), sub {
69: $env->{PATH_INFO} = $orig_path_info;
70: $env->{SCRIPT_NAME} = $orig_script_name;
71: });
72: }
73:
74: DEBUG && warn "All matching failed.\n";
Show function arguments
in Plack::Component::__ANON__ at /usr/share/perl5/Plack/Component.pm line 50
47: sub to_app {
48: my $self = shift;
49: $self->prepare_app;
50: return sub { $self->call(@_) };
51: }
52:
53:
Show function arguments
in EBox::Middleware::Auth::call at /usr/share/perl5/EBox/Middleware/Auth.pm line 366
363: $self->_logout($env);
364: } elsif ($self->_validateSession($env)) {
365: delete $env->{'psgix.session'}{AuthReason};
366: return $self->app->($env);
367: } else {
368: # Require authentication, redirect to the login form.
369: return $self->_redirectToLogin($env);
Show function arguments
in Plack::Component::__ANON__ at /usr/share/perl5/Plack/Component.pm line 50
47: sub to_app {
48: my $self = shift;
49: $self->prepare_app;
50: return sub { $self->call(@_) };
51: }
52:
53:
Show function arguments
in Plack::Middleware::Conditional::call at /usr/share/perl5/Plack/Middleware/Conditional.pm line 16
13: my($self, $env) = @_;
14:
15: my $app = $self->condition->($env) ? $self->middleware : $self->app;
16: return $app->($env);
17: }
18:
19: 1;
Show function arguments
in Plack::Component::__ANON__ at /usr/share/perl5/Plack/Component.pm line 50
47: sub to_app {
48: my $self = shift;
49: $self->prepare_app;
50: return sub { $self->call(@_) };
51: }
52:
53:
Show function arguments
in EBox::WebAdmin::Middleware::SubAppAuth::call at /usr/share/perl5/EBox/WebAdmin/Middleware/SubAppAuth.pm line 57
54: }
55: }
56: }
57: return $self->app->($env);
58: }
59:
60: 1;
Show function arguments
in Plack::Component::__ANON__ at /usr/share/perl5/Plack/Component.pm line 50
47: sub to_app {
48: my $self = shift;
49: $self->prepare_app;
50: return sub { $self->call(@_) };
51: }
52:
53:
Show function arguments
in Plack::Middleware::Session::call at /usr/share/perl5/Plack/Middleware/Session.pm line 52
49: }
50:
51: $env->{'psgix.session.options'} = { id => $id };
52:
53: my $res = $self->app->($env);
54: $self->response_cb($res, sub { $self->finalize($env, $_[0]) });
55: }
Show function arguments
in Plack::Component::__ANON__ at /usr/share/perl5/Plack/Component.pm line 50
47: sub to_app {
48: my $self = shift;
49: $self->prepare_app;
50: return sub { $self->call(@_) };
51: }
52:
53:
Show function arguments
in Plack::Middleware::ReverseProxy::call at /usr/share/perl5/Plack/Middleware/ReverseProxy.pm line 68
65: }
66: }
67:
68: $self->app->($env);
69: }
70:
71: 1;
Show function arguments
in Plack::Component::__ANON__ at /usr/share/perl5/Plack/Component.pm line 50
47: sub to_app {
48: my $self = shift;
49: $self->prepare_app;
50: return sub { $self->call(@_) };
51: }
52:
53:
Show function arguments
in (eval) at /usr/share/perl5/EBox/Middleware/UnhandledError.pm line 78
75: my $res;
76: my $caught = 0;
77: try {
78: $res = $self->app->($env);
79: } catch ($e) {
80: $caught = 1;
81: # This $res will only be used if $trace is undef
in EBox::Middleware::UnhandledError::call at /usr/share/perl5/EBox/Middleware/UnhandledError.pm line 77
74:
75: my $res;
76: my $caught = 0;
77: try {
78: $res = $self->app->($env);
79: } catch ($e) {
80: $caught = 1;
Show function arguments
in Plack::Component::__ANON__ at /usr/share/perl5/Plack/Component.pm line 50
47: sub to_app {
48: my $self = shift;
49: $self->prepare_app;
50: return sub { $self->call(@_) };
51: }
52:
53:
Show function arguments
in (eval) at /usr/share/zentyal/psgi/zentyal.psgi line 0
1: # Copyright (C) 2010-2014 Zentyal S.L.
2: #
3: # This program is free software; you can redistribute it and/or modify
at /usr/share/zentyal/psgi/zentyal.psgi line 0
1: # Copyright (C) 2010-2014 Zentyal S.L.
2: #
3: # This program is free software; you can redistribute it and/or modify
