lulu/dotfiles
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Set Emacs default font to Monocraft

Browse source
This commit is contained in:
lulusilly 2025-09-13 17:06:41 -04:00
parent c240541123
commit f6a91a76b7
2 changed files with 28 additions and 12 deletions
Download patch file Download diff file Expand all files Collapse all files

20
.config/neofetch/config.conf
View file

@ -6,25 +6,25 @@ print_info() {
info "OS" distro info "OS" distro
info "Host" model info "Host" model
# info "Kernel" kernel info "Kernel" kernel
info "Uptime" uptime info "Uptime" uptime
# info "Packages" packages info "Packages" packages
info "Shell" shell info "Shell" shell
# info "Resolution" resolution info "Resolution" resolution
# info "DE" de info "DE" de
# info "WM" wm info "WM" wm
# info "WM Theme" wm_theme info "WM Theme" wm_theme
# info "Theme" theme info "Theme" theme
# info "Icons" icons info "Icons" icons
info "Terminal" term info "Terminal" term
# info "Terminal Font" term_font info "Terminal Font" term_font
info "CPU" cpu info "CPU" cpu
info "GPU" gpu info "GPU" gpu
info "Memory" memory info "Memory" memory
# info "GPU Driver" gpu_driver # Linux/macOS only # info "GPU Driver" gpu_driver # Linux/macOS only
# info "CPU Usage" cpu_usage # info "CPU Usage" cpu_usage
info "Disk" disk # info "Disk" disk
# info "Battery" battery # info "Battery" battery
# info "Font" font # info "Font" font
# info "Song" song # info "Song" song

20
.emacs.d/init.el
View file

@ -1,3 +1,19 @@
;; Setting default Emacs window dimensions
(push '(tool-bar-lines . 0) default-frame-alist)
(push '(width . 75) default-frame-alist)
(push '(height . 30) default-frame-alist)
;; Setting default font
(set-frame-font
(cond
((member "Monocraft" (font-family-list)) "Monocraft")
((member "Miracode" (font-family-list)) "Miracode")
((member "Cascadia Mono-16" (font-family-list)) "Cascadia Mono")
(t nil)
)
t t
)
;; Set default tab width (in spaces)
(setq-default tab-width 2)
;; Store customizations in a separate file ;; Store customizations in a separate file
(setq custom-file (expand-file-name "custom.el" user-emacs-directory)) (setq custom-file (expand-file-name "custom.el" user-emacs-directory))
;; Load it if the file exists ;; Load it if the file exists
@ -36,7 +52,7 @@
(cond (cond
;; If using Windows ;; If using Windows
((eq system-type 'windows-nt) ((eq system-type 'windows-nt)
(setq default-directory (format "C:\\Users\\%s\\Documents" (getenv "USERNAME")))) (setq default-directory (format "C:\\Users\\%s\\Documents" (user-login-name))))
;; If using GNU/Linux ;; If using GNU/Linux
((eq system-type 'gnu/linux) ((eq system-type 'gnu/linux)
(setq default-directory (format "/home/%s" (user-login-name)))) (setq default-directory (format "/home/%s" (user-login-name))))
@ -82,4 +98,4 @@
(defalias 'yes-or-no-p 'y-or-n-p) (defalias 'yes-or-no-p 'y-or-n-p)
(column-number-mode 1) (column-number-mode 1)
(setq make-backup-files nil) (setq make-backup-files nil)
(setq global-visual-line-mode t) (setq global-visual-line-mode t)