Remove make-(frame|terminal) hooks

This commit is contained in:
Henrik Lissner 2015-06-24 15:36:05 +02:00
parent e8c29fe99c
commit 27dba8ede1
3 changed files with 3 additions and 23 deletions

View file

@ -11,7 +11,7 @@
mac-option-modifier 'alt)
;; fix emacs PATH on OSX (GUI only)
(add-hook! 'after-make-window-system-frame-hooks
(when window-system
(setenv "SHELL" "/usr/local/bin/zsh")
(setenv "EMACS" "1") ; make sure the world knows

View file

@ -1,14 +1,8 @@
;;; core-ui.el --- interface settings
;; see lib/ui-defuns.el
;; This is kept separate so it can jumpstart emacs; this prevents the unstyled
;; flash of emacs pre-makeover.
(add-hook! 'after-make-console-frame-hooks
(load-theme narf-term-theme t)
(menu-bar-mode -1)) ; no menubar
(add-hook! 'after-make-window-system-frame-hooks
(load-theme narf-default-theme t)
(load-theme (if window-system narf-default-theme narf-term-theme) t)
(when window-system
(set-frame-font (apply #'font-spec narf-default-font))
(scroll-bar-mode -1) ; no scrollbar
(tool-bar-mode -1) ; no toolbar

View file

@ -78,20 +78,6 @@
(unless (file-exists-p path)
(make-directory path t)))))
(defvar after-make-console-frame-hooks '()
"Hooks to run after creating a new TTY frame")
(defvar after-make-window-system-frame-hooks '()
"Hooks to run after creating a new window-system frame")
(defun run-after-make-frame-hooks (frame)
"Selectively run either `after-make-console-frame-hooks' or
`after-make-window-system-frame-hooks'"
(select-frame frame)
(run-hooks (if window-system
'after-make-window-system-frame-hooks
'after-make-console-frame-hooks)))
(add-hook 'after-make-frame-functions 'run-after-make-frame-hooks)
(add-hook! after-init (run-after-make-frame-hooks (selected-frame)))
;; Emacs configuration ;;;;;;;;;;;;;;;;;
;;; UTF-8 please