1#!/usr/bin/env perl 2 3use strict; 4use warnings; 5use xkbTestFunc; 6 7xkbTestFunc::backupXkbSettings(); 8 9xkbTestFunc::dumpXkbSettingsBackup(); 10 11xkbTestFunc::testLevel1( "model", 1 ); 12 13xkbTestFunc::restoreXkbSettings(); 14 15print "Done!\n"; 16