Request.pm 383 Bytes
Newer Older
Yadd's avatar
Yadd committed
1
2
3
4
5
6
7
package Lemonldap::NG::Portal::Main::Request;

use strict;
use Mouse;

extends 'Lemonldap::NG::Common::PSGI::Request';

Yadd's avatar
Yadd committed
8
9
has steps       => ( is => 'rw' );
has datas       => ( is => 'rw' );
Yadd's avatar
Yadd committed
10
has id          => ( is => 'rw' );
Yadd's avatar
Yadd committed
11
has sessionInfo => ( is => 'rw' );
Yadd's avatar
Yadd committed
12
has respCookies => ( is => 'rw' );
Yadd's avatar
Yadd committed
13
14
15
16
17

sub wantJSON {
    return $_[0]->accept =~ m#(?:application|text)/json# ? 1 : 0;
}

Yadd's avatar
Yadd committed
18
1;