Add nftables-mode

config.el

@@ -147,52 +147,28 @@
   (add-to-list 'org-after-todo-state-change-hook
                (lambda ()
                  (when (equal org-state "DONE")
-                   (org-archive-to-archive-sibling)))))
+                   (org-cut-subtree)))))
 
 (after! org-agenda
   (setq org-agenda-custom-commands
-        '(("d" "Agenda and tasklist for the day"
+        '(("w" "Agenda and tasklist for the week"
            ((agenda "")
-            (todo "TODO"))
-           ((org-agenda-span 'day)
-            (org-agenda-start-day "")
-            (org-deadline-warning-days 0)))
-          ("w" "Agenda and tasklist for the week"
-           ((agenda "")
-            (todo "TODO")
-            (todo "WEEK"))
-           ((org-agenda-start-on-weekday 1)
-            (org-agenda-span 'week)
-            (org-agenda-start-day "")
-            (org-deadline-warning-days 0)))
-          ("p" . "Planning lists")
-          ("pd" "Agenda and tasklist for daily planning"
-           ((agenda "")
-            (todo "WEEK")
-            (todo "TODO"))
-           ((org-agenda-start-on-weekday 1)
-            (org-agenda-span 'week)
-            (org-agenda-start-day "")
-            (org-deadline-warning-days 0)))
-          ("pw" "Agenda and tasklist for weekly planning"
-           ((agenda "")
-            (todo "NEXT")
             (todo "HOLD")
+            (todo "NEXT")
+            (todo "WAIT")
             (todo "WEEK")
             (todo "TODO"))
            ((org-agenda-start-on-weekday 1)
             (org-agenda-span 'fortnight)
             (org-agenda-start-day "")
             (org-deadline-warning-days 0)))
-          ("r" . "Weekly review lists")
+          ("r" "Agenda and tasklist for the weekly review"
-          ("rl" "Tasklist of leftover work"
-           ((todo "TODO")
-            (todo "WEEK")))
-          ("rn" "Agenda and tasklist of upcoming tasks"
            ((agenda "")
-            (todo "WAIT")
+            (todo "HOLD")
             (todo "NEXT")
-            (todo "HOLD"))
+            (todo "WAIT")
+            (todo "WEEK")
+            (todo "TODO"))
            ((org-agenda-start-on-weekday 1)
             (org-agenda-span 'month)
             (org-agenda-start-day "")
@@ -221,6 +197,17 @@
 ;; Additional coniguration for doom modules.
 ;; -----------------------------------------------------------------------------
 
+;; Clangd LSP configuration.
+(after! lsp-clangd
+  (setq lsp-clients-clangd-args
+        '("-j=3"
+          "--background-index"
+          "--clang-tidy"
+          "--completion-style=detailed"
+          "--header-insertion=never"
+          "--header-insertion-decorators=0"))
+  (set-lsp-priority! 'clangd 2))
+
 ;; Podman > docker.
 (after! docker (setq docker-command "podman"))
 (after! dockerfile-mode (setq dockerfile-mode-command "podman"))
@@ -399,6 +386,8 @@
 ;; -----------------------------------------------------------------------------
 
 (setq-default
+ ;; Don't keep dired directories around when navigating.
+ dired-kill-when-opening-new-dired-buffer t
  ;; Standard fill-column width.
  fill-column 100
  ;; Do not use tab characters for indentation.

init.el

@@ -104,6 +104,7 @@
        ;;taskrunner        ; taskrunner for all your projects
        ;;terraform         ; infrastructure as code
        ;;tmux              ; an API for interacting with tmux
+       tree-sitter
        ;;upload            ; map local to remote projects via ssh/ftp
 
        :os
@@ -113,7 +114,7 @@
        :lang
        ;;agda              ; types of types of types of types...
        ;;beancount         ; mind the GAAP
-       (cc +lsp)         ; C > C++ == 1
+       (cc +lsp +tree-sitter); C > C++ == 1
        ;;clojure           ; java with a lisp
        ;;common-lisp       ; if you've seen one lisp, you've seen them all
        ;;coq               ; proofs-as-programs
@@ -155,17 +156,17 @@
        ;;php               ; perl's insecure younger brother
        ;;plantuml          ; diagrams for confusing people more
        ;;purescript        ; javascript, but functional
-       (python +lsp +pyright); beautiful is better than ugly
+       (python +lsp +pyright +tree-sitter); beautiful is better than ugly
        ;;qt                ; the 'cutest' gui framework ever
        ;;racket            ; a DSL for DSLs
        ;;raku              ; the artist formerly known as perl6
        ;;rest              ; Emacs as a REST client
        ;;rst               ; ReST in peace
        ;;(ruby +rails)     ; 1.step {|i| p "Ruby is #{i.even? ? 'love' : 'life'}"}
-       (rust +lsp)       ; Fe2O3.unwrap().unwrap().unwrap().unwrap()
+       (rust +lsp +tree-sitter); Fe2O3.unwrap().unwrap().unwrap().unwrap()
        ;;scala             ; java, but good
        ;;(scheme +guile)   ; a fully conniving family of lisps
-       sh                ; she sells {ba,z,fi}sh shells on the C xor
+       (sh +tree-sitter)    ; she sells {ba,z,fi}sh shells on the C xor
        ;;sml
        ;;solidity          ; do you need a blockchain? No.
        ;;swift             ; who asked for emoji variables?

packages.el

@@ -10,6 +10,7 @@
 ;;(package! some-package)
 (package! deadgrep)
 (package! duplicate-thing)
+(package! nftables-mode)
 (package! p4_16
   :recipe (:local-repo "repos/p4_16-mode"))
 (package! symbol-overlay)