221 565 Bytes
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22
#
# Add sitevariables for OML support (that someone forgot).
#
use strict;
use libdb;

sub DoUpdate($$$)
{
    my ($dbhandle, $dbname, $version) = @_;

    DBQueryFatal("INSERT INTO sitevariables VALUES (".
		 "'oml/default_osid',NULL,'',".
		 "'Default OSID to use for OML server',1)")
	if (!TBSiteVarExists("oml/default_osid"));
    DBQueryFatal("INSERT INTO sitevariables VALUES (".
		 "'oml/default_server_startcmd',NULL,'',".
		 "'Default command line to use to start OML server',1)")
	if (!TBSiteVarExists("oml/default_server_startcmd"));

    return 0;
}
1;