summaryrefslogtreecommitdiffstats
path: root/emacs.d/30-frame-fonts.el
diff options
context:
space:
mode:
Diffstat (limited to 'emacs.d/30-frame-fonts.el')
-rw-r--r--emacs.d/30-frame-fonts.el15
1 files changed, 0 insertions, 15 deletions
diff --git a/emacs.d/30-frame-fonts.el b/emacs.d/30-frame-fonts.el
deleted file mode 100644
index af4c9bf..0000000
--- a/emacs.d/30-frame-fonts.el
+++ /dev/null
@@ -1,15 +0,0 @@
-;; Test for frame fonts
-(defun setup-system-frame-colours (&rest frame)
- (let ((f (if (car frame)
- (car frame)
- (selected-frame))))
- (progn
- (set-frame-font "-*-tamsyn-medium-*-*-*-15-*-*-*-*-80-*-*"))))
-(require 'server)
-(defadvice server-create-window-system-frame
- (after set-system-frame-colours ())
- "Set custom frame colours when creating the first frame on a display"
- (message "Running after frame-initialize")
- (setup-system-frame-colours))
-(ad-activate 'server-create-window-system-frame)
-(add-hook 'after-make-frame-functions 'setup-system-frame-colours t)