let backward_kill_word v args = let concat = if Cam_commands.same_previous_command () then Some `PREPEND else None in v#kill_word ?concat false