JaeUs/dotfiles
1
0
Fork 0
mirror of http://github.com/JaeUs3792/dotfiles synced 2025-12-13 23:51:34 +09:00
Code Issues Packages Projects Releases Wiki Activity

emacs :fix font

Browse Source
This commit is contained in:
JaeYoo-Im
2023-01-12 12:34:39 +09:00
parent ea15f9615a
commit 3c28b8c628
6 changed files with 66 additions and 55 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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/

18
.config/emacs/config.el
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)

60
.config/emacs/emacs.org
View File

@ -4,26 +4,26 @@
Emacs Configuration for emacs 29.50
** Early Init
#+begin_src emacs-lisp :tangle ~/.config/emacs/early-init.el
;;; early-init.el -*- lexical-binding: t; -*-
;; garbage collection
(setq gc-cons-threshold (* 50 1024 1024)) ;; 50MB
;; prefers newest version of a file
(customize-set-variable 'load-prefer-newer t)
;;; early-init.el -*- lexical-binding: t; -*-
;; garbage collection
(setq gc-cons-threshold (* 50 1024 1024)) ;; 50MB
;; prefers newest version of a file
(customize-set-variable 'load-prefer-newer t)
(setq package-enable-at-startup nil
inhibit-startup-message t frame-resize-pixelwise t
package-native-compile t)
(scroll-bar-mode -1)
(tool-bar-mode -1)
(tooltip-mode -1)
(set-fringe-mode 10)
(menu-bar-mode -1)
;;(blink-cursor-mode 0)
(setq package-enable-at-startup nil
inhibit-startup-message t frame-resize-pixelwise t
package-native-compile t)
(scroll-bar-mode -1)
(tool-bar-mode -1)
(tooltip-mode -1)
(set-fringe-mode 10)
(menu-bar-mode -1)
;;(blink-cursor-mode 0)
;; initial load with blue theme
(load-theme 'deeper-blue)
;; initial load with blue theme
(load-theme 'deeper-blue)
(customize-set-variable 'initial-major-mode 'fundamental-mode)
(customize-set-variable 'initial-major-mode 'fundamental-mode)
#+end_src
@ -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
@ -625,6 +633,6 @@ Quick Action in minibuffer
**** Provide Modules
#+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-org.el
(provide 'custom-org)
;;; custom-org.el ends here
(provide 'custom-org)
;;; custom-org.el ends here
#+end_src

2
.config/emacs/init.el
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)

23
.config/emacs/modules/#custom-keybindings.el#
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

9
.config/emacs/modules/custom-completion.el
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