diff --git a/init.el b/init.el
index 732c04c..c0b2481 100644
--- a/init.el
+++ b/init.el
@@ -59,24 +59,9 @@
       scroll-conservatively 10000
       scroll-preserve-screen-position 1)
 
-(defun delete-word (arg)
-    "Delete characters forward until encountering the end of a word.
-  With argument, do this that many times."
-    (interactive "p")
-      (delete-region (point) (progn (forward-word arg) (point))))
-
-(defun backward-delete-word (arg)
-    "Delete characters backward until encountering the end of a word.
-  With argument, do this that many times."
-    (interactive "p")
-      (delete-word (- arg)))
-
 (require 'mic-paren) ; loading
 (paren-activate)     ; activating
 
-(global-set-key (kbd "C-'") 'backward-delete-char)
-(global-set-key (kbd "M-'") 'backward-kill-word)
-
 (global-set-key (kbd "C-M-<backspace>") 'backward-kill-sexp)
 (global-set-key (kbd "<backtab>") 'TeX-complete-symbol)
 
@@ -93,24 +78,6 @@
 (load "~/bibsnarf.el" nil t t)
 (require 'reftex)
 
-(fset 'insert-matching-paren
-         (lambda (&optional arg) "Keyboard macro." (interactive "p") (kmacro-exec-ring-item (quote ([92 108 101 102 116 40 92 114 105 103 104 116 41 C-left left] 0 "%d")) arg)))
-(fset 'insert-matching-sqbraces
-         (lambda (&optional arg) "Keyboard macro." (interactive "p") (kmacro-exec-ring-item (quote ([92 108 101 102 116 91 92 114 105 103 104 116 93 C-left left] 0 "%d")) arg)))
-(fset 'insert-matching-braces
-         (lambda (&optional arg) "Keyboard macro." (interactive "p") (kmacro-exec-ring-item (quote ([92 108 101 102 116 92 123 92 114 105 103 104 116 92 125 C-left left] 0 "%d")) arg)))
-(fset 'insert-matching-abs
-         (lambda (&optional arg) "Keyboard macro." (interactive "p") (kmacro-exec-ring-item (quote ([92 108 101 102 116 124 92 114 105 103 104 116 124 C-left left] 0 "%d")) arg)))
-(fset 'insert-matching-bcs
-   (lambda (&optional arg) "Keyboard macro." (interactive "p") (kmacro-exec-ring-item (quote ([123 125 left] 0 "%d")) arg)))
-(fset 'insert-superscript
-   (lambda (&optional arg) "Keyboard macro." (interactive "p") (kmacro-exec-ring-item (quote ([94 123] 0 "%d")) arg)))
-(fset 'insert-subscript
-   (lambda (&optional arg) "Keyboard macro." (interactive "p") (kmacro-exec-ring-item (quote (["_" 123] 0 "%d")) arg)))
-(global-set-key (kbd "C-^") 'insert-superscript)
-(global-set-key (kbd "C-_") 'insert-subscript)
-
-
 ;; KDE stuff
 ;;