summaryrefslogtreecommitdiffstats
path: root/.emacs.d/slash_functions.el
diff options
context:
space:
mode:
authorGravatar Tom Willemsen2010-06-30 20:59:12 +0200
committerGravatar Tom Willemsen2010-06-30 20:59:12 +0200
commit722c13a8fc093bc67b9be444547571d544cb79a0 (patch)
tree67ac47a4ec267f56b754134efa2a5a3b51c07dcf /.emacs.d/slash_functions.el
downloaddotfiles-722c13a8fc093bc67b9be444547571d544cb79a0.tar.gz
dotfiles-722c13a8fc093bc67b9be444547571d544cb79a0.zip
Switched over from dotemacs to doteverything
Diffstat (limited to '.emacs.d/slash_functions.el')
-rw-r--r--.emacs.d/slash_functions.el5
1 files changed, 5 insertions, 0 deletions
diff --git a/.emacs.d/slash_functions.el b/.emacs.d/slash_functions.el
new file mode 100644
index 0000000..fa27bb7
--- /dev/null
+++ b/.emacs.d/slash_functions.el
@@ -0,0 +1,5 @@
+(defun what-face (pos)
+ (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)))) \ No newline at end of file