[SCM] pkg-kde repository scripts branch, master, updated. 6e2c0167acebcbea15ad339db275b0a114b24c4f

[Modestas Vainius]

The following commit has been merged in the master branch:
commit 6e2c0167acebcbea15ad339db275b0a114b24c4f
Author: Modestas Vainius <modestas at vainius.eu>
Date:   Sat May 8 22:20:16 2010 +0300

    Construct proper pool paths to lib* source packages.
---
 reprepro-html-index |    5 +++--
 1 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/reprepro-html-index b/reprepro-html-index
index 45cf1bd..36e971f 100755
--- a/reprepro-html-index
+++ b/reprepro-html-index
@@ -138,8 +138,9 @@ sub get_source {
 sub get_path {
 	my $self=shift;
 	if ($self->is_source()) {
-		return File::Spec->catdir('pool', $self->get_comp(),
-			 substr($self->get_name(), 0, 1), $self->get_name()) . '/';
+		my $name = $self->get_name();
+		my $d = substr($name, 0, ($name =~ /^lib/) ? 4 : 1);
+		return File::Spec->catdir('pool', $self->get_comp(), $d, $name . '/');
 	} else {
 		return $self->{path};
 	}

-- 
pkg-kde repository scripts