Last change
on this file since 52 was
42,
checked in by peter, 11 years ago
|
put the BookmarkApp::Dispatch class into its own file
|
-
Property svn:executable set to
*
|
File size:
450 bytes
|
Rev | Line | |
---|
[2] | 1 | #!/usr/bin/perl -w |
---|
| 2 | use strict; |
---|
| 3 | |
---|
[42] | 4 | use BookmarkApp::Dispatch; |
---|
[23] | 5 | |
---|
[41] | 6 | # check for whether we are behind a reverse proxy, and adjust the SERVER_NAME accordingly |
---|
| 7 | # TODO: use something like Plack::Middlware::ReverseProxy instead |
---|
| 8 | $ENV{SERVER_NAME} = $ENV{HTTP_X_FORWARDED_HOST} if $ENV{HTTP_X_FORWARDED_HOST}; |
---|
| 9 | |
---|
| 10 | BookmarkApp::Dispatch->dispatch( |
---|
| 11 | args_to_new => { |
---|
| 12 | #TODO: dbname should be in a config file |
---|
| 13 | PARAMS => { dbname => 'fk.db' }, |
---|
| 14 | } |
---|
| 15 | ); |
---|
Note: See
TracBrowser
for help on using the repository browser.