projects
/
kivitendo-erp.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
HTML-Version der Dokumentation in UTF-8 encodieren
[kivitendo-erp.git]
/
SL
/
Controller
/
Base.pm
diff --git
a/SL/Controller/Base.pm
b/SL/Controller/Base.pm
index
198f16e
..
285bfce
100644
(file)
--- a/
SL/Controller/Base.pm
+++ b/
SL/Controller/Base.pm
@@
-30,7
+30,12
@@
sub redirect_to {
my $self = shift;
my $url = $self->url_for(@_);
my $self = shift;
my $url = $self->url_for(@_);
- print $::cgi->redirect($url);
+ if ($self->delay_flash_on_redirect) {
+ require SL::Helper::Flash;
+ SL::Helper::Flash::delay_flash();
+ }
+
+ print $::request->{cgi}->redirect($url);
}
sub render {
}
sub render {
@@
-152,6
+157,14
@@
sub _run_hooks {
}
}
}
}
+#
+# behaviour. override these
+#
+
+sub delay_flash_on_redirect {
+ 0;
+}
+
#
# private functions -- for use in Base only
#
#
# private functions -- for use in Base only
#
@@
-482,6
+495,12
@@
action.
The hook's return values are discarded.
The hook's return values are discarded.
+=item delay_flash_on_redirect
+
+May be overridden by a controller. If this method returns true, redirect_to
+will delay all flash messages for the current request. Defaults to false for
+compatibility reasons.
+
=back
=head2 PRIVATE FUNCTIONS
=back
=head2 PRIVATE FUNCTIONS