marcuskammer/emacs.d
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Update --gui

Browse source
This commit is contained in:
Marcus Kammer 2024-01-02 17:33:02 +01:00
parent ba9c9f9097
commit dc451de0bc
Signed by: marcuskammer
GPG key ID: C374817BE285268F
1 changed files with 23 additions and 25 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

48
bundle/bundle--gui.el
View file

@ -6,12 +6,12 @@
(setq default-frame-alist
`((font . "MonoLisa-11")
(width . 85)
(height . 50)
(vertical-scroll-bars)
,@(cond ((eq system-type 'gnu/linux)
'((fullscreen . maximized)
(undecorated . t))))))
(width . 85)
(height . 50)
(vertical-scroll-bars)
,@(cond ((eq system-type 'gnu/linux)
'((fullscreen . maximized)
(undecorated . t))))))
(setq frame-resize-pixelwise t)
@ -29,6 +29,23 @@
(add-hook 'after-make-frame-functions 'center-frame)
(use-package all-the-icons
:commands all-the-icons-install-fonts
:init
(unless (find-font (font-spec :name "all-the-icons"))
(all-the-icons-install-fonts t)))
(use-package all-the-icons-dired
:hook (dired-mode . all-the-icons-dired-mode))
(use-package emojify
:config
(when (member "Segoe UI Emoji" (font-family-list))
;; https://ianyepan.github.io/posts/emacs-emojis/
(set-fontset-font t 'symbol (font-spec :family "Segoe UI Emoji") nil 'prepend)
(setq emojify-display-style 'unicode)
(setq emojify-emoji-styles '(unicode))))
;; (defun my-vc-info ()
;; (when vc-mode
;; (concat (substring vc-mode 5)
@ -79,17 +96,6 @@
(set-face-attribute 'mode-line-inactive nil
:box '(:line-width (1 . 8) :style flat-button) :weight 'normal)
(use-package all-the-icons
:if (display-graphic-p)
:commands all-the-icons-install-fonts
:init
(unless (find-font (font-spec :name "all-the-icons"))
(all-the-icons-install-fonts t)))
(use-package all-the-icons-dired
:if (display-graphic-p)
:hook (dired-mode . all-the-icons-dired-mode))
;; (use-package doom-modeline
;; :hook (after-init . doom-modeline-mode)
;; :custom
@ -120,14 +126,6 @@
(use-package ace-window :init (global-set-key (kbd "M-o") 'ace-window))
(use-package emojify
:config
(when (member "Segoe UI Emoji" (font-family-list))
;; https://ianyepan.github.io/posts/emacs-emojis/
(set-fontset-font t 'symbol (font-spec :family "Segoe UI Emoji") nil 'prepend)
(setq emojify-display-style 'unicode)
(setq emojify-emoji-styles '(unicode))))
;; (use-package vertico :init (vertico-mode))
(use-package webjump