| 160 |
- |
1 |
#!/usr/bin/perl
|
|
|
2 |
|
|
|
3 |
use strict;
|
|
|
4 |
use cPanelUserConfig;
|
|
|
5 |
use RollerCon;
|
|
|
6 |
use DBI;
|
|
|
7 |
use WebDB;
|
|
|
8 |
|
|
|
9 |
my $dbh = WebDB::connect;
|
|
|
10 |
|
|
|
11 |
$dbh->do ("update setting set value = ? where setting.key = ?", undef, 2, "MAX_SHIFT_SIGNUP_PER_DAY_OFF");
|
|
|
12 |
#$dbh->do ("update setting set value = ? where setting.key = ?", undef, 1, "MAX_FULL_LENGTH_SIGNUP_OFF");
|
|
|
13 |
$dbh->do ("update setting set value = ? where setting.key = ?", undef, 2, "MAX_SHIFT_SIGNUP_PER_DAY_ANN");
|
|
|
14 |
#$dbh->do ("update setting set value = ? where setting.key = ?", undef, 1, "MAX_FULL_LENGTH_SIGNUP_ANN");
|