File indexing completed on 2025-03-23 08:20:37
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 );