oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

added newsletter

Browse source
This commit is contained in:
Joeri de Bruin 2026-04-21 11:25:55 +02:00
parent 5fc1c6bdae
commit 63cb6c3723
8 changed files with 729 additions and 1101 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lib/WebGUI/Crud.pm
View file

@ -233,7 +233,7 @@ sub crud_createTable {
my $tableName = $class->crud_getTableName($session);
$class->crud_dropTable($session);
$db->write('create table '.$dbh->quote_identifier($tableName).' (
'.$dbh->quote_identifier($class->crud_getTableKey($session)).' CHAR(22) binary not null primary key,
'.$dbh->quote_identifier($class->crud_getTableKey($session)).' CHAR(22) binary not null default "" primary key,
sequenceNumber int not null default 1,
dateCreated datetime,
lastUpdated datetime
@ -468,7 +468,7 @@ sub crud_updateTable {
my $notNullClause = ($isKey || $defaultValue ne "") ? "not null" : "";
my $defaultClause = '';
if ($fieldType !~ /(?:text|blob)$/i) {
$defaultClause = "default ".$dbh->quote($defaultValue) if ($defaultValue ne "");
$defaultClause = "default ".$dbh->quote($defaultValue);
}
if (exists $tableFields{$property}) {
my $changed = 0;