diff --git a/init.el b/init.el index a45e0d046569a650937a42c55c98ba7221231e47..793448229ffec7f3c8f2e1b8436ae5074b15337d 100644 --- a/init.el +++ b/init.el @@ -53,8 +53,7 @@ (require 'package) (setq package--init-file-ensured t package-enable-at-startup nil - package-archives user/package-mirror - ) + package-archives user/package-mirror) ;; Evaluate the correct package subdirectory of packages. (setq package-user-dir @@ -65,9 +64,7 @@ emacs-major-version version-separator emacs-minor-version))) - (expand-file-name subdir elpa-pack-dir)) - ) - )) + (expand-file-name subdir elpa-pack-dir))))) ;; Load Emacs packages and initialize them. (package-initialize) @@ -76,8 +73,7 @@ (or (package-installed-p 'use-package) (progn (package-refresh-contents) - (package-install 'use-package)) - ) + (package-install 'use-package))) (require 'editor) (require 'completion) diff --git a/lisp/completion.el b/lisp/completion.el index 872e0de1df77532e09197f64bb0a7300adf1aa99..4432bc49b11cde5d823cf0088fb33174a36c698d 100644 --- a/lisp/completion.el +++ b/lisp/completion.el @@ -20,8 +20,7 @@ :defer t :commands (projectile-project-root projectile-project-name - projectile-project-p - ) + projectile-project-p) :init (progn (setq projectile-indexing-method 'alien @@ -33,16 +32,14 @@ (setq projectile-sort-order 'recentf projectile-cache-file user/projectile-cache-file - projectile-known-projects-file user/projectile-known-projects-file) - ) + projectile-known-projects-file user/projectile-known-projects-file)) :config (projectile-mode +1) (setq projectile-project-root-files-bottom-up (append '(".projectile" ; projctiles's root marker ".project" ; doom project marker - ".git") ; Git - ) + ".git")) ; Git ;; This will be filled by other pakages projectile-project-root-files '() projectile-project-root-files-top-down-recurring '("Makefile")) @@ -55,8 +52,7 @@ :bind (("C-c p f" . 'counsel-projectile-find-file) ("C-c p p" . 'counsel-projectile-switch-project) ("C-c p b" . 'counsel-projectile-switch-to-buffer) - ("C-c p k" . 'projectile-kill-buffers)) - ) + ("C-c p k" . 'projectile-kill-buffers))) (use-package ivy :ensure t @@ -67,14 +63,11 @@ (setq ivy-more-chars-alist `((counsel-rg . 1) (counsel-search . 2) - (t . 3)) - ) + (t . 3))) (setq ivy-re-builders-alist `((counsel-rg . ,standard-seaarch-fn) (swiper . ,standard-seaarch-fn) - (swiper-isearch . ,standard-seaarch-fn))) -;; (t . ,alt-search-fn)) ;; Error when use this line - ) + (swiper-isearch . ,standard-seaarch-fn)))) (add-to-list 'user/evil-collection-mode-list 'ivy) :config (setq ivy-sort-max-size 7500) @@ -88,8 +81,7 @@ ivy-use-virtual-buffers nil ivy-virtual-abbreviate 'full ivy-on-del-error-function #'ignore - ivy-use-selectable-prompt t - ) + ivy-use-selectable-prompt t) (global-set-key "\C-s" 'swiper) @@ -103,9 +95,7 @@ :bind (("C-c s s" . 'swiper) ("C-c s p" . 'user/counsel-search-project) - ("C-c s d" . 'user/counsel-search-dir) - ) - ) + ("C-c s d" . 'user/counsel-search-dir))) (use-package counsel :ensure t @@ -138,8 +128,6 @@ :config ;; Don't use ^ (setq ivy-initial-inputs-alist nil) - - ) (use-package counsel-projectile @@ -168,9 +156,7 @@ :config (progn (setq ivy-rich-parse-remote-buffer nil) - (ivy-rich-mode) - ) - ) + (ivy-rich-mode))) (provide 'completion) ;;; completion.el ends here diff --git a/lisp/core-libs.el b/lisp/core-libs.el index d03b0cc01f930e6dd62bde7ff25d4a667c477102..dcd2316e3050c068684fd551b495b8e3d7b7bc7d 100644 --- a/lisp/core-libs.el +++ b/lisp/core-libs.el @@ -11,8 +11,7 @@ (defun load-init-file() "Load init.el." (interactive) - (load-file (concat user-emacs-directory "init.el")) - ) + (load-file (concat user-emacs-directory "init.el"))) (defun open-userconfig-file() "Open userconfig." @@ -25,10 +24,8 @@ If INITIAL-DIRECTORY is non nil start in that directory." (interactive) (require 'counsel) (let* ((default-directory - (or initial-directory (read-directory-name "Start from directory: "))) - ) - (counsel-rg "" default-directory nil "rg: ")) - ) + (or initial-directory (read-directory-name "Start from directory: ")))) + (counsel-rg "" default-directory nil "rg: "))) (defun user/counsel-search-project() "Seraching project with rg." @@ -44,8 +41,7 @@ If INITIAL-DIRECTORY is non nil start in that directory." "Load after everything." (interactive) (setq evil-collection-mode-list nil) - (evil-collection-init user/evil-collection-mode-list) - ) + (evil-collection-init user/evil-collection-mode-list)) (provide 'core-libs) ;;; core-libs.el ends here diff --git a/lisp/init-org.el b/lisp/init-org.el index c9caf40443ec6130a1d5285a6c0835cc016f8e2d..e2c3d9e61d1537f7c9bdaec44c0a02e98bdf7928 100644 --- a/lisp/init-org.el +++ b/lisp/init-org.el @@ -10,8 +10,7 @@ ("\\subsection{%s}" . "\\subsection*{%s}") ("\\subsubsection{%s}" . "\\subsubsection*{%s}") ("\\paragraph{%s}" . "\\paragraph*{%s}") - ("\\subparagraph{%s}" . "\\subparagraph*{%s}")) - ) + ("\\subparagraph{%s}" . "\\subparagraph*{%s}"))) (defvar org-complex-ctexbook-class '("cctexbook" @@ -20,8 +19,7 @@ ("\\chapter{%s}" . "\\chapter*{%s}") ("\\section{%s}" . "\\section*{%s}") ("\\subsection{%s}" . "\\subsection*{%s}") - ("\\subsubsection{%s}" . "\\subsubsection*{%s}")) - ) + ("\\subsubsection{%s}" . "\\subsubsection*{%s}"))) (defvar org-simple-ctexbook-class '("sctexbook" @@ -29,8 +27,7 @@ ("\\chapter{%s}" . "\\chapter*{%s}") ("\\section{%s}" . "\\section*{%s}") ("\\subsection{%s}" . "\\subsection*{%s}") - ("\\subsubsection{%s}" . "\\subsubsection*{%s}")) - ) + ("\\subsubsection{%s}" . "\\subsubsection*{%s}"))) (defvar org-user-latex-class (list org-ctexart-class org-complex-ctexbook-class org-simple-ctexbook-class)) @@ -84,8 +81,7 @@ (make-face 'width-font-face) (set-face-attribute 'width-font-face nil :font "Sarasa Mono SC 12") ;; 13, 14, 16绛変細鍑虹幇涓嶇瓑瀹� (setq buffer-face-mode-face 'width-font-face) - (buffer-face-mode)) - )) + (buffer-face-mode)))) (provide 'init-org) ;;; init-org.el ends here diff --git a/lisp/prog-common.el b/lisp/prog-common.el index 840d77de054301e1abd9b15c6976bf97d854387c..19f6ece19463435ff6289df10c6bea1f19f8f224 100644 --- a/lisp/prog-common.el +++ b/lisp/prog-common.el @@ -14,21 +14,17 @@ :config (setq nox-server-programs user/nox-server-programs) (dolist (hook user/nox-list) - (add-hook hook '(lambda () (nox-ensure))))) - ) - + (add-hook hook '(lambda () (nox-ensure)))))) ;; Use lsp-mode as client ((eq 'lsp-mode user/lsp-client) (use-package lsp-mode :ensure t :init (setq lsp-keymap-prefix "C-c l") - :hook ( - (c-mode . lsp-deferred) - (c++-mode . lsp-deferred) - (python-mode . lsp-deferred) - (lsp-mode . lsp-enable-which-key-integration) - ) + :hook ((c-mode . lsp-deferred) + (c++-mode . lsp-deferred) + (python-mode . lsp-deferred) + (lsp-mode . lsp-enable-which-key-integration)) :config (setq lsp-enable-snippet nil) (setq lsp-modeline-diagnostics-enable nil)