diff options
author | Timothy Pearson <kb9vqf@pearsoncomputing.net> | 2013-01-27 01:04:16 -0600 |
---|---|---|
committer | Timothy Pearson <kb9vqf@pearsoncomputing.net> | 2013-01-27 01:04:16 -0600 |
commit | 5159cd2beb2e87806a5b54e9991b7895285c9d3e (patch) | |
tree | 9b70e8be47a390f8f4d56ead812ab0c9dad88709 /tdeio/proxytype.pl | |
parent | c17cb900dcf52b8bd6dc300d4f103392900ec2b4 (diff) | |
download | tdelibs-5159cd2beb2e87806a5b54e9991b7895285c9d3e.tar.gz tdelibs-5159cd2beb2e87806a5b54e9991b7895285c9d3e.zip |
Rename a number of libraries and executables to avoid conflicts with KDE4
Diffstat (limited to 'tdeio/proxytype.pl')
-rwxr-xr-x | tdeio/proxytype.pl | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/tdeio/proxytype.pl b/tdeio/proxytype.pl new file mode 100755 index 000000000..553db53f7 --- /dev/null +++ b/tdeio/proxytype.pl @@ -0,0 +1,11 @@ +#!/usr/bin/perl +# the script is called with interpreter, so don't worry about the path + +while(<>) +{ + $useproxy = 1 if /UseProxy=true/; + $usepac = 1 if /Proxy Config Script=.*\S/; +} +printf ("# DELETE UseProxy\n"); +$proxytype = $useproxy ? ($usepac ? 2 : 1) : 0; +print "ProxyType=$proxytype\n" if $proxytype; |