feat(gs/emacs): Add config for common lisp
I will likely want to rip this out of doom at some point, and there are definitely more bindings to be had, but this is a start Change-Id: Ic166edb1f8af142cef57a9402999669dfaea35ba Reviewed-on: https://cl.tvl.fyi/c/depot/+/1330 Tested-by: BuildkiteCI Reviewed-by: glittershark <grfn@gws.fyi>
This commit is contained in:
		
							parent
							
								
									38a262872a
								
							
						
					
					
						commit
						f7f75b6593
					
				
					 2 changed files with 26 additions and 2 deletions
				
			
		| 
						 | 
				
			
			@ -1188,6 +1188,24 @@ If invoked with a prefix ARG eval the expression after inserting it"
 | 
			
		|||
              "c" 'cider-eval-last-sexp-and-replace)
 | 
			
		||||
        "y" 'cider-copy-last-result))
 | 
			
		||||
 | 
			
		||||
(nmap :keymaps 'sly-mode-map
 | 
			
		||||
  "c" (general-key-dispatch 'evil-change
 | 
			
		||||
        "p" (general-key-dispatch 'sly-eval
 | 
			
		||||
              ;; "p" 'eval-sexp-at-point
 | 
			
		||||
              "c" 'sly-pprint-eval-last-expression
 | 
			
		||||
              "d" 'sly-eval-defun
 | 
			
		||||
              ;; "r" 'cider-test-run-test
 | 
			
		||||
              )
 | 
			
		||||
        ;; "x" (general-key-dispatch 'fireplace-eval-context
 | 
			
		||||
        ;;       "x" 'cider-eval-sexp-at-point-in-context
 | 
			
		||||
        ;;       "c" 'cider-eval-last-sexp-in-context
 | 
			
		||||
        ;;       )
 | 
			
		||||
        ;; "!" (general-key-dispatch 'fireplace-replace
 | 
			
		||||
        ;;       "!" 'cider-eval-current-sexp-and-replace
 | 
			
		||||
        ;;       "c" 'cider-eval-last-sexp-and-replace)
 | 
			
		||||
        ;; "y" 'cider-copy-last-result
 | 
			
		||||
        ))
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
;; >) ; slurp forward
 | 
			
		||||
;; <) ; barf forward
 | 
			
		||||
| 
						 | 
				
			
			@ -1387,4 +1405,10 @@ If invoked with a prefix ARG eval the expression after inserting it"
 | 
			
		|||
   :n "K"   #'lsp-describe-thing-at-point
 | 
			
		||||
   :n "g r" #'lsp-rename
 | 
			
		||||
   (:localleader
 | 
			
		||||
     :n "a" #'lsp-execute-code-action)))
 | 
			
		||||
    :n "a" #'lsp-execute-code-action))
 | 
			
		||||
 | 
			
		||||
 (:map sly-mode-map
 | 
			
		||||
  :n "g \\" #'sly-mrepl
 | 
			
		||||
  :n "g d" #'sly-edit-definition
 | 
			
		||||
  :n "K" #'sly-documentation
 | 
			
		||||
  :n "g SPC" #'sly-eval-buffer))
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
| 
						 | 
				
			
			@ -85,7 +85,7 @@
 | 
			
		|||
       ;;assembly          ; assembly for fun or debugging
 | 
			
		||||
       cc                ; C/C++/Obj-C madness
 | 
			
		||||
       clojure           ; java with a lisp
 | 
			
		||||
       ;;common-lisp       ; if you've seen one lisp, you've seen them all
 | 
			
		||||
       common-lisp       ; if you've seen one lisp, you've seen them all
 | 
			
		||||
       ; coq               ; proofs-as-programs
 | 
			
		||||
       ;;crystal           ; ruby at the speed of c
 | 
			
		||||
       ;;csharp            ; unity, .NET, and mono shenanigans
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
		Loading…
	
	Add table
		Add a link
		
	
		Reference in a new issue