File indexing completed on 2024-04-21 05:41:56

0001 #!/usr/bin/perl 
0002 
0003 # David Faure <faure@kde.org>
0004 # KKeyDialog -> KShortcutDialog
0005 
0006 use File::Basename;
0007 use lib dirname($0);
0008 use functionUtilkde;
0009 
0010 foreach my $file (@ARGV) {
0011     functionUtilkde::substInFile {
0012     s!kkeydialog\.h!kshortcutsdialog.h!g;
0013     s!KKeyDialog!KShortcutsDialog!g;
0014     s!KKeyChooser!KShortcutsEditor!g;
0015     } $file;
0016 }
0017 functionUtilkde::diffFile( @ARGV );