From 2e5916bc967a2e28c0b8569b12405b0fbb7b5738 Mon Sep 17 00:00:00 2001 From: Stephane Del Pino <stephane.delpino44@gmail.com> Date: Wed, 11 Mar 2020 08:21:18 +0100 Subject: [PATCH] Encore du nettoyage --- init.el | 6 ++-- myinit.org | 99 +++++++++++++++--------------------------------------- 2 files changed, 31 insertions(+), 74 deletions(-) diff --git a/init.el b/init.el index 8cad389..1499562 100644 --- a/init.el +++ b/init.el @@ -15,7 +15,7 @@ '("gnu" . "http://elpa.gnu.org/packages/")) ;; set is-standalone to true to use the local melpa archive -(defvar is-standalone t) +(defvar is-standalone nil) (if is-standalone (setq package-archives '(("myelpa" . "~/.emacs.d/myelpa/"))) nil) @@ -60,9 +60,9 @@ ;; If you edit it by hand, you could mess it up, so be careful. ;; Your init file should contain only one such instance. ;; If there is more than one, they won't work right. - '(aw-leading-char-face ((t (:inherit ace-jump-face-foreground :height 3.0))))) + '(aw-leading-char-face ((((class color) (min-colors 16777215)) (:foreground "#fb4933" :background "#282828" :height 4.0)) (((class color) (min-colors 255)) (:foreground "#d75f5f" :background "#262626" :height 4.0))))) ;;; Local Variables: -;;; byte-compile-warnings: (not free-vars unresolved) +;;; byte-compile-warnings: (not free-vars) ;;; End: (provide 'init) ;;; init.el ends here diff --git a/myinit.org b/myinit.org index 0d58993..ee57895 100644 --- a/myinit.org +++ b/myinit.org @@ -812,8 +812,7 @@ Activation des ggtags nil '(("\\<\\(FIXME\\|TODO\\|BUG\\|DONE\\)" 1 font-lock-warning-face t))) )) - ) - ) + )) #+END_SRC * Markdown @@ -823,64 +822,28 @@ Activation des ggtags :mode (".md" ".markdown")) #+END_SRC -* Clojure -#+BEGIN_SRC emacs-lisp - (use-package cider - :ensure t - :config - (add-hook 'cider-repl-mode-hook #'company-mode) - (add-hook 'cider-mode-hook #'company-mode) - (add-hook 'cider-mode-hook #'eldoc-mode) -;; (add-hook 'cider-mode-hook #'cider-hydra-mode) - (setq cider-repl-use-pretty-printing t) - (setq cider-repl-display-help-banner nil) - ;; (setq cider-cljs-lein-repl "(do (use 'figwheel-sidecar.repl-api) (start-figwheel!) (cljs-repl))") - - :bind (("M-r" . cider-namespace-refresh) - ("C-c r" . cider-repl-reset) - ("C-c ." . cider-reset-test-run-tests)) - ) - - (use-package clj-refactor - :ensure t - :config - (add-hook 'clojure-mode-hook (lambda () - (clj-refactor-mode 1) - ;; insert keybinding setup here - )) - (cljr-add-keybindings-with-prefix "C-c C-m") - (setq cljr-warn-on-eval nil) - :bind ("C-c '" . hydra-cljr-help-menu/body) - ) -#+END_SRC - * Dumb jump +Permet de se déplacer *très* rapidement dans un texte #+BEGIN_SRC emacs-lisp - -(use-package dumb-jump - :bind (("M-g o" . dumb-jump-go-other-window) - ("M-g j" . dumb-jump-go) - ("M-g x" . dumb-jump-go-prefer-external) - ("M-g z" . dumb-jump-go-prefer-external-other-window)) - :config - ;; (setq dumb-jump-selector 'ivy) ;; (setq dumb-jump-selector 'helm) -:init -(dumb-jump-mode) - :ensure -) - - - + (use-package dumb-jump + :bind (("M-g o" . dumb-jump-go-other-window) + ("M-g j" . dumb-jump-go) + ("M-g x" . dumb-jump-go-prefer-external) + ("M-g z" . dumb-jump-go-prefer-external-other-window)) + :init + (dumb-jump-mode) + :ensure t) #+END_SRC -* Origami folding + +* Origami +Mode permettant le pliage (/folding/) de regions #+BEGIN_SRC emacs-lisp -(use-package origami -:ensure t) + (use-package origami + :ensure t) #+END_SRC -#+RESULTS: - -* IBUFFER +* IBuffer +Un meilleur gestionnaire de /buffers/. #+BEGIN_SRC emacs-lisp (global-set-key (kbd "C-x C-b") 'ibuffer) (setq ibuffer-saved-filter-groups @@ -888,37 +851,31 @@ Activation des ggtags ("dired" (mode . dired-mode)) ("org" (name . "^.*org$")) ("magit" (mode . magit-mode)) - ("IRC" (or (mode . circe-channel-mode) (mode . circe-server-mode))) + ("IRC" (or (mode . circe-channel-mode) + (mode . circe-server-mode))) ("web" (or (mode . web-mode) (mode . js2-mode))) ("shell" (or (mode . eshell-mode) (mode . shell-mode))) - ("mu4e" (or - - (mode . mu4e-compose-mode) - (name . "\*mu4e\*") - )) - ("programming" (or - (mode . clojure-mode) - (mode . clojurescript-mode) - (mode . python-mode) - (mode . c++-mode))) - ("emacs" (or - (name . "^\\*scratch\\*$") - (name . "^\\*Messages\\*$"))) + ("mu4e" (or (mode . mu4e-compose-mode) + (name . "\\*mu4e\\*"))) + ("programming" (or (mode . clojure-mode) + (mode . clojurescript-mode) + (mode . python-mode) + (mode . c++-mode))) + ("emacs" (or (name . "^\\*scratch\\*$") + (name . "^\\*Messages\\*$"))) )))) (add-hook 'ibuffer-mode-hook (lambda () (ibuffer-auto-mode 1) (ibuffer-switch-to-saved-filter-groups "default"))) - ;; don't show these - ;(add-to-list 'ibuffer-never-show-predicates "zowie") ;; Don't show filter groups if there are no buffers in that group (setq ibuffer-show-empty-filter-groups nil) ;; Don't ask for confirmation to delete marked buffers (setq ibuffer-expert t) - #+END_SRC + * Treemacs #+BEGIN_SRC emacs-lisp (use-package treemacs -- GitLab