diff options
| author | Joey Hess <joey@kodama.kitenet.net> | 2008-07-21 18:26:14 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kodama.kitenet.net> | 2008-07-21 18:26:14 -0400 |
| commit | e630e7507ea253680750e670d7d213bc5ca3e57a (patch) | |
| tree | 0fa0e63c800a7826f26f78d39de907d61138d99c /IkiWiki/Wrapper.pm | |
| parent | fda61c9349f6420f331c8c424177f2b1f3c04100 (diff) | |
| download | ikiwiki-e630e7507ea253680750e670d7d213bc5ca3e57a.tar ikiwiki-e630e7507ea253680750e670d7d213bc5ca3e57a.tar.gz | |
Avoid troublesome abs_path calls in wrapper setup
As documented in the forum post.
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)); } |