-- | Delete forward whitespace or non-whitespace depending on
-- the character under point.
killWordB :: BufferM ()
killWordB = deleteB unitWord Forward
killWordB :: BufferM ()
killWordB = deleteB unitWord Forward
killWordB = deleteB unitWord Forward