dani
/
vroom
mirror of https://github.com/dani/vroom.git
1
0
Fork 0
Code Issues Releases Wiki Activity

Get ride of Data::UUID dependency

Browse Source
master
Daniel Berteaud 11 years ago
parent 32210908ce
commit f32a6af965
1 changed files with 1 additions and 2 deletions
Whitespace
Show all changes Ignore whitespace when comparing lines Ignore changes in amount of whitespace Ignore changes in whitespace at EOL
Unified View
Diff Options
Show Stats Download Patch File Download Diff File
  1. 3
      public/vroom.pl

3
public/vroom.pl
Unescape View File

@ -10,7 +10,6 @@ use Mojolicious::Lite;
use Mojolicious::Plugin::Mailer; use Mojolicious::Plugin::Mailer;
use Mojo::JSON; use Mojo::JSON;
use DBI; use DBI;
use Data::GUID qw(guid_string);
use Digest::MD5 qw(md5_hex); use Digest::MD5 qw(md5_hex);
use Crypt::SaltedHash; use Crypt::SaltedHash;
use MIME::Base64; use MIME::Base64;
@ -170,7 +169,7 @@ helper db => sub {
helper login => sub { helper login => sub {
my $self = shift; my $self = shift;
return if $self->session('name'); return if $self->session('name');
my $login = $ENV{'REMOTE_USER'} || lc guid_string(); my $login = $ENV{'REMOTE_USER'} || lc $self->get_random(29);
$self->session( name => $login, $self->session( name => $login,
ip => $self->tx->remote_address ); ip => $self->tx->remote_address );
$self->app->log->info($self->session('name') . " logged in from " . $self->tx->remote_address); $self->app->log->info($self->session('name') . " logged in from " . $self->tx->remote_address);

Write Preview
Loading…
Cancel
Save