Skip to content

Instantly share code, notes, and snippets.

@jorgenschaefer
Created December 5, 2012 19:50
Show Gist options
  • Select an option

  • Save jorgenschaefer/4218894 to your computer and use it in GitHub Desktop.

Select an option

Save jorgenschaefer/4218894 to your computer and use it in GitHub Desktop.
(defun friedbob/backtab ()
"Kill up to `tab-width' spaces backwards."
(interactive)
(let ((n tab-width))
(while (> n 0)
(when (looking-back "\\s-")
(delete-char -1))
(setq n (1- n)))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment