   (interactive "*p")
   (transpose-subr 'forward-symbol arg))
 
-; bind it to the usual transpose-word key combination
+;; bind it to the usual transpose-word key combination
 (global-set-key (kbd "M-t") 'transpose-symbols)
 
 (defun increment-number-decimal (&optional arg)


(global-set-key (kbd "C-<backspace>") 'backward-kill-symbol)

; to be consistent with C-M-f as forward-sexp, bind C-M-backspace to backward-kill-sexp
; and C-M-d to forward-kill-sexp
(global-set-key (kbd "C-M-<backspace>") 'backward-kill-sexp)
(global-set-key (kbd "C-M-d") 'kill-sexp)


;;;; Editing customisations -- general text munging when typing.

;; redraw *before* handling input events to improve syntax highlighting responsiveness
;; discussed at http://www.masteringemacs.org/articles/2011/10/02/improving-performance-emacs-display-engine/
(setq redisplay-dont-pause t)

; Automatically indent the new line when we hit enter
(define-key global-map (kbd "RET") 'newline-and-indent)

;; zap-to-char but don't delete the character itself
(defun zap-up-to-char (arg char)
  "Kill up to, but not including ARGth occurrence of CHAR.
Case is ignored if `case-fold-search' is non-nil in the current buffer.
