diff options
| author | Andreas Brachold <vdr07@deltab.de> | 2008-10-26 17:22:02 +0000 |
|---|---|---|
| committer | Andreas Brachold <vdr07@deltab.de> | 2008-10-26 17:22:02 +0000 |
| commit | 9eced4dff64e35a0135ce98609ad8f3f1c9c96a9 (patch) | |
| tree | 9c3d12ae93b02d1e26a12d666f6aba66ef6569c5 /lib/XXV/OUTPUT | |
| parent | 0d66c4b5d972e6e439bec0a3028c8de70e137db8 (diff) | |
| download | xxv-9eced4dff64e35a0135ce98609ad8f3f1c9c96a9.tar.gz xxv-9eced4dff64e35a0135ce98609ad8f3f1c9c96a9.tar.bz2 | |
* Verbose messages if parse of templates failed (HTML/MAIL/GRAB)
Diffstat (limited to 'lib/XXV/OUTPUT')
| -rw-r--r-- | lib/XXV/OUTPUT/Html.pm | 10 | ||||
| -rw-r--r-- | lib/XXV/OUTPUT/NEWS/MAIL.pm | 4 |
2 files changed, 10 insertions, 4 deletions
diff --git a/lib/XXV/OUTPUT/Html.pm b/lib/XXV/OUTPUT/Html.pm index 9b2ba5d..ae93f51 100644 --- a/lib/XXV/OUTPUT/Html.pm +++ b/lib/XXV/OUTPUT/Html.pm @@ -311,8 +311,14 @@ sub parseTemplateFile { }, }; - $self->{tt}->process($widget, $vars, \$output) - or return error($self->{tt}->error()); + $self->{tt}->process($widget, $vars, \$output) || do { + my $msg = $self->{tt}->error(); + error(sprintf("Can't parse html widget %s : %s", $widget, $msg )); + $msg =~ s/\n/<br \/>/g; + $output = $self->{cgi}->h1(sprintf(gettext("Can't proper parse html widget '%s.tmpl'"), ($call eq 'nothing') ? $name : $call)) + . $self->{cgi}->h2(gettext("Your skin may be outdated, please check project home page for updates!")) + . $self->{cgi}->p($msg); + }; return $output; } diff --git a/lib/XXV/OUTPUT/NEWS/MAIL.pm b/lib/XXV/OUTPUT/NEWS/MAIL.pm index 7b5be0b..f34eb65 100644 --- a/lib/XXV/OUTPUT/NEWS/MAIL.pm +++ b/lib/XXV/OUTPUT/NEWS/MAIL.pm @@ -268,7 +268,7 @@ sub parseHeader { my $template = $self->{TEMPLATES}->{'header'}; $self->{tt}->process($template, $vars, \$output) - or return error($self->{tt}->error()); + or return error(sprintf("Can't parse mail template %s : %s", $template, $self->{tt}->error())); return $output; } @@ -288,7 +288,7 @@ sub parseFooter { my $template = $self->{TEMPLATES}->{'footer'}; $self->{tt}->process($template, $vars, \$output) - or return error($self->{tt}->error()); + or return error(sprintf("Can't parse mail template %s : %s", $template, $self->{tt}->error())); return $output; } |