   (interactive "p")
   (kill-symbol (- arg)))
 
-(global-set-key (kbd "<M-backspace>") 'backward-kill-symbol)
+(global-set-key (kbd "M-backspace") 'backward-kill-symbol)
 
 ; to be consistent with C-M-f as forward-sexp, bind C-M-backspace to backward-kill-sexp
-(global-set-key (kbd "<C-M-backspace>") 'backward-kill-sexp)
+(global-set-key (kbd "C-M-backspace") 'backward-kill-sexp)
 
 
 (defun toggle-case-next-char ()

  (transpose-subr 'forward-symbol arg))

; bind it to the usual transpose-word key combination
(global-set-key (kbd "<M-t>") 'transpose-symbols)


(provide 'editing-customisations)


; toggling on char is more useful than capitalising a whole word since
; it doesn't break camelcase
(global-set-key (kbd "M-c") 'toggle-case-next-char)


(defun transpose-symbols (arg)
