diff options
Diffstat (limited to 'shoshimacs.org')
| -rw-r--r-- | shoshimacs.org | 123 |
1 files changed, 104 insertions, 19 deletions
diff --git a/shoshimacs.org b/shoshimacs.org index 65e4590..a7c35ba 100644 --- a/shoshimacs.org +++ b/shoshimacs.org @@ -545,7 +545,7 @@ this is implemented with the ~vertico-directory~ extension. (define-key vertico-map (kbd "M-j") #'vertico-quick-insert) #+end_src -** corfu +** COMMENT corfu #+begin_src emacs-lisp (package-install 'corfu) @@ -562,6 +562,29 @@ this is implemented with the ~vertico-directory~ extension. (unless (display-graphic-p) (corfu-terminal-mode +1)) #+end_src +** company - complete anywhere + +Company is a modular completion framework. Modules for retrieving completion +candidates are called backends, modules for displaying them are frontends. + +Company comes with many backends, e.g. `company-etags'. These are +distributed in separate files and can be used individually. + +Enable `company-mode' in all buffers with M-x global-company-mode. For +further information look at the documentation for `company-mode' (C-h f +company-mode RET). + +#+begin_src emacs-lisp + (package-install 'company) + + (setq company-minimum-prefix-length 2 + company-idle-delay 0.3) ;; default is 0.2 + + (add-hook 'after-init-hook 'global-company-mode) +#+end_src + + + ** which-key which-key is an excellent package that helps provide guide posts for command @@ -590,7 +613,7 @@ which has a command to show prefix key continuations. :PROPERTIES: :header-args:emacs-lisp: :noweb-ref editing :noweb-sep "\n\n" :results silent :END: -** [[info:emacs#Matching][electric pair mode]] +** COMMENT [[info:emacs#Matching][electric pair mode]] I've been using smartparens -> (bookmark-jump "smartparens package") in my main config. electric pair mode does some of what smartparens does out of @@ -601,6 +624,18 @@ config might get what i want with vanilla built ins. #+begin_src emacs-lisp (electric-pair-mode) #+end_src +** smartparens + +Going back to smartparens for some of the paredit behavior I want, plus +the paren balancing. We'll see how it goes + +#+begin_src emacs-lisp + (package-install 'smartparens) + (require 'smartparens-config) + (smartparens-global-mode 1) + ;(sp-local-pair 'sly-mrepl-mode "'" nil :actions nil) + (sp-local-pair 'slime-repl-mode "'" nil :actions nil) +#+end_src ** markdown mode #+begin_src emacs-lisp @@ -665,6 +700,13 @@ There are many settings for how it presents available, but I usually just set them on the fly, depending on the presentation, rather than in my main config. +*** Structure Templates + #+begin_src emacs-lisp + (add-to-list 'org-structure-template-alist '("se" . "src emacs-lisp")) + (add-to-list 'org-structure-template-alist '("sr" . "src ruby")) + (add-to-list 'org-structure-template-alist '("ss" . "src shell")) + #+end_src + ** recentf-mode this tracks recently operated on files (by default) and enables quick selection @@ -699,6 +741,12 @@ I primarily use SBCL, so I set it as the ~inferior-lisp-program~ (setq inferior-lisp-program "sbcl") #+end_src +*** COMMENT SLY + +#+begin_src emacs-lisp + (package-install 'sly) +#+end_src + *** Slime The ~slime~ package v2.26.1 in the nongnu repo seems to have an issue with emacs 28.1 (?) so I'm installing it from source. @@ -713,6 +761,7 @@ emacs 28.1 (?) so I'm installing it from source. (format "git clone %s %s" slime-repo slime-src-dir))) (add-to-list 'load-path slime-src-dir) + (require 'slime-autoloads) #+end_src There is a command ~slime-info~ to read the locally built manual file, @@ -726,13 +775,31 @@ but i need to ensure it is built: (shell-command "make slime.info" "*slime-make-info*"))) #+end_src -_SLIME CONTRIBS_ +**** Slime company + +Company backend for slime + +#+begin_src emacs-lisp + (defvar slime-company-repo "https://github.com/anwyn/slime-company") + (defvar slime-company-src-dir (expand-file-name "~/src/slime-company/")) + + (unless (file-directory-p slime-company-src-dir) + (shell-command + (format "git clone %s %s" slime-company-repo slime-company-src-dir))) + + (add-to-list 'load-path slime-company-src-dir) + (setq slime-company-completion 'fuzzy + slime-company-display-arglist 1) +#+end_src + +**** SLIME CONTRIBS #+name: slime-contribs #+begin_src emacs-lisp (setq slime-contribs '( slime-fancy ;; default value, includes many fundamental contribs + slime-company slime-mrepl inferior-slime slime-fuzzy @@ -744,10 +811,20 @@ _SLIME CONTRIBS_ slime-quicklisp )) - (require 'slime-autoloads) (slime-setup) #+end_src +Slime Presentations + +#+begin_src emacs-lisp + (defun my-slime-return (_) + "Function to advise `slime-repl-return' to make <RET> inspect the presentation at point." + (when (slime-presentation-around-or-before-point-p) + (slime-inspect-presentation-at-point (point)))) + + (advice-add 'slime-repl-return :before #'my-slime-return) +#+end_src + ** Javascript #+begin_src emacs-lisp @@ -786,7 +863,10 @@ I prefer pry when its available, and it generally is on my system: (setq inf-ruby-default-implementation "pry")) #+end_src -*** ruby-end +*** COMMENT ruby-end + +automatically inserts ~end~ in ruby mode for blocks that need it. conflicts/doubles +with smartparens, so its currently off. #+begin_src (package-install 'ruby-end) @@ -902,7 +982,7 @@ Emacs MultiMedia System. erc-hide-list '("JOIN" "PART" "QUIT")) #+end_src -** nov.el major mode for reading EPUBs +** COMMENT nov.el major mode for reading EPUBs #+name: install-nov.el #+begin_src emacs-lisp @@ -1157,19 +1237,24 @@ for theme development. *** telephone line #+begin_src emacs-lisp -(setq telephone-line-lhs - '((evil . (telephone-line-evil-tag-segment)) - (accent . (telephone-line-vc-segment - telephone-line-erc-modified-channels-segment - telephone-line-process-segment)) - (nil . (telephone-line-minor-mode-segment - telephone-line-buffer-segment)))) -(setq telephone-line-rhs - '((nil . (telephone-line-misc-info-segment)) - (accent . (telephone-line-major-mode-segment)) - (evil . (telephone-line-airline-position-segment)))) - -(telephone-line-mode t) + (setq telephone-line-lhs + '((evil . (telephone-line-evil-tag-segment)) + (accent . (telephone-line-vc-segment + telephone-line-erc-modified-channels-segment + telephone-line-process-segment)) + (nil . ( + ;; telephone-line-minor-mode-segment + telephone-line-buffer-segment)))) + (setq telephone-line-rhs + '((nil . (telephone-line-misc-info-segment + telephone-line-flymake-segment)) + (accent . (telephone-line-major-mode-segment)) + (evil . (telephone-line-airline-position-segment)))) + + (set-face-background 'telephone-line-evil-normal "deep pink") + (set-face-background 'telephone-line-evil-insert "Dark Turquoise") + + (telephone-line-mode t) #+end_src ** SVG Screenshot |