Index: bindings.doc
==================================================================
--- bindings.doc
+++ bindings.doc
@@ -71,10 +71,13 @@
 
 '^+'
   Toggle insertion mode. Insertion mode is automatically reset when
   restarting a level or when accessing a different level.
 
+'^D'
+  Delete all moves forward.
+
 '^I'
   Toggle the inventory/move-list display.
 
 '^L'
   List of levels.

Index: default.heromeshrc
==================================================================
--- default.heromeshrc
+++ default.heromeshrc
@@ -138,10 +138,11 @@
 ?.gameKey.alt.R: select 'go',id from levels where not solved order by random() limit 1;
 ?.gameKey.alt.X: ^x
 ?.gameKey.alt.leftbracket: select 'rs',-5;
 ?.gameKey.alt.rightbracket: select 'rs',+5;
 ?.gameKey.delete: ^-
+?.gameKey.ctrl.delete: ^D
 ?.gameKey.insert: ^+
 ?.gameKey.alt.kp_minus: select 'go',-ord from levels where ord<$level and not solved order by ord desc limit 1;
 ?.gameKey.alt.kp_plus: select 'go',-ord from levels where ord>$level and not solved order by ord asc limit 1;
 
 ! Editor key bindings

Index: game.c
==================================================================
--- game.c
+++ game.c
@@ -1298,10 +1298,20 @@
     case '^+': // Insert moves
       if(solution_replay) return 0;
       inputs_count=0;
       inserting^=1;
       return 0;
+    case '^D': // Delete all moves forward
+      inputs_count=0;
+      if(solution_replay) {
+        screen_message("You cannot delete moves during the solution replay");
+        return -3;
+      }
+      if(replay_pos==replay_count) return 0;
+      replay_count=replay_pos;
+      if(replay_mark>replay_pos) replay_mark=replay_pos;
+      return 0;
     case '^E': // Edit
       return main_options['r']?1:-2;
     case '^I': // Toggle inventory display
       side_mode^=1;
       return prev;

Index: game.doc
==================================================================
--- game.doc
+++ game.doc
@@ -174,10 +174,11 @@
   ALT+R       Select a unsolved level at random
   ALT+[       Increase slow replay speed
   ALT+]       Decrease slow replay speed
   INS         Toggle insertion mode
   DEL         Delete a move
+  CTRL+DEL    Delete all moves forward
 
 Mouse (in grid):
 
   MIDDLE       Describe topmost object
   RIGHT        Inspect objects (main world)