summaryrefslogtreecommitdiffstats
path: root/src/core/tellico-1-3-update.pl
diff options
context:
space:
mode:
authortpearson <tpearson@283d02a7-25f6-0310-bc7c-ecb5cbfe19da>2010-03-01 19:17:32 +0000
committertpearson <tpearson@283d02a7-25f6-0310-bc7c-ecb5cbfe19da>2010-03-01 19:17:32 +0000
commite38d2351b83fa65c66ccde443777647ef5cb6cff (patch)
tree1897fc20e9f73a81c520a5b9f76f8ed042124883 /src/core/tellico-1-3-update.pl
downloadtellico-e38d2351b83fa65c66ccde443777647ef5cb6cff.tar.gz
tellico-e38d2351b83fa65c66ccde443777647ef5cb6cff.zip
Added KDE3 version of Tellico
git-svn-id: svn://anonsvn.kde.org/home/kde/branches/trinity/applications/tellico@1097620 283d02a7-25f6-0310-bc7c-ecb5cbfe19da
Diffstat (limited to 'src/core/tellico-1-3-update.pl')
-rw-r--r--src/core/tellico-1-3-update.pl24
1 files changed, 24 insertions, 0 deletions
diff --git a/src/core/tellico-1-3-update.pl b/src/core/tellico-1-3-update.pl
new file mode 100644
index 0000000..9e5ad3b
--- /dev/null
+++ b/src/core/tellico-1-3-update.pl
@@ -0,0 +1,24 @@
+#!/usr/bin/env perl
+
+my $input;
+my $oldvalue;
+
+while( $input = <STDIN> )
+{
+ chop $input;
+
+ if( $input =~ /^Write Images In File\=(.*)/)
+ {
+ $oldvalue=$1;
+ if( $oldvalue eq "true" )
+ {
+ print "Image Location=ImagesInFile\n";
+ }
+ else
+ {
+ print "Image Location=ImageAppDir\n";
+ }
+ }
+}
+
+print "# DELETE [General Options]Write Images In File\n";