Editor handles delete-to-end-of-word, plus alt-d and alt-delete bindings for it

src/atom/composite-selection.coffee

@@ -58,6 +58,9 @@ class CompositeSeleciton
   delete: ->
     @modifySelectedText (selection) -> selection.delete()
 
+  deleteToEndOfWord: ->
+    @modifySelectedText (selection) -> selection.deleteToEndOfWord()
+
   selectToScreenPosition: (position) ->
     @getLastSelection().selectToScreenPosition(position)
 

src/atom/editor.coffee

@@ -93,6 +93,7 @@ class Editor extends View
     @on 'backspace', => @backspace()
     @on 'backspace-to-beginning-of-word', => @backspaceToBeginningOfWord()
     @on 'delete', => @delete()
+    @on 'delete-to-end-of-word', => @deleteToEndOfWord()
     @on 'cut', => @cutSelection()
     @on 'copy', => @copySelection()
     @on 'paste', => @paste()
@@ -407,6 +408,7 @@ class Editor extends View
   backspace: -> @compositeSelection.backspace()
   backspaceToBeginningOfWord: -> @compositeSelection.backspaceToBeginningOfWord()
   delete: -> @compositeSelection.delete()
+  deleteToEndOfWord: -> @compositeSelection.deleteToEndOfWord()
 
   setText: (text) -> @buffer.setText(text)
   getText: -> @buffer.getText()

src/atom/keybindings/apple.coffee

@@ -12,3 +12,4 @@ window.keymap.bindKeys '.editor'
   'alt-shift-left': 'select-to-beginning-of-word'
   'alt-shift-right': 'select-to-end-of-word'
   'alt-backspace': 'backspace-to-beginning-of-word'
+  'alt-delete': 'delete-to-end-of-word'

src/atom/keybindings/emacs.coffee

@@ -10,3 +10,4 @@ window.keymap.bindKeys '.editor',
   'ctrl-h': 'backspace'
   'ctrl-d': 'delete'
   'alt-h': 'backspace-to-beginning-of-word'
+  'alt-d': 'delete-to-end-of-word'

src/atom/selection.coffee

@@ -137,6 +137,10 @@ class Selection extends View
     @selectRight() if @isEmpty()
     @deleteSelectedText()
 
+  deleteToEndOfWord: ->
+    @selectToEndOfWord() if @isEmpty()
+    @deleteSelectedText()
+
   deleteSelectedText: ->
     range = @getBufferRange()
     @editor.buffer.delete(range) unless range.isEmpty()