Katana_mirror/kde-extraapps
1
0
Fork 0
mirror of https://bitbucket.org/smil3y/kde-extraapps.git synced 2025-02-24 10:52:53 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

amarok: remove kconf_update files

Browse source
This commit is contained in:
Ivailo Monev 2015-01-31 00:44:41 +00:00
parent 832cd4a53d
commit cd66c5d7bc
4 changed files with 0 additions and 48 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
amarok/src/CMakeLists.txt
View file

@ -34,7 +34,6 @@ add_subdirectory( services )
add_subdirectory( scripting/scripts )
add_subdirectory( aboutdialog/libattica-ocsclient )
add_subdirectory( transcoding )
add_subdirectory( kconf_update )
add_subdirectory( importers )
#####################################################################

5
amarok/src/kconf_update/CMakeLists.txt
View file

@ -1,5 +0,0 @@
install( FILES amarok.upd DESTINATION ${KCONF_UPDATE_INSTALL_DIR} )
install( PROGRAMS
amarok-2.4.1-tokens_syntax_update.pl
DESTINATION ${KCONF_UPDATE_INSTALL_DIR}
)

38
amarok/src/kconf_update/amarok-2.4.1-tokens_syntax_update.pl
View file

@ -1,38 +0,0 @@
#!/usr/bin/perl -w
#
# This script updates all format strings in amarokc config file
# according to new syntax, replaces %token with %token% if It's needed.
use strict;
sub isUpdated($) {
return ($_[0] =~ m/%[a-zA-Z0-9]+%/);
}
sub syntaxUpdate($) {
my $value = $_[0];
$value =~ s/(%[a-zA-Z0-9]+)/$1%/g;
return $value;
}
#replaceKey("section", "key", "new value");
sub replaceKey($$$) {
my ($section, $key, $value) = @_;
print("# DELETE $section$key\n");
print("$section\n$key=$value\n");
}
my $section = "";
while (<>) {
chomp();
if (/^\[/) {
$section = $_;
}
elsif (($section eq "[OrganizeCollectionDialog]" and (/^Custom Scheme/ or /^Format Presets/)) or
($section eq "[FilenameLayoutDialog]" and /^Custom Scheme/ )) {
my ($key,$value) = split(/=/);
next unless length($value);
replaceKey($section, $key, syntaxUpdate($value)) unless isUpdated($value);
}
}

4
amarok/src/kconf_update/amarok.upd
View file

@ -1,4 +0,0 @@
Id=1
File=amarokrc
Options=overwrite
Script=amarok-2.4.1-tokens_syntax_update.pl,perl