summaryrefslogtreecommitdiff
path: root/dist
diff options
context:
space:
mode:
authorZefram <zefram@fysh.org>2017-12-18 03:08:31 +0000
committerZefram <zefram@fysh.org>2017-12-18 03:08:31 +0000
commite9a5b59fedc30cba91617c6b239f9568cf4ce08e (patch)
tree670975996add6a73c509b9d5d7b28bf1115b8971 /dist
parent228483d4f7b5356f504d0ad059432594a4f2b153 (diff)
downloadperl-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.pm14
-rw-r--r--dist/PathTools/lib/File/Spec.pm1
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.