ossp-pkg/shiela/shiela.pl 1.16 -> 1.17
--- shiela.pl 2002/08/19 19:10:38 1.16
+++ shiela.pl 2002/12/21 09:20:27 1.17
@@ -25,7 +25,7 @@
## shiela: Shiela control program (syntax: Perl)
##
-my $version = '0.9.2 (19-Aug-2002)';
+my $version = '0.9.3 (21-Dec-2002)';
require 5.005;
@@ -34,6 +34,7 @@
use IO::Handle; # shipped with Perl since 5.003
use IPC::Open2; # shipped with Perl since 5.003
use Data::Dumper; # shipped with Perl since 5.005
+use Cwd; # shipped with Perl since 5.003
# DEBUGGING
$Data::Dumper::Purity = 1;
@@ -983,8 +984,7 @@
# strip absolute prefix
$cvsdir =~ s|^$RT->{cvsroot}/?||;
- my $cvsdirphysical = `cd $RT->{cvsroot} && pwd`;
- $cvsdirphysical =~ s|\n$||s;
+ my $cvsdirphysical = Cwd::realpath($RT->{cvsroot});
$cvsdir =~ s|^$cvsdirphysical/?||;
# provide access control
|
|
