diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2000-07-26 16:05:30 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-07-26 16:05:30 +0000 |
commit | eae9c1515e21a0ce7cdb8dfed3c4386402d77e42 (patch) | |
tree | 99b7d39b797f98c0eb08c80930fe0de1c59030bf /pp_ctl.c | |
parent | 1ec94568ca12249aa865999d7dec5eb1fa3123c7 (diff) | |
download | perl-eae9c1515e21a0ce7cdb8dfed3c4386402d77e42.tar.gz |
MacOS nits from Matthias Neeracher.
p4raw-id: //depot/perl@6442
Diffstat (limited to 'pp_ctl.c')
-rw-r--r-- | pp_ctl.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -3158,8 +3158,8 @@ trylocal: { else { char *dir = SvPVx(dirsv, n_a); #ifdef MACOS_TRADITIONAL - /* We have ensured in incpush that library ends with ':' */ - Perl_sv_setpvf(aTHX_ namesv, "%s%s", dir, name+(name[0] == ':')); + char buf[256]; + Perl_sv_setpvf(aTHX_ namesv, "%s%s", MacPerl_CanonDir(dir, buf), name+(name[0] == ':')); #else #ifdef VMS char *unixdir; |