diff --git a/src/mred/wxme/wx_media.cxx b/src/mred/wxme/wx_media.cxx
index cd4ae903e9..08f1e6835a 100644
--- a/src/mred/wxme/wx_media.cxx
+++ b/src/mred/wxme/wx_media.cxx
@@ -623,9 +623,16 @@ void wxMediaEdit::OnDefaultChar(wxKeyEvent *event)
 
   switch(code) {
   case WXK_BACK:
-  case WXK_DELETE:
     Delete();
     return;
+  case WXK_DELETE:
+    if (startpos == endpos) {
+      if (endpos < len) {
+	Delete(endpos, endpos + 1);
+      }
+    } else
+      Delete();
+    return;
   case WXK_RIGHT:
   case WXK_LEFT:
   case WXK_UP: