From 503e99197f45d7142d138bc878f36868d580efa8 Mon Sep 17 00:00:00 2001
From: Tom Willemsen
Date: Sat, 11 Jun 2011 19:51:08 +0200
Subject: EMACS: init file is once again one big file

---
 emacs.d/00-functions.el | 40 ----------------------------------------
 1 file changed, 40 deletions(-)
 delete mode 100644 emacs.d/00-functions.el

(limited to 'emacs.d/00-functions.el')

diff --git a/emacs.d/00-functions.el b/emacs.d/00-functions.el
deleted file mode 100644
index 20d75ff..0000000
--- a/emacs.d/00-functions.el
+++ /dev/null
@@ -1,40 +0,0 @@
-(defun what-face (pos)
-  "Find out which face the current position uses"
-  (interactive "d")
-  (let ((face (or (get-char-property (point) 'read-face-name)
-                  (get-char-property (point) 'face))))
-    (if face
-        (message "Face: %s" face)
-      (message "No face at %d" pos))))
-
-(defun my-comp-finish-function (buf str)
-  "Don't show compilation window if everything went ok"
-  (if (string-match "exited abnormally" str)
-      ;; there were errors
-      (message "compilation errors, press C-x ` to visit")
-    ;; no errors, make the compilation window go away in 0.5 seconds
-    (run-at-time 0.5 nil 'delete-windows-on buf)
-    (message "NO COMPILATION ERRORS!")))
-
-(defun show-whitespace ()
-  (interactive)
-  (whitespace-mode t))
-
-(defun fullscreen ()
-  (interactive)
-  (x-send-client-message nil 0 nil "_NET_WM_STATE" 32
-                         '(2 "_NET_WM_STATE_MAXIMIZED_VERT" 0))
-  (x-send-client-message nil 0 nil "_NET_WM_STATE" 32
-                         '(2 "_NET_WM_STATE_MAXIMIZED_HORZ" 0)))
-
-(defun c-toggle-header-source ()
-  (interactive)
-  (let ((ext (file-name-extension (buffer-file-name)))
-        (noext (file-name-sans-extension (buffer-file-name))))
-    (if (string= (substring ext 0 1) "c")
-        (find-file (concat noext ".h"))
-      (find-file (concat noext ".c")))))
-
-(defun browse-to-current-file ()
-  (interactive)
-  (browse-url buffer-file-name))
-- 
cgit v1.2.3-54-g00ecf