Commit 530e492a authored by Mike Hibler's avatar Mike Hibler

Fix a quoting error in one of the DB updates (175).

To get a backslash into the DB (e.g., into table_regex) you have to
use FOUR backslashes in the perl script.
parent 48df4dac
#
# Fix a quoting error in 175. If you want a '\' in the DB, you have to
# use FOUR backslashes here.
#
use strict;
use libdb;
sub DoUpdate($$$)
{
my ($dbhandle, $dbname, $version) = @_;
DBQueryFatal("replace into table_regex values ".
" ('virt_nodes','sharing_mode','text','regex', ".
" '^[-\\\\w]+\$',1,32,NULL)");
return 0;
}
1;
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment