feat(wpcarro/emacs): Set initial-buffer-choice per-host

Work machines should prefer `/hadrian` and personal machines should prefer
`/depot`.

Change-Id: I03b605cc5ce233767146d83f14f368863897cf8b
Reviewed-on: https://cl.tvl.fyi/c/depot/+/6368
Tested-by: BuildkiteCI
Reviewed-by: wpcarro <wpcarro@gmail.com>
Autosubmit: wpcarro <wpcarro@gmail.com>
This commit is contained in:
William Carroll 2022-09-06 10:03:38 -07:00 committed by clbot
parent a8c13a5ce1
commit bc60a7e454
4 changed files with 7 additions and 4 deletions

View file

@ -14,7 +14,6 @@
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(require 'constants) (require 'constants)
(require 'tvl)
(require 'prelude) (require 'prelude)
(require 'al) (require 'al)
(require 'fonts) (require 'fonts)
@ -70,9 +69,6 @@
;; disable toolbar ;; disable toolbar
(tool-bar-mode -1) (tool-bar-mode -1)
;; set default buffer for Emacs
(setq initial-buffer-choice tvl-depot-path)
;; premium Emacs themes ;; premium Emacs themes
(use-package doom-themes (use-package doom-themes
:config :config

View file

@ -15,6 +15,8 @@
:path (f-join tvl-depot-path "/hadrian") :path (f-join tvl-depot-path "/hadrian")
:kbd "h")) :kbd "h"))
(setq initial-buffer-choice "/hadrian")
(add-to-list 'ssh-hosts "wpcarro@tarasco") (add-to-list 'ssh-hosts "wpcarro@tarasco")
(display-register primary (display-register primary

View file

@ -2,6 +2,7 @@
;; Dependencies ;; Dependencies
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(require 'tvl)
(require 'display) (require 'display)
(require 'window-manager) (require 'window-manager)
@ -20,6 +21,8 @@
(display-arrangement primary :displays (laptop)) (display-arrangement primary :displays (laptop))
(setq initial-buffer-choice tvl-depot-path)
(setq window-manager-named-workspaces (setq window-manager-named-workspaces
(list (make-window-manager-named-workspace (list (make-window-manager-named-workspace
:label "Web Browsing" :label "Web Browsing"

View file

@ -15,6 +15,8 @@
:path (f-join tvl-depot-path "/hadrian") :path (f-join tvl-depot-path "/hadrian")
:kbd "h")) :kbd "h"))
(setq initial-buffer-choice "/hadrian")
(add-to-list 'ssh-hosts "wpcarro@ava") (add-to-list 'ssh-hosts "wpcarro@ava")
(display-register primary (display-register primary