26 lines
364 B
Perl
26 lines
364 B
Perl
package CW::Migration::04;
|
|
|
|
use Moo;
|
|
|
|
extends 'CW::Migration';
|
|
|
|
sub id {
|
|
return 4;
|
|
}
|
|
|
|
sub sql {
|
|
return q[CREATE TABLE users (
|
|
id INT UNSIGNED AUTO_INCREMENT PRIMARY KEY,
|
|
name VARCHAR(24),
|
|
password VARCHAR(62),
|
|
admin BOOLEAN DEFAULT false,
|
|
active BOOLEAN DEFAULT false,
|
|
denied BOOLEAN DEFAULT false,
|
|
denied_reason TEXT,
|
|
join_request JSON NOT NULL
|
|
)
|
|
]
|
|
}
|
|
|
|
1;
|