--- ./lib/OSCAR/Distro.pm.orig	2005-01-25 14:00:26.000000000 -0800
+++ ./lib/OSCAR/Distro.pm	2005-01-28 09:39:02.000000000 -0800
@@ -70,7 +70,7 @@
         }
     }
     # special treatment for RHEL and clones
-    if ($name eq "redhat" && $version =~ m/^3(WS|AS|WS)/) {
+    if ($name eq "redhat" && $version =~ m/^3(ES|AS|WS)/) {
         $version = "3as";
     }
     return (lc $name, lc $version);
@@ -103,7 +103,7 @@
         last;
     }
     # special treatment for RHEL and clones
-    if ($name eq "redhat" && $version =~ m/^3(WS|AS|WS)/) {
+    if ($name eq "redhat" && $version =~ m/^3(ES|AS|WS)/) {
         $version = "3as";
     }
     return (lc $name, lc $version);