27 lines
435 B
Perl
27 lines
435 B
Perl
package CW::Migration::05;
|
|
|
|
use Moo;
|
|
|
|
extends 'CW::Migration';
|
|
|
|
sub id {
|
|
return 5;
|
|
}
|
|
|
|
sub sql {
|
|
return q[CREATE TABLE posts (
|
|
id INT UNSIGNED AUTO_INCREMENT PRIMARY KEY,
|
|
board_id VARCHAR(3) NOT NULL,
|
|
user_id INT NOT NULL,
|
|
parent_id INT,
|
|
title VARCHAR(24),
|
|
image VARCHAR(44) NOT NULL,
|
|
body TEXT NOT NULL,
|
|
created_at TIMESTAMP NOT NULL DEFAULT CURRENT_TIMESTAMP,
|
|
updated_at TIMESTAMP NOT NULL DEFAULT CURRENT_TIMESTAMP
|
|
)
|
|
]
|
|
}
|
|
|
|
1;
|