2.1 KiB
2.1 KiB
(use-package emacs
:bind
(("C-c f f" . toggle-frame-fullscreen))
:config
;; Disable tool-bar
(tool-bar-mode -1)
;; Enable horizontal mouse scroll
(setq mouse-wheel-tilt-scroll t)
;; Enable electric indent mode
(electric-pair-mode t)
;; Switch meta command key
(setq mac-command-modifier 'meta)
;; Enable which-key
(which-key-mode)
;; Enable completion preview
;;(global-completion-preview-mode)
;; Set font
(set-face-attribute 'default t :font "JetBrains Mono" :height 120)
;; Fontify code blocks in markdown mode
;;(setq markdown-fontify-code-blocks-natively t)
;; Enable SPC option in minibuffer
;;(define-key minibuffer-local-completion-map (kbd "SPC") 'self-insert-command)
;; Enable SPC option in minibuffer
;;(define-key minibuffer-local-completion-map (kbd "SPC") 'self-insert-command)
;; Enable fido mode
;;(setq fido-mode t)
;;(fido-vertical-mode)
;;(defun my-icomplete-styles ()
;; (setq-local completion-styles '(orderless)))
;;(add-hook 'icomplete-minibuffer-setup-hook 'my-icomplete-styles)
;; Disable native comp warnings
(setq native-comp-async-report-warnings-errors 'silent)
;; Save history of minibuffer
(savehist-mode)
;; Set cursor type
(setq-default cursor-type 'bar)
;; Automatically reread from disk if the underlying file changes
(setq auto-revert-interval 1)
(setq auto-revert-check-vc-info t)
(global-auto-revert-mode)
;; Don't litter file system with *~ backup files; put them all inside
(defun my--backup-file-name (fpath)
"Return a new file path of a given file path. If the new path's directories does not exist, create them."
(let* ((backupRootDir "~/.config/emacs/emacs-backup/")
(filePath (replace-regexp-in-string "[A-Za-z]:" "" fpath )) ; remove Windows driver letter in path
(backupFilePath (replace-regexp-in-string "//" "/" (concat backupRootDir filePath "~") )))
(make-directory (file-name-directory backupFilePath) (file-name-directory backupFilePath))
backupFilePath))
(setq make-backup-file-name-function 'my--backup-file-name)
)