Request.pm 266 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 10 11 12 13 14
has steps => ( is => 'rw' );
has error => ( is => 'rw' );

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

Yadd's avatar
Yadd committed
15
1;