summaryrefslogtreecommitdiffstats
path: root/korn/tdeconf_update/korn-3-5-metadata-update.pl
diff options
context:
space:
mode:
authorTimothy Pearson <kb9vqf@pearsoncomputing.net>2013-01-27 01:05:15 -0600
committerTimothy Pearson <kb9vqf@pearsoncomputing.net>2013-01-27 01:05:15 -0600
commit64df902cf71a8ee258fb85f6be26248f399aa01f (patch)
treedba58f705042c22cea26b678d5b0e4e9a34bf202 /korn/tdeconf_update/korn-3-5-metadata-update.pl
parentde53c98cab07e9c4b0f5e25dab82830fb6fc67ec (diff)
downloadtdepim-64df902cf71a8ee258fb85f6be26248f399aa01f.tar.gz
tdepim-64df902cf71a8ee258fb85f6be26248f399aa01f.zip
Rename a number of libraries and executables to avoid conflicts with KDE4
Diffstat (limited to 'korn/tdeconf_update/korn-3-5-metadata-update.pl')
-rw-r--r--korn/tdeconf_update/korn-3-5-metadata-update.pl43
1 files changed, 43 insertions, 0 deletions
diff --git a/korn/tdeconf_update/korn-3-5-metadata-update.pl b/korn/tdeconf_update/korn-3-5-metadata-update.pl
new file mode 100644
index 000000000..95723c4ee
--- /dev/null
+++ b/korn/tdeconf_update/korn-3-5-metadata-update.pl
@@ -0,0 +1,43 @@
+my $input;
+my $group;
+my $auth = "";
+my $tls = "";
+my $metadata = "";
+
+while( $input = <STDIN> )
+{
+ chop $input;
+ if( $input =~ /^\[.*\]$/ )
+ {
+ if( $metadata )
+ {
+ print "[$group]\n";
+ print "metadata=$metadata\n";
+ $metadata="";
+ }
+
+ if( $input =~ /^\[(korn-(\d+)-\d+)\]$/ )
+ {
+ $group = $1;
+ }
+ else
+ {
+ $group = "";
+ }
+ $auth="";
+ $tls="";
+ }
+
+ if( $input =~ /^auth\=(.*)/ )
+ {
+ $metadata=$tls ? "auth=$1,tls=$tls" : "auth=$1";
+ $auth=$1;
+ print "# DELETE [$group]auth\n";
+ }
+ elsif( $input =~ /^tls\=(.*)/ )
+ {
+ $metadata=$auth ? "auth=$auth,tls=$1" : "tls=$1";
+ $tls=$1;
+ print "# DELETE [$tls]tls\n";
+ }
+}