Che palle

This commit is contained in:
Andrea Ciceri 2023-09-20 01:12:21 +02:00
parent a7ac7b4b74
commit 4cc329b6b4
No known key found for this signature in database
2 changed files with 55 additions and 18 deletions

48
init.el
View file

@ -23,7 +23,8 @@
(use-package emacs
:bind (("<mouse-4>" . scroll-down-line)
("<mouse-5>" . scroll-up-line))
("<mouse-5>" . scroll-up-line)
(("C-x F" . recentf-open)))
:hook (server-after-make-frame . (lambda () (xterm-mouse-mode +1))) ;; FIXME why is this needed?
:custom
(use-dialog-box nil)
@ -41,17 +42,29 @@
(set-face-background 'vertical-border (face-background 'default))
(set-display-table-slot standard-display-table 'vertical-border (make-glyph-code ?┃))
(menu-bar-mode -1)
(scroll-bar-mode -1)
(xterm-mouse-mode +1)
(tool-bar-mode -1)
(global-hl-line-mode -1)
(global-auto-revert-mode t)
(show-paren-mode +1)
(column-number-mode +1)
(add-to-list 'default-frame-alist '(font . "Iosevka Comfy-13"))
(recentf-mode +1)
(defun ccr/reload-emacs ()
(interactive)
(load-file "~/.config/emacs/init.el"))
)
(use-package tramp
:config
;; TODO ugly `ccr' hardcoded
(add-to-list 'tramp-remote-path "/home/ccr/.nix-profile/bin" 't)
(add-to-list 'tramp-remote-path "/etc/profiles/per-user/ccr/bin" 't)
(add-to-list 'tramp-remote-path "/run/current-system/sw/bin" 't)
(add-to-list 'tramp-remote-path 'tramp-own-remote-path)
)
(use-package dracula-theme
:init
(require 'ansi-color)
@ -108,9 +121,10 @@
(indent-bars-treesit-support t)
(indent-bars-spacing-override 2)
;; (indent-bars-treesit-wrap '())
(indent-bars-color '(highlight :face-bg t :blend 0.2))
(indent-bars-highlight-current-depth '(:blend 0.4))
(indent-bars-no-stipple-char (string-to-char "")))
(indent-bars-color-by-depth '(:regexp "outline-\\([0-9]+\\)" :blend 0.4))
(indent-bars-no-stipple-char (string-to-char ""))
(indent-bars-prefer-character 't) ;; so it works also in terminal
)
(use-package diredfl
:config (diredfl-global-mode))
@ -450,13 +464,35 @@
(global-hl-todo-mode))
(use-package eat
:init
;; FIXME if we not load eat on startup then adding more non bound keys in :config
;; will a cause "nesting exceeds `max-lisp-eval-depth'" on (eat-reload)
(eat)
:custom
(eat-kill-buffer-on-exit t)
:config
(add-to-list 'eat-semi-char-non-bound-keys '[?\e 104]) ; M-h
(add-to-list 'eat-semi-char-non-bound-keys '[?\e 106]) ; M-j
(add-to-list 'eat-semi-char-non-bound-keys '[?\e 107]) ; M-k
(add-to-list 'eat-semi-char-non-bound-keys '[?\e 108]) ; M-l
(eat-update-semi-char-mode-map)
(eat-reload)
:bind (("C-c o t" . eat-project))
;; doesn't work well
;; FIXME doesn't work well
;; ((eat-mode . compilation-shell-minor-mode))
)
(use-package eshell
:hook ((eshell-load . eat-eshell-mode)
(eshell-load . eat-eshell-visual-command-mode))
:bind (("C-c o e" . project-eshell)))
(use-package eshell-syntax-highlighting
:after eshell-mode
:ensure t
:config
(eshell-syntax-highlighting-global-mode +1))
(use-package popper
:custom
(popper-reference-buffers '("\*Messages\*"
@ -465,7 +501,7 @@
(completion-list-mode . hide)
help-mode
compilation-mode
"^\\*eshell.*\\*$" eshell-mode ;eshell as a popup
"^\\*emacs-eshell.*\\*$" eshell-mode ;eshell as a popup
"^\\*shell.*\\*$" shell-mode ;shell as a popup
"^\\*term.*\\*$" term-mode ;term as a popup
"^\\*eat.*\\*$" eat-mode ;eat as a popup

View file

@ -9,6 +9,7 @@ with epkgs; [
nerd-icons-dired
treemacs-nerd-icons
eat
eshell-syntax-highlighting
clipetty
sideline
sideline-flymake