mñe

lib/Dojo/Model/Users.pm

@@ -1,5 +1,6 @@
 package Dojo::Model::Users;
 
+
 use strict;
 use warnings;
 use DBI;
@@ -17,12 +18,12 @@ sub check {
 # |  2 | usuario   |
 # |  3 | pago      |
 # |  4 | master    |
-  my $r= _read($q,$vuelo,$user,$pass)->[0];
+  my $r= _read($q,$user,$pass)->[0];
   return $r->{pid} // 0;
 }
 
 sub _read{
-  my ($q,$d,@bind)=@_;
+  my ($q,@bind)=@_;
   my (@empty,$arr);
   my $dbh = DBI->connect("DBI:mysql:".Dojo::Conf::GRULLADB.":".Dojo::Conf::GRULLADB_H,Dojo::Conf::GRULLADB_UR,Dojo::Conf::GRULLADB_URP);
   return \@empty unless($dbh);