588 371 Bytes
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18
use strict;
use libdb;

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

    if (!DBSlotExists("nonlocal_user_accounts", "privs")) {
        DBQueryFatal("alter table nonlocal_user_accounts add " .
		     " `privs` enum('user','local_root') default 'local_root' ".
		     "    after updated");
    }
    return 0;
}

# Local Variables:
# mode:perl
# End: