File indexing completed on 2025-02-02 05:31:52
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 );