mir/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Compare commits

base: mir:75da435772f4eb5650e2d9afa0c5f013bbb224af
Branches Tags
mir:main
..
compare: mir:a657088042d95c3c45ec2d61bc320d2d902fd6d4
Branches Tags
mir:main

2 Commits
75da435772 ... a657088042

Author SHA1 Message Date
Miranda Marquez
a657088042 re-indent 2024-07-28 17:35:28 -08:00
Miranda Marquez
a2d1cd84a3 make pretty terminal box glyph actually work 2024-07-28 17:34:47 -08:00
1 changed files with 8 additions and 9 deletions
Show Stats Expand all files Collapse all files

17
init.el
View File

@ -40,10 +40,9 @@ declarations for color schemes."
(add-to-list 'default-frame-alist '(cursor-color . "white"))
(add-to-list 'default-frame-alist '(fullscreen . maximized)))
;; see also https://emacs.stackexchange.com/questions/7228/nice-tty-window-borders-in-24-4
(unless (display-graphic-p)
(let ((display-table (or standard-display-table (make-display-table))))
(set-display-table-slot display-table 'vertical-border (make-glyph-code ?│))
(setq standard-display-table display-table))))
(let ((display-table (or standard-display-table (make-display-table))))
(set-display-table-slot display-table 'vertical-border (make-glyph-code ?│))
(setq standard-display-table display-table)))
(defun mir/graphical-setup ()
"Commands to run at the beginning of init when on a graphical display.
This prevents errors in termux and speeds up init when editing from the
@ -362,8 +361,8 @@ If the current window occupies the whole frame, split it."
(load-file elpaca-bootstrap-file)
(elpaca 'dash (require 'dash))
(elpaca elpaca-use-package
(elpaca-use-package-mode)
(setq elpaca-use-package-by-default t))
(elpaca-use-package-mode)
(setq elpaca-use-package-by-default t))
;; (elpaca-wait)
)
@ -374,7 +373,7 @@ If the current window occupies the whole frame, split it."
(add-hook 'server-after-make-frame-hook #'mir/graphical-setup)
(if (display-graphic-p)
(add-hook 'elpaca-after-init-hook #'mir/graphical-setup)
;; (add-hook 'after-init-hook #'mir/graphical-setup)
;; (add-hook 'after-init-hook #'mir/graphical-setup)
)
(use-package compat)
@ -968,8 +967,8 @@ Return nil if DIR is not in a hugo project at all."
:diminish lsp-lens-mode
:custom (lsp-completion-provider :none)
:config (defun corfu/lsp-mode-setup-completion ()
(setf (alist-get 'styles (alist-get 'lsp-capf completion-category-defaults))
'(flex))))
(setf (alist-get 'styles (alist-get 'lsp-capf completion-category-defaults))
'(flex))))
;; broken snippets I don't care about...
(use-package yasnippet