From 8ebfb28af6e8ec81acbd7de0f5e19fab4c32a8b6 Mon Sep 17 00:00:00 2001
From: djk <djk>
Date: Thu, 18 Nov 1999 22:46:15 +0000
Subject: [PATCH] removed more 5.004 ambiguities including making the format of
 data dumpered stuff dependant on version

---
 perl/DXCommandmode.pm | 2 +-
 perl/DXUser.pm        | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/perl/DXCommandmode.pm b/perl/DXCommandmode.pm
index 92eaa46c..c516dc48 100644
--- a/perl/DXCommandmode.pm
+++ b/perl/DXCommandmode.pm
@@ -525,7 +525,7 @@ sub find_cmd_name {
 			}
 		}
 		
-		$Cache{$package} = {mtime => $mtime, eval => $eval };
+		$Cache{$package} = {mtime => $mtime, 'eval' => $eval };
 	}
 
 	return $package;
diff --git a/perl/DXUser.pm b/perl/DXUser.pm
index 58cb1afc..9d534ae9 100644
--- a/perl/DXUser.pm
+++ b/perl/DXUser.pm
@@ -192,7 +192,7 @@ sub encode
 	my $dd = new Data::Dumper([$self]);
 	$dd->Indent(0);
 	$dd->Terse(1);
-    $dd->Quotekeys(0);
+    $dd->Quotekeys($] < 5.005 ? 1 : 0);
 	return $dd->Dumpxs;
 }
 
-- 
2.43.0