diff options
author | Zefram <zefram@fysh.org> | 2017-12-18 03:08:31 +0000 |
---|---|---|
committer | Zefram <zefram@fysh.org> | 2017-12-18 03:08:31 +0000 |
commit | e9a5b59fedc30cba91617c6b239f9568cf4ce08e (patch) | |
tree | 670975996add6a73c509b9d5d7b28bf1115b8971 /dist | |
parent | 228483d4f7b5356f504d0ad059432594a4f2b153 (diff) | |
download | perl-e9a5b59fedc30cba91617c6b239f9568cf4ce08e.tar.gz |
remove support for running PathTools on EPOC
EPOC hasn't been a supported platform since 5.18. Note that the code
for processing EPOC-style paths remains, and can be run on supported
platforms. [perl #130818]
Diffstat (limited to 'dist')
-rw-r--r-- | dist/PathTools/Cwd.pm | 14 | ||||
-rw-r--r-- | dist/PathTools/lib/File/Spec.pm | 1 |
2 files changed, 0 insertions, 15 deletions
diff --git a/dist/PathTools/Cwd.pm b/dist/PathTools/Cwd.pm index 0f7364e17d..8f1d406c50 100644 --- a/dist/PathTools/Cwd.pm +++ b/dist/PathTools/Cwd.pm @@ -135,15 +135,6 @@ my %METHOD_MAP = realpath => 'fast_abs_path', }, - epoc => - { - cwd => '_epoc_cwd', - getcwd => '_epoc_cwd', - fastgetcwd => '_epoc_cwd', - fastcwd => '_epoc_cwd', - abs_path => 'fast_abs_path', - }, - MacOS => { getcwd => 'cwd', @@ -666,11 +657,6 @@ sub _qnx_abs_path { return $realpath; } -sub _epoc_cwd { - return $ENV{'PWD'} = EPOC::getcwd(); -} - - # Now that all the base-level functions are set up, alias the # user-level functions to the right places diff --git a/dist/PathTools/lib/File/Spec.pm b/dist/PathTools/lib/File/Spec.pm index 187751cca3..b09ed6b1a2 100644 --- a/dist/PathTools/lib/File/Spec.pm +++ b/dist/PathTools/lib/File/Spec.pm @@ -9,7 +9,6 @@ my %module = (MacOS => 'Mac', MSWin32 => 'Win32', os2 => 'OS2', VMS => 'VMS', - epoc => 'Epoc', NetWare => 'Win32', # Yes, File::Spec::Win32 works on NetWare. symbian => 'Win32', # Yes, File::Spec::Win32 works on symbian. dos => 'OS2', # Yes, File::Spec::OS2 works on DJGPP. |