File indexing completed on 2024-04-21 09:32:38

0001 #!/usr/bin/perl 
0002 
0003 # Laurent Montel <montel@kde.org>
0004 # This function convert qt_xdisplay and qt_rootwin to qt4 function
0005 # it added include too
0006 
0007 use File::Basename;
0008 use lib dirname( $0 );
0009 use functionUtilkde;
0010 use strict;
0011 
0012 foreach my $file (@ARGV) {
0013     functionUtilkde::substInFile {
0014     s!qt_xdisplay\s*\(\s*\)!QX11Info::display()!;
0015     s!qt_xrootwin\s*\(\s*\)!QX11Info::appRootWindow()!;
0016     } $file;
0017     functionUtilkde::addIncludeInFile( $file, "QX11Info");
0018 }
0019 functionUtilkde::diffFile( @ARGV );