Fix a couple of encoding issues

This commit is contained in:
Eelco Dolstra 2016-10-24 16:08:19 +02:00
parent 3586bf28e4
commit f7ff7f741b
3 changed files with 4 additions and 1 deletions

View file

@ -1,5 +1,6 @@
package Hydra::Controller::Job;
use utf8;
use strict;
use warnings;
use base 'Hydra::Base::Controller::ListBuilds';

View file

@ -1,5 +1,6 @@
package Hydra::Controller::JobsetEval;
use utf8;
use strict;
use warnings;
use base 'Hydra::Base::Controller::NixChannel';

View file

@ -1,5 +1,6 @@
package Hydra::Controller::Root;
use utf8;
use strict;
use warnings;
use base 'Hydra::Base::Controller::ListBuilds';
@ -65,7 +66,7 @@ sub begin :Private {
my $referer = $c->req->header('Origin');
$referer //= $c->req->header('Referer');
my $base = $c->req->base;
error($c, "POST requests should come from $base")
error($c, "POST requests should come from $base.")
unless defined $referer && substr($referer, 0, length $base) eq $base;
}