emacs :fix font

This commit is contained in:
2023-01-12 12:34:39 +09:00
parent ea15f9615a
commit 3c28b8c628
6 changed files with 66 additions and 55 deletions

9
.config/emacs/.gitignore vendored Normal file
View File

@ -0,0 +1,9 @@
# generated from emacs.org
# auto generated
modules/
eln-cache/
elpa/
straight/
var/

View File

@ -2,11 +2,19 @@
(setq user-full-name "JaeYoo-Im"
user-mail-address "cpu3792@gmail.com")
(add-to-list 'default-frame-alist `(font . "Fira Code Retina"))
(set-face-attribute 'default nil :font "Fira Code Retina" :height 12)
(set-face-attribute 'fixed-pitch nil :font "Fira Code Retina" :height 12)
(set-face-attribute 'variable-pitch nil :font "Fira Code Retina" :height 12 :weight 'regular)
(set-fontset-font t 'hangul (font-spec :family "NanumGothic" :height 12))
;;(add-to-list 'default-frame-alist `(font . "Fira Code Retina"))
;;(set-face-attribute 'default nil :font "Fira Code Retina" :height 12)
;;(set-face-attribute 'fixed-pitch nil :font "Fira Code Retina" :height 12)
;;(set-face-attribute 'variable-pitch nil :font "Fira Code Retina" :height 12 :weight 'regular)
;;(set-fontset-font t 'hangul (font-spec :family "NanumGothic" :height 12))
(add-hook 'emacs-startup-hook
(lambda ()
(custom-set-faces
`(default ((t (:font "Fira Code Retina 12"))))
`(fixed-pitch ((t (:inherit (default)))))
`(fixed-pitch-serif ((t (:inherit (default)))))
`(variable-pitch ((t (:font "Ubuntu 12")))))))
(require 'custom-ui)
(require 'custom-keybindings)

View File

@ -135,7 +135,7 @@ Emacs Configuration for emacs 29.50
(when (file-exists-p my-config-file)
(load my-config-file nil 'nomessage))
;;(defalias 'yes-or-no-p 'y-or-n-p)
(setq use-short-answer t)
(global-auto-revert-mode t)
#+end_src
@ -145,11 +145,19 @@ Emacs Configuration for emacs 29.50
(setq user-full-name "JaeYoo-Im"
user-mail-address "cpu3792@gmail.com")
(add-to-list 'default-frame-alist `(font . "Fira Code Retina"))
(set-face-attribute 'default nil :font "Fira Code Retina" :height 12)
(set-face-attribute 'fixed-pitch nil :font "Fira Code Retina" :height 12)
(set-face-attribute 'variable-pitch nil :font "Fira Code Retina" :height 12 :weight 'regular)
(set-fontset-font t 'hangul (font-spec :family "NanumGothic" :height 12))
;;(add-to-list 'default-frame-alist `(font . "Fira Code Retina"))
;;(set-face-attribute 'default nil :font "Fira Code Retina" :height 12)
;;(set-face-attribute 'fixed-pitch nil :font "Fira Code Retina" :height 12)
;;(set-face-attribute 'variable-pitch nil :font "Fira Code Retina" :height 12 :weight 'regular)
;;(set-fontset-font t 'hangul (font-spec :family "NanumGothic" :height 12))
(add-hook 'emacs-startup-hook
(lambda ()
(custom-set-faces
`(default ((t (:font "Fira Code Retina 12"))))
`(fixed-pitch ((t (:inherit (default)))))
`(fixed-pitch-serif ((t (:inherit (default)))))
`(variable-pitch ((t (:font "Ubuntu 12")))))))
(require 'custom-ui)
(require 'custom-keybindings)
@ -454,7 +462,7 @@ https://github.com/SystemCrafter/crafted-emacs
:init
(vertico-mode))
(use-package vertico-posframe
;;:disabled
:disabled
:after vertico
:ensure t
:init

View File

@ -66,5 +66,5 @@
(when (file-exists-p my-config-file)
(load my-config-file nil 'nomessage))
;;(defalias 'yes-or-no-p 'y-or-n-p)
(setq use-short-answer t)
(global-auto-revert-mode t)

View File

@ -1,23 +0,0 @@
(use-package which-key
:defer t
:init (which-key-mode)
:diminish which-key-mode
:config
(setq which-key-idle-delay 0.5))
(use-package general
:init
(general-auto-unbind-keys)
:config
(general-evil-setup t)
(general-create-definer ju/leader-key-def
:keymaps '(normal insert visual emacs)
:prefix "SPC"
:global-prefix "C-SPC"))
(ju/leader-key-def
"." 'find-file)
;; Buffer)
(provide 'custom-keybindings)
;;; custom-keybindings.el ends here

View File

@ -8,6 +8,15 @@
(vertico-cycle t)
:init
(vertico-mode))
(use-package vertico-posframe
:disabled
:after vertico
:ensure t
:init
(setq vertico-posframe-parameters
`((left-fringe . 8)
(right-fringe . 8) (alpha . 100)))
(vertico-posframe-mode 1))
(use-package marginalia
:after vertico