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