diff options
author | Joey Hess <joey@kodama.kitenet.net> | 2008-07-21 21:23:58 -0400 |
---|---|---|
committer | Joey Hess <joey@kodama.kitenet.net> | 2008-07-21 21:23:58 -0400 |
commit | 9d5c9ce258299c4b495dfa11e652ee06df02053a (patch) | |
tree | 653b6d116970c39cb0805cee2719b2a90499156d /IkiWiki/Wrapper.pm | |
parent | 18d24036477223794e8319428cd7ba971129c29c (diff) | |
parent | c2a2f715087a4602876618fdec2fad073308a6d5 (diff) |
Merge branch 'master' into tova
Diffstat (limited to 'IkiWiki/Wrapper.pm')
-rw-r--r-- | IkiWiki/Wrapper.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/IkiWiki/Wrapper.pm b/IkiWiki/Wrapper.pm index 79b9eb3e3..6dc25403e 100644 --- a/IkiWiki/Wrapper.pm +++ b/IkiWiki/Wrapper.pm @@ -4,14 +4,14 @@ package IkiWiki; use warnings; use strict; -use Cwd q{abs_path}; +use File::Spec; use Data::Dumper; use IkiWiki; sub gen_wrapper () { #{{{ - $config{srcdir}=abs_path($config{srcdir}); - $config{destdir}=abs_path($config{destdir}); - my $this=abs_path($0); + $config{srcdir}=File::Spec->rel2abs($config{srcdir}); + $config{destdir}=File::Spec->rel2abs($config{destdir}); + my $this=File::Spec->rel2abs($0); if (! -x $this) { error(sprintf(gettext("%s doesn't seem to be executable"), $this)); } |