1 2 3 4 5 6 7 8 9 10 11 12 13
#!/usr/bin/env perl use strict; use warnings; use xkbTestFunc; xkbTestFunc::backupXkbSettings(); xkbTestFunc::dumpXkbSettingsBackup(); xkbTestFunc::testLevel2( "group", "option", 4, ":", "", 0, 0, 1 ); xkbTestFunc::restoreXkbSettings();