diff options
author | Thierry Vignaud <tvignaud@mandriva.org> | 2004-02-17 14:06:25 +0000 |
---|---|---|
committer | Thierry Vignaud <tvignaud@mandriva.org> | 2004-02-17 14:06:25 +0000 |
commit | 5d5e12a52a6a640a00d1b44d1fbca3e52b5a1832 (patch) | |
tree | f046d58d33fdcb1fa3df99daa019e06e78549582 | |
parent | 49b80982dbefc80a26c6851f6c95000e526182ae (diff) | |
download | control-center-5d5e12a52a6a640a00d1b44d1fbca3e52b5a1832.tar control-center-5d5e12a52a6a640a00d1b44d1fbca3e52b5a1832.tar.gz control-center-5d5e12a52a6a640a00d1b44d1fbca3e52b5a1832.tar.bz2 control-center-5d5e12a52a6a640a00d1b44d1fbca3e52b5a1832.tar.xz control-center-5d5e12a52a6a640a00d1b44d1fbca3e52b5a1832.zip |
fix CREDITS parsing (do not ignore what's left after second comma)
-rwxr-xr-x | control-center | 2 | ||||
-rwxr-xr-x | credits2po | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/control-center b/control-center index f65c69ef..bbc738ac 100755 --- a/control-center +++ b/control-center @@ -983,7 +983,7 @@ sub about_mdk_cc() { foreach my $line (grep { $_ ne "\n" } cat_(top(glob("/usr/share/doc/mandrake-release-*/CREDITS")))) { if ($line =~ /^\s*\* (.*)$/) { - my ($contributor, $descr) = split(', ', $1); + my ($contributor, $descr) = split(', ', $1, 2); chomp($descr); $descr =~ s/(["@$])/\\$1/g; $credits_model->append_set(undef, map_index { $::i => $_ } map { join("\n", warp_text(translate(common::sprintf_fixutf8($_)), 30)) } $contributor, $descr); @@ -17,7 +17,7 @@ use common; ), (map { if (/^\s*\* (.*)$/) { - my ($contributor, $descr) = split(', ', $1); + my ($contributor, $descr) = split(', ', $1, 2); #if (/^\s*\* (.*), (.*)/) { chomp($descr); $descr =~ s/(["@$])/\\$1/g; |