diff options
| author | Chuck Norris (uranus.fritz.box) <paul@buetow.org> | 2014-08-17 14:22:23 +0200 |
|---|---|---|
| committer | Chuck Norris (uranus.fritz.box) <paul@buetow.org> | 2014-08-17 14:22:23 +0200 |
| commit | 8e02050582fcc8f58996c38ef260f2ec930914be (patch) | |
| tree | f1b1469328f4c0e120772e5dc0336d32952f0d48 /Xerl/Setup | |
| parent | 15897cd1907de12e14477f38547f0b5eb6f7effd (diff) | |
add backslash
Diffstat (limited to 'Xerl/Setup')
| -rw-r--r-- | Xerl/Setup/Configure.pm | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/Xerl/Setup/Configure.pm b/Xerl/Setup/Configure.pm index 18c49fe..c179ec0 100644 --- a/Xerl/Setup/Configure.pm +++ b/Xerl/Setup/Configure.pm @@ -36,6 +36,12 @@ sub parse($) { $self->setval( $1, $self->eval($2) ) if $_ =~ $re; } + my $hostroot = $self->get_hostroot(); + $self->set_hostroot("$hostroot/") unless $hostroot !~ m#/$#; + + my $cacheroot = $self->get_cacheroot(); + $self->set_cacheroot("$cacheroot/") unless $cacheroot !~ m#/$#; + return $self; } |