Revision 66fab876
Von Moritz Bunkus vor etwa 8 Jahren hinzugefügt
| SL/Request.pm | ||
|---|---|---|
| 10 | 10 |
use Exporter qw(import); |
| 11 | 11 |
|
| 12 | 12 |
use SL::Common; |
| 13 |
use SL::HelpSystem; |
|
| 13 | 14 |
use SL::MoreCommon qw(uri_encode uri_decode); |
| 14 | 15 |
use SL::Layout::None; |
| 15 | 16 |
use SL::Presenter; |
| ... | ... | |
| 19 | 20 |
use Rose::Object::MakeMethods::Generic |
| 20 | 21 |
( |
| 21 | 22 |
scalar => [ qw(applying_database_upgrades routing_type controller action) ], |
| 22 |
'scalar --get_set_init' => [ qw(cgi layout presenter is_ajax type) ], |
|
| 23 |
'scalar --get_set_init' => [ qw(cgi layout presenter is_ajax type help_system) ],
|
|
| 23 | 24 |
); |
| 24 | 25 |
|
| 25 | 26 |
sub init_cgi {
|
| ... | ... | |
| 34 | 35 |
return SL::Presenter->new; |
| 35 | 36 |
} |
| 36 | 37 |
|
| 38 |
sub init_help_system {
|
|
| 39 |
return SL::HelpSystem->new; |
|
| 40 |
} |
|
| 41 |
|
|
| 37 | 42 |
sub init_is_ajax {
|
| 38 | 43 |
return ($ENV{HTTP_X_REQUESTED_WITH} || '') eq 'XMLHttpRequest' ? 1 : 0;
|
| 39 | 44 |
} |
Auch abrufbar als: Unified diff
Hilfesystem: Hilfe-Link anzeigen; Hilfe-Seiten zu Kontext anzeigen; Hilfe-Start-Seite