From 7d4ada316e01c0665342420e7fb204971ccdac01 Mon Sep 17 00:00:00 2001 From: Franck Cuny Date: Wed, 23 Mar 2022 07:46:34 -0700 Subject: rename fcuny-navigation to my-navigation --- emacs/custom/fcuny-navigation.el | 157 --------------------------------------- emacs/custom/my-navigation.el | 154 ++++++++++++++++++++++++++++++++++++++ emacs/init.el | 2 +- 3 files changed, 155 insertions(+), 158 deletions(-) delete mode 100644 emacs/custom/fcuny-navigation.el create mode 100644 emacs/custom/my-navigation.el (limited to 'emacs') diff --git a/emacs/custom/fcuny-navigation.el b/emacs/custom/fcuny-navigation.el deleted file mode 100644 index b4ed9a3..0000000 --- a/emacs/custom/fcuny-navigation.el +++ /dev/null @@ -1,157 +0,0 @@ -;;; fcuny-navigation.el --- Configure parts related to navigation -;;; Commentary: -;;; Code: - -(require 'fcuny-vars) -(require 'use-package) - -(setq help-window-select t) - -(use-package project - :ensure t - :bind-keymap ("C-c p" . project-prefix-map) - :custom - (project-list-file (expand-file-name "projects" fcuny/path-emacs-var)) - (project-switch-commands - '((?f "File" project-find-file) - (?d "Dired" project-dired) - (?b "Buffer" project-switch-to-buffer) - (?e "Eshell" project-eshell) - (?m "Magit status" magit-project-status) - (?r "Search" rg-project)))) - -(use-package bookmark - :custom - (bookmark-default-file (expand-file-name "bookmarks" fcuny/path-emacs-var)) - (bookmark-save-flag 1)) - -(use-package ls-lisp - :ensure nil - :custom - (ls-lisp-use-insert-directory-program nil) - (ls-lisp-dirs-first t)) - -(use-package dired - :defer t - :bind (("C-x C-d" . dired) - ("C-x C-j" . dired-jump)) - :init - (setq-default dired-dwim-target t) - (setq-default dired-listing-switches "-alh") - (setq dired-recursive-deletes 'always) - (setq dired-recursive-copies 'always)) - -(use-package dired-x - :ensure nil - :hook ((dired-mode . dired-omit-mode)) - :config - (setq dired-omit-verbose nil) - ;; hide backup, autosave, *.*~ files - ;; omit mode can be toggled using `C-x M-o' in dired buffer. - (setq dired-omit-files - (concat dired-omit-files "\\|^.DS_Store$\\|^.localized$\\|^.projectile$\\|^.git$"))) - -(use-package ibuffer - :bind ("C-x C-b" . ibuffer) - :commands - ibuffer-auto-mode - ibuffer-switch-to-saved-filter-groups - ibuffer-do-sort-by-alphabetic - :custom - (ibuffer-saved-filter-groups - (quote (("default" - ("org" (mode . org-mode)) - ("go" (mode . go-mode)) - ("nix" (mode . nix-mode)) - ("python" (mode . python-mode)) - ("config" (or - (name . "\\.conf$") - (name . "\\.json$") - (mode . yaml-mode))) - ("scripts" (mode . sh-mode)) - ("documentation" (or - (mode . markdown-mode) - (mode . rst-mode))) - ("dired" (mode . dired-mode)) - ("shell" (mode . eshell-mode)) - ("git" (or - (name . "^\*magit") - (name . "^\magit"))) - ("Emacs" (or - (mode . emacs-lisp-mode) - (name . "^\\*scratch\\*$") - (name . "^\\.emacs") - (name . "^\\*Messages\\*$"))))))) - :init - (add-hook 'ibuffer-mode-hook (lambda () (ibuffer-switch-to-saved-filter-groups "default")))) - -(use-package recentf - :init (recentf-mode 1) - :config - (setq recentf-max-saved-items 500 - recentf-exclude '(".gz" ".xz" ".zip") - recentf-save-file (expand-file-name "var/recentf" user-emacs-directory))) - -(use-package rg - :ensure t - :custom - (rg-group-result t) - (rg-show-columns t) - (rg-align-position-numbers t) - (rg-align-line-number-field-length 3) - (rg-align-column-number-field-length 3) - (rg-align-line-column-separator "#") - (rg-align-position-content-separator "|")) - -(use-package counsel - :diminish counsel-mode - :ensure t - :after ivy - :init (counsel-mode 1) - :bind - (("M-x" . counsel-M-x) - ("C-x C-f" . counsel-find-file) - ("C-x C-r" . counsel-recentf) - ("C-c i " . counsel-imenu) - ("C-c f" . counsel-git) - ("C-c /" . counsel-rg) - ("C-c m" . counsel-mark-ring) - ("C-c V" . counsel-describe-variable) - ("C-c C-l" . counsel-find-library) - ("C-c U" . counsel-unicode-char) - ("C-x r l" . counsel-bookmark)) - :custom - (counsel-find-file-ignore-regexp "\\.git\\|\\.DS_Store\\|\\.localized\\'") - (counsel-find-file-at-point t)) - -(use-package ivy - :ensure t - :diminish ivy-mode - :init (ivy-mode 1) - :custom - (ivy-use-virtual-buffers t) - (ivy-count-format "(%d/%d) ") - (ivy-height 20) - (ivy-use-selectable-prompt t) - :bind (("C-x b" . ivy-switch-buffer) - ("C-s" . swiper))) - -(use-package ivy-rich - :ensure t - :after (ivy) - :config - (ivy-rich-mode 1) - :custom - (ivy-extra-directories '("../" "./")) - (ivy-virtual-abbreviate 'full) - (ivy-rich-switch-buffer-align-virtual-buffer t) - (ivy-rich-path-style 'abbrev)) - -(use-package which-key - :diminish which-key-mode - :ensure t - :config - (which-key-mode)) - -(provide 'fcuny-navigation) -;;; fcuny-navigation.el ends here diff --git a/emacs/custom/my-navigation.el b/emacs/custom/my-navigation.el new file mode 100644 index 0000000..4a36310 --- /dev/null +++ b/emacs/custom/my-navigation.el @@ -0,0 +1,154 @@ +;;; my-navigation.el --- Configure parts related to navigation +;;; Commentary: +;;; Code: + +(require 'use-package) + +(setq help-window-select t) + +(use-package project + :ensure t + :bind-keymap ("C-c p" . project-prefix-map) + :custom + (project-switch-commands + '((?f "File" project-find-file) + (?d "Dired" project-dired) + (?b "Buffer" project-switch-to-buffer) + (?e "Eshell" project-eshell) + (?m "Magit status" magit-project-status) + (?r "Search" rg-project)))) + +(use-package bookmark + :custom + (bookmark-save-flag 1)) + +(use-package ls-lisp + :ensure nil + :custom + (ls-lisp-use-insert-directory-program nil) + (ls-lisp-dirs-first t)) + +(use-package dired + :defer t + :bind (("C-x C-d" . dired) + ("C-x C-j" . dired-jump)) + :init + (setq-default dired-dwim-target t) + (setq-default dired-listing-switches "-alh") + (setq dired-recursive-deletes 'always) + (setq dired-recursive-copies 'always)) + +(use-package dired-x + :ensure nil + :hook ((dired-mode . dired-omit-mode)) + :config + (setq dired-omit-verbose nil) + ;; hide backup, autosave, *.*~ files + ;; omit mode can be toggled using `C-x M-o' in dired buffer. + (setq dired-omit-files + (concat dired-omit-files "\\|^.DS_Store$\\|^.localized$\\|^.projectile$\\|^.git$"))) + +(use-package ibuffer + :bind ("C-x C-b" . ibuffer) + :commands + ibuffer-auto-mode + ibuffer-switch-to-saved-filter-groups + ibuffer-do-sort-by-alphabetic + :custom + (ibuffer-saved-filter-groups + (quote (("default" + ("org" (mode . org-mode)) + ("go" (mode . go-mode)) + ("nix" (mode . nix-mode)) + ("python" (mode . python-mode)) + ("config" (or + (name . "\\.conf$") + (name . "\\.json$") + (mode . yaml-mode))) + ("scripts" (mode . sh-mode)) + ("documentation" (or + (mode . markdown-mode) + (mode . rst-mode))) + ("dired" (mode . dired-mode)) + ("shell" (mode . eshell-mode)) + ("git" (or + (name . "^\*magit") + (name . "^\magit"))) + ("Emacs" (or + (mode . emacs-lisp-mode) + (name . "^\\*scratch\\*$") + (name . "^\\.emacs") + (name . "^\\*Messages\\*$"))))))) + :init + (add-hook 'ibuffer-mode-hook (lambda () (ibuffer-switch-to-saved-filter-groups "default")))) + +(use-package recentf + :init (recentf-mode 1) + :config + (setq recentf-max-saved-items 500 + recentf-exclude '(".gz" ".xz" ".zip") + recentf-save-file (expand-file-name "var/recentf" user-emacs-directory))) + +(use-package rg + :ensure t + :custom + (rg-group-result t) + (rg-show-columns t) + (rg-align-position-numbers t) + (rg-align-line-number-field-length 3) + (rg-align-column-number-field-length 3) + (rg-align-line-column-separator "#") + (rg-align-position-content-separator "|")) + +(use-package counsel + :diminish counsel-mode + :ensure t + :after ivy + :init (counsel-mode 1) + :bind + (("M-x" . counsel-M-x) + ("C-x C-f" . counsel-find-file) + ("C-x C-r" . counsel-recentf) + ("C-c i " . counsel-imenu) + ("C-c f" . counsel-git) + ("C-c /" . counsel-rg) + ("C-c m" . counsel-mark-ring) + ("C-c V" . counsel-describe-variable) + ("C-c C-l" . counsel-find-library) + ("C-c U" . counsel-unicode-char) + ("C-x r l" . counsel-bookmark)) + :custom + (counsel-find-file-ignore-regexp "\\.git\\|\\.DS_Store\\|\\.localized\\'") + (counsel-find-file-at-point t)) + +(use-package ivy + :ensure t + :diminish ivy-mode + :init (ivy-mode 1) + :custom + (ivy-use-virtual-buffers t) + (ivy-count-format "(%d/%d) ") + (ivy-height 20) + (ivy-use-selectable-prompt t) + :bind (("C-x b" . ivy-switch-buffer) + ("C-s" . swiper))) + +(use-package ivy-rich + :ensure t + :after (ivy) + :config + (ivy-rich-mode 1) + :custom + (ivy-extra-directories '("../" "./")) + (ivy-virtual-abbreviate 'full) + (ivy-rich-switch-buffer-align-virtual-buffer t) + (ivy-rich-path-style 'abbrev)) + +(use-package which-key + :diminish which-key-mode + :ensure t + :config + (which-key-mode)) + +(provide 'my-navigation) +;;; my-navigation.el ends here diff --git a/emacs/init.el b/emacs/init.el index 534f116..7334f48 100644 --- a/emacs/init.el +++ b/emacs/init.el @@ -40,7 +40,7 @@ (require 'my-settings (expand-file-name "custom/my-settings" user-emacs-directory)) (require 'my-ui (expand-file-name "custom/my-ui" user-emacs-directory)) -(require 'fcuny-navigation (expand-file-name "custom/fcuny-navigation" user-emacs-directory)) +(require 'my-navigation (expand-file-name "custom/my-navigation" user-emacs-directory)) (require 'fcuny-edit (expand-file-name "custom/fcuny-edit" user-emacs-directory)) (require 'fcuny-text (expand-file-name "custom/fcuny-text" user-emacs-directory)) (require 'fcuny-git (expand-file-name "custom/fcuny-git" user-emacs-directory)) -- cgit 1.4.1