提交 07bb51b6 编写于 作者: D Dr. Stephen Henson

Update from 0.9.7-stable.

上级 bbab9b61
......@@ -15,12 +15,14 @@
# Apart from this, this script should be able to handle even the most
# pathological cases.
use Cwd;
my $from = shift;
my @files = @ARGV;
my @from_path = split(/[\\\/]/, $from);
my $pwd = `pwd`;
chop($pwd);
my $pwd = getcwd();
chomp($pwd);
my @pwd_path = split(/[\\\/]/, $pwd);
my @to_path = ();
......
Markdown is supported
0% .
You are about to add 0 people to the discussion. Proceed with caution.
先完成此消息的编辑!
想要评论请 注册