diff --git a/lib/Date/Parse.pm b/lib/Date/Parse.pm
index 7985022..fd6cef2 100644
--- a/lib/Date/Parse.pm
+++ b/lib/Date/Parse.pm
@@ -84,7 +84,7 @@ sub {
   # ignore day names
   $dtstr =~ s#([\d\w\s])[\.\,]\s#$1 #sog;
   $dtstr =~ s/(?<!\d),|,(?!\d)/ /g;
-  $dtstr =~ s#($daypat)\s*(den\s)?\b# #o;
+  $dtstr =~ s#($daypat)(?![a-zA-Z])(\s+(den\s)?|\s*)# #o;
   # Time: 12:00 or 12:00:00 with optional am/pm
 
   return unless $dtstr =~ /\S/;
diff --git a/t/lang.t b/t/lang.t
index 5214555..c9e0e5f 100644
--- a/t/lang.t
+++ b/t/lang.t
@@ -6,11 +6,13 @@ use Date::Language;
 my $time = time;
 
 my @lang = qw(
-    English German Italian Bulgarian
-    French Spanish Swedish Norwegian
-    Danish Dutch Romanian Czech
-    Hungarian Finnish Austrian Brazilian
-    Portuguese Turkish
+    Afar Amharic Arabic Austrian Brazilian Bulgarian
+    Chinese Chinese_GB Czech Danish Dutch English
+    Finnish French Gedeo German Greek Hungarian
+    Icelandic Italian Norwegian Occitan Oromo
+    Portuguese Romanian Russian Russian_cp1251
+    Russian_koi8r Sidama Somali Spanish Swedish
+    Tigrinya TigrinyaEritrean TigrinyaEthiopian Turkish
 );
 
 for my $lang (@lang) {