conf

bindings.el

@@ -416,6 +416,10 @@
  "s-M-]" #'sp-forward-sexp
  "s-M-{" #'sp-backward-up-sexp
  "s-M-}" #'sp-down-sexp
+ "s-M-S-<left>" #'sp-backward-sexp
+ "s-M-S-<right>" #'sp-forward-sexp
+ "s-M-S-<up>" #'sp-backward-up-sexp
+ "s-M-S-<down>" #'sp-down-sexp
  "s-(" #'sp-wrap-round
  "s-)" #'sp-unwrap-sexp
  "s-[" #'sp-wrap-square

config.el

@@ -27,7 +27,9 @@
 ;; - add major mode icon
 (after! doom-modeline
   (setq doom-modeline-persp-name t
-        doom-modeline-major-mode-icon t))
+        doom-modeline-major-mode-icon t)
+  (setq doom-modeline-total-line-number t))
+
 
 ;; set default frame size on launch
 (setq default-frame-alist '( (left . 0) (top . 0) (height . 48) (width . 160) ))
@@ -123,7 +125,7 @@
 	"s-M-<left>" 'centaur-tabs-backward))
 
 ;; use kitty for terminal-here
-(setq terminal-here-mac-terminal-command '("kitty"))
+(setq terminal-here-mac-terminal-command '("kitty" "@" "launch" "--type" "tab"))
 
 ;; set project paths and ignore buffers
 (setq projectile-project-search-path '(("~/Source" . 2)))
@@ -147,7 +149,7 @@
 ;; better completions for sly
 (after! sly
   (setq sly-lisp-implementations
-      '((sbcl ("sbcl" "--dynamic-space-size" "4000"))
+      '((sbcl ("sbcl" "--dynamic-space-size" "10000"))
         (ciel ("sbcl" "--core" "/Users/emenel/quicklisp/local-projects/CIEL/ciel-core" "--eval" "(in-package :ciel-user)" "--dynamic-space-size" "2600"))))
   (setq sly-default-lisp 'sbcl)
   (setq sly-complete-symbol-function 'sly-flex-completions))

init.el

@@ -158,7 +158,7 @@
        (org +pretty)               ; organize your plain life in plain text
        php               ; perl's insecure younger brother
        ;;plantuml          ; diagrams for confusing people more
-       purescript        ; javascript, but functional
+       ;; purescript        ; javascript, but functional
        (python +lsp +tree-sitter)            ; beautiful is better than ugly
        qt                ; the 'cutest' gui framework ever
        (racket +lsp)            ; a DSL for DSLs
@@ -166,7 +166,7 @@
        ;;rest              ; Emacs as a REST client
        ;;rst               ; ReST in peace
        ;;(ruby +rails)     ; 1.step {|i| p "Ruby is #{i.even? ? 'love' : 'life'}"}
-       (rust +lsp +tree-sitter)       ; Fe2O3.unwrap().unwrap().unwrap().unwrap()
+       ;; (rust +lsp +tree-sitter)       ; Fe2O3.unwrap().unwrap().unwrap().unwrap()
        ;;scala             ; java, but good
        (scheme +guile +chez)   ; a fully conniving family of lisps
        sh                ; she sells {ba,z,fi}sh shells on the C xor

modules/completion/corfu/packages.el

@@ -1,14 +1,14 @@
 ;; -*- no-byte-compile: t; -*-
 ;;; completion/corfu/packages.el
 
-(package! corfu :recipe (:files ("*.el" "extensions/*.el")) :pin "a4f003605bc712952e5f2fc27d87730c312fdbeb")
-(package! cape :pin "5b28cd43f2efa19dbf5053f164cce622a4b5bdae")
+(package! corfu)
+(package! cape)
 (when (modulep! +icons)
-  (package! svg-lib :pin "b2a168482f85a308a4ab95c03e3c2bd71981e166")
-  (package! kind-icon :pin "b0fb83be6ff6837446274e44e799ade836854a39"))
+  (package! svg-lib)
+  (package! kind-icon))
 (when (modulep! +orderless)
-  (package! orderless :pin "e6784026717a8a6a7dcd0bf31fd3414f148c542e"))
+  (package! orderless))
 (when (modulep! :os tty)
-  (package! corfu-terminal :pin "5ce4c11b8efd4d2fd1b404b9422bb85b05476da0"))
+  (package! corfu-terminal))
 (when (modulep! :editor snippets)
-  (package! yasnippet-capf :pin "40654214db7a44db3a99321447632b43a10fae57"))
+  (package! yasnippet-capf))

packages.el

@@ -11,8 +11,8 @@
 (unpin! sly)
 (unpin! racket-mode)
 (unpin! lsp-mode)
-(unpin! better-jumper)
-(unpin! pcre2el)
+;; (unpin! better-jumper)
+;; (unpin! pcre2el)
 (unpin! consult)
 (unpin! vertico)
 (unpin! embark)