diff options
| -rw-r--r-- | configs/rcs/emacs.d/init.el | 45 |
1 files changed, 18 insertions, 27 deletions
diff --git a/configs/rcs/emacs.d/init.el b/configs/rcs/emacs.d/init.el index 61dbd80..8ae9d7e 100644 --- a/configs/rcs/emacs.d/init.el +++ b/configs/rcs/emacs.d/init.el @@ -85,8 +85,11 @@ (setq-default cursor-type 'hbar) ;; cursor is a horizontal bar (setq bookmark-default-file fcuny-bookmarks-dir) ;; where to save bookmarks (setq bookmark-save-flag 1) ;; save bookmarks when emacs qui +(setq vc-handled-backends nil) ;; don't use the VC backend, it's too slow with source +(setq-default frame-title-format "%b (%f)") ;; set full path in the frame title +(setq-default delete-by-moving-to-trash t) ;; delete files by moving them to the trash -(fringe-mode '(8 . 8)) ;; size of the fringe +(fringe-mode '(10 . 10)) ;; size of the fringe (custom-set-variables '(tool-bar-mode nil) @@ -120,13 +123,6 @@ :hook (after-init . auto-package-update-maybe)) -(use-package beacon - :ensure t - :diminish - :commands beacon-mode - :config - (beacon-mode t)) - (use-package midnight :config (midnight-mode t)) @@ -208,7 +204,6 @@ (exec-path-from-shell-copy-env var))))) (use-package counsel - :ensure t :after (projectile ivy) :bind (("M-x" . counsel-M-x) @@ -221,14 +216,12 @@ :custom (counsel-find-file-at-point t) :config - (use-package swiper :ensure t) + (use-package swiper) (use-package counsel-projectile - :ensure t :config (counsel-projectile-mode))) (use-package projectile - :ensure t :diminish projectile-mode :bind-keymap ("C-c p" . projectile-command-map) :init @@ -244,18 +237,16 @@ projectile-globally-ignored-files (append projectile-globally-ignored-files))) (use-package lisp-mode - :ensure f + :ensure nil :bind (("C-c C-e" . eval-buffer) ("C-c C-r" . eval-region))) (use-package make-mode - :ensure t :config (add-hook 'makefile-mode-hook (lambda () (setq-local tab-width 2)))) (use-package go-mode - :ensure t :preface (defun fcuny/go-mode-setup () (setq-default) @@ -265,11 +256,10 @@ (use-package python :mode (("\\.py$" . python-mode)) - :ensure t :commands python-mode :custom (python-indent-offset 2)) -(use-package scala-mode :ensure t) +(use-package scala-mode) (use-package sh-script :mode ("bashrc" . sh-mode) @@ -297,13 +287,11 @@ (use-package gitconfig-mode :defer 5) -(use-package puppet-mode :ensure t) +(use-package puppet-mode) -(use-package yaml-mode - :ensure t) +(use-package yaml-mode) (use-package json-mode - :ensure t :after (flyspell) :custom (json-reformat:indent-width 2) @@ -314,7 +302,6 @@ (add-to-list 'auto-mode-alist '("\\.workflow$" . json-mode)))) (use-package protobuf-mode - :ensure t :after (flyspell) :hook ((protobuf-mode . flyspell-prog-mode))) @@ -342,25 +329,29 @@ (defconst display-name (pcase (display-pixel-width) - (`1440 'macbook-pro))) + (`1440 'macbook-pro) + (_ 'default))) (defconst emacs-min-top 23) (defconst emacs-min-left (pcase display-name - (`macbook-pro 200))) + (`macbook-pro 140) + (`default 200))) (defconst emacs-min-height (pcase display-name - (`macbook-pro 47))) + (`macbook-pro 60) + (`default 47))) (defconst emacs-min-width (pcase display-name - (`macbook-pro 100))) + (`macbook-pro 130) + (`default 110))) (defconst emacs-min-font (pcase display-name - (_ "-*-DejaVu Sans Mono-normal-normal-normal-*-18-*-*-*-m-0-iso10646-1"))) + (_ "-*-DejaVu Sans Mono-normal-normal-normal-*-13-*-*-*-m-0-iso10646-1"))) (defun emacs-min () (interactive) |