Remove make-(frame|terminal) hooks
This commit is contained in:
parent
e8c29fe99c
commit
27dba8ede1
3 changed files with 3 additions and 23 deletions
|
@ -11,7 +11,7 @@
|
||||||
mac-option-modifier 'alt)
|
mac-option-modifier 'alt)
|
||||||
|
|
||||||
;; fix emacs PATH on OSX (GUI only)
|
;; 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 "SHELL" "/usr/local/bin/zsh")
|
||||||
(setenv "EMACS" "1") ; make sure the world knows
|
(setenv "EMACS" "1") ; make sure the world knows
|
||||||
|
|
||||||
|
|
|
@ -1,14 +1,8 @@
|
||||||
;;; core-ui.el --- interface settings
|
;;; core-ui.el --- interface settings
|
||||||
;; see lib/ui-defuns.el
|
;; see lib/ui-defuns.el
|
||||||
|
|
||||||
;; This is kept separate so it can jumpstart emacs; this prevents the unstyled
|
(load-theme (if window-system narf-default-theme narf-term-theme) t)
|
||||||
;; flash of emacs pre-makeover.
|
(when window-system
|
||||||
(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)
|
|
||||||
(set-frame-font (apply #'font-spec narf-default-font))
|
(set-frame-font (apply #'font-spec narf-default-font))
|
||||||
(scroll-bar-mode -1) ; no scrollbar
|
(scroll-bar-mode -1) ; no scrollbar
|
||||||
(tool-bar-mode -1) ; no toolbar
|
(tool-bar-mode -1) ; no toolbar
|
||||||
|
|
14
core/core.el
14
core/core.el
|
@ -78,20 +78,6 @@
|
||||||
(unless (file-exists-p path)
|
(unless (file-exists-p path)
|
||||||
(make-directory path t)))))
|
(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 ;;;;;;;;;;;;;;;;;
|
;; Emacs configuration ;;;;;;;;;;;;;;;;;
|
||||||
|
|
||||||
;;; UTF-8 please
|
;;; UTF-8 please
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue