summaryrefslogtreecommitdiffstats
path: root/MDK/Common/System.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2002-09-06 13:52:34 +0000
committerPascal Rigaux <pixel@mandriva.com>2002-09-06 13:52:34 +0000
commite93410db0c1326ac5895ba2105904698c7ee163e (patch)
treedd52101cd9b155a01d1e86b226d060a59f5c8c0a /MDK/Common/System.pm
parent9ed9ed46df24d5852327064d04da685eccfa4126 (diff)
downloadperl-MDK-Common-e93410db0c1326ac5895ba2105904698c7ee163e.tar
perl-MDK-Common-e93410db0c1326ac5895ba2105904698c7ee163e.tar.gz
perl-MDK-Common-e93410db0c1326ac5895ba2105904698c7ee163e.tar.bz2
perl-MDK-Common-e93410db0c1326ac5895ba2105904698c7ee163e.tar.xz
perl-MDK-Common-e93410db0c1326ac5895ba2105904698c7ee163e.zip
MDK::Common::System::update_gnomekderc: fix adding lines to the last section when it doesn't end with a cr
Diffstat (limited to 'MDK/Common/System.pm')
-rw-r--r--MDK/Common/System.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/MDK/Common/System.pm b/MDK/Common/System.pm
index dcf24a7..c41485b 100644
--- a/MDK/Common/System.pm
+++ b/MDK/Common/System.pm
@@ -345,6 +345,7 @@ sub update_gnomekderc {
foreach (MDK::Common::File::cat_($file), "[NOCATEGORY]\n") {
if (my $i = /^\s*\[$category\]/i ... /^\[/) {
if ($i =~ /E/) { #- for last line of category
+ chomp $s; $s .= "\n";
$s .= "$_->[0]=$_->[1]\n" foreach values %subst;
%subst = ();
} elsif (/^\s*(\w*?)=/) {