sabancay/vemacs - Change 3GVG5P76N3TR6U2BY66XNDHXWDBF34MWRLWWGOMALRRYC3H7XG7AC

reorganize treesitter-grammar list; configure container management

Created by BAFibzVbBf9zajG92YmeCKAbs6sRw1geBSqjeqxBY5kC on April 14, 2026

3GVG5P76N3TR6U2BY66XNDHXWDBF34MWRLWWGOMALRRYC3H7XG7AC

Dependencies

In channels

main

Change contents

Replacement in programming-setup.org at line 74 [3.1]

B:BD[3.1340] → [4.154:177]

∅:D[4.177] → [3.1361:1554]

B:BD[3.1361] → [3.1361:1554]

B:BD[3.1554] → [2.7157:7338]

∅:D[2.7338] → [3.1730:1837]

B:BD[3.1730] → [3.1730:1837]

B:BD[3.1837] → [2.7339:7430]

∅:D[2.7430] → [3.1926:2019]

B:BD[3.1926] → [3.1926:2019]

B:BD[3.2019] → [2.7431:7690]

∅:D[2.7690] → [3.2198:2316]

B:BD[3.2198] → [3.2198:2316]

B:BD[3.2316] → [2.7691:7780]

∅:D[2.7780] → [3.2403:3628]

B:BD[3.2403] → [3.2403:3628]

B:BD[3.3628] → [4.178:207]

  (use-package treesit
    :mode (("\\.tsx\\'" . tsx-ts-mode))
    :preface
    (defun mp-setup-install-grammars ()
      "Install Tree-sitter grammars if they are absent."
      (interactive)
      (dolist (grammar
                '((css    . ("https://github.com/tree-sitter/tree-sitter-css" "v0.20.0"))
                  (html   . ("https://github.com/tree-sitter/tree-sitter-html" "v0.20.1"))
                  (javascript . ("https://github.com/tree-sitter/tree-sitter-javascript" "v0.20.1" "src"))
                  (json   . ("https://github.com/tree-sitter/tree-sitter-json" "v0.20.2"))
                  (python . ("https://github.com/tree-sitter/tree-sitter-python" "v0.20.4"))
                  (tcl    . "https://github.com/tree-sitter-grammars/tree-sitter-tcl")
  		(toml   . "https://github.com/tree-sitter/tree-sitter-toml")
                  (tsx    . ("https://github.com/tree-sitter/tree-sitter-typescript" "v0.20.3" "tsx/src"))
                  (typescript . ("https://github.com/tree-sitter/tree-sitter-typescript" "v0.20.3" "typescript/src"))
                  (yaml   . ("https://github.com/ikatyang/tree-sitter-yaml" "v0.5.0"))))
        (add-to-list 'treesit-language-source-alist grammar)
    ;; Only install `grammar' if we don't already have it
    ;; installed. However, if you want to *update* a grammar then
    ;; this obviously prevents that from happening.
    (unless (treesit-language-available-p (car grammar))
      (treesit-install-language-grammar (car grammar)))))
    ;; Optional, but recommended. Tree-sitter enabled major modes are
    ;; distinct from their ordinary counterparts.
    ;;
    ;; You can remap major modes with `major-mode-remap-alist'. Note
    ;; that this does *not* extend to hooks! Make sure you migrate them
    ;; also
    (dolist (mapping
             '((python-mode . python-ts-mode)
               (css-mode . css-ts-mode)
               (typescript-mode . typescript-ts-mode)
               (js2-mode . js-ts-mode)
               (bash-mode . bash-ts-mode)
               (css-mode . css-ts-mode)
               (json-mode . json-ts-mode)
               (js-json-mode . json-ts-mode)))
      (add-to-list 'major-mode-remap-alist mapping))
    :config
    (mp-setup-install-grammars)
    ;; Do not forget to customize Combobulate to your liking:
    ;;
    ;;  M-x customize-group RET combobulate RET
    ;;
    (use-package combobulate

[3.1340]

[4.207]

    (use-package treesit
      :mode (("\\.tsx\\'" . tsx-ts-mode))

Replacement in programming-setup.org at line 77 [3.1]

B:BD[4.222] → [4.222:398]

      ;; You can customize Combobulate's key prefix here.
      ;; Note that you may have to restart Emacs for this to take effect!
      (setq combobulate-key-prefix "C-c o")

[4.222]

[4.398]

      (defun mp-setup-install-grammars ()
        "Install Tree-sitter grammars if they are absent."
        (interactive)
        (dolist (grammar
                  '(
                    (tcl . "https://github.com/tree-sitter-grammars/tree-sitter-tcl")
  		  ))
          (add-to-list 'treesit-language-source-alist grammar)
      ;; Only install `grammar' if we don't already have it
      ;; installed. However, if you want to *update* a grammar then
      ;; this obviously prevents that from happening.
      (unless (treesit-language-available-p (car grammar))
        (treesit-install-language-grammar (car grammar)))))

Replacement in programming-setup.org at line 91 [3.1]

B:BD[4.399] → [4.399:435]

      ;; Optional, but recommended.

[4.399]

[4.435]

      ;; Optional, but recommended. Tree-sitter enabled major modes are
      ;; distinct from their ordinary counterparts.
      ;;
      ;; You can remap major modes with `major-mode-remap-alist'. Note
      ;; that this does *not* extend to hooks! Make sure you migrate them
      ;; also
      (dolist (mapping
               '((python-mode . python-ts-mode)
                 (css-mode . css-ts-mode)
                 (typescript-mode . typescript-ts-mode)
                 (js2-mode . js-ts-mode)
                 (bash-mode . bash-ts-mode)
                 (css-mode . css-ts-mode)
                 (json-mode . json-ts-mode)
                 (js-json-mode . json-ts-mode)))
        (add-to-list 'major-mode-remap-alist mapping))
      :config
      (mp-setup-install-grammars)
      ;; Do not forget to customize Combobulate to your liking:
      ;;
      ;;  M-x customize-group RET combobulate RET

Replacement in programming-setup.org at line 113 [3.1]

B:BD[4.444] → [4.444:998]

      ;; You can manually enable Combobulate with `M-x
      ;; combobulate-mode'.
      :hook
      ((python-ts-mode . combobulate-mode)
       (js-ts-mode . combobulate-mode)
       (html-ts-mode . combobulate-mode)
       (css-ts-mode . combobulate-mode)
       (yaml-ts-mode . combobulate-mode)
       (typescript-ts-mode . combobulate-mode)
       (json-ts-mode . combobulate-mode)
       (tsx-ts-mode . combobulate-mode))
      ;; Amend this to the directory where you keep Combobulate's source
      ;; code.
      :load-path ("ve/combobulate")))

[4.444]

[3.3634]

      (use-package combobulate
        :preface
        ;; You can customize Combobulate's key prefix here.
        ;; Note that you may have to restart Emacs for this to take effect!
        (setq combobulate-key-prefix "C-c o")
        ;; Optional, but recommended.
        ;;
        ;; You can manually enable Combobulate with `M-x
        ;; combobulate-mode'.
        :hook
        ((python-ts-mode . combobulate-mode)
         (js-ts-mode . combobulate-mode)
         (html-ts-mode . combobulate-mode)
         (css-ts-mode . combobulate-mode)
         (yaml-ts-mode . combobulate-mode)
         (typescript-ts-mode . combobulate-mode)
         (json-ts-mode . combobulate-mode)
         (tsx-ts-mode . combobulate-mode))
        ;; Amend this to the directory where you keep Combobulate's source
        ;; code.
        :load-path ("ve/combobulate")))

Replacement in programming-setup.org at line 151 [3.1]

B:BD[3.4161] → [4.1196:1261]

          (elisp "https://github.com/Wilfred/tree-sitter-elisp")

[3.4161]

[4.1261]

          (dockerfile . ("https://github.com/camdencheek/tree-sitter-dockerfile"))
  	(elisp "https://github.com/Wilfred/tree-sitter-elisp")

Replacement in programming-setup.org at line 154 [3.1]

B:BD[4.1328] → [4.1328:1556]

          (javascript "https://github.com/tree-sitter/tree-sitter-javascript" "master" "src")
          (json "https://github.com/tree-sitter/tree-sitter-json")
          (java "https://github.com/tree-sitter/tree-sitter-java")

[4.1328]

[3.4161]

  	(java "https://github.com/tree-sitter/tree-sitter-java")
  	(javascript "https://github.com/tree-sitter/tree-sitter-javascript" "master" "src")
          (json "https://github.com/tree-sitter/tree-sitter-json")

Insertion in programming-setup.org at line 213 [3.1]

[4.2580]

[3.4874]

* Containers
#+begin_src emacs-lisp
  (defcustom lemacs-docker-executable 'docker
    "The executable to be used with docker-mode."
    :type '(choice
  	  (const :tag "podman" podman))
    :group 'lemacs)
  (use-package docker
    :defer t
    :ensure t
    :bind ("C-c d" . docker)
    :config
    (pcase lemacs-docker-executable
      ('docker
       (setf docker-command "docker"
  	   docker-compose-command "docker-compose"
  	   docker-container-tramp-method "docker"))
      ('podman
       (setf docker-command "podman"
  	   docker-compose-command "podman-compose"
  	   docker-container-tramp-method "podman"))))
#+end_src

Insertion in programming-setup.org at line 283 [3.1]

[2.8720]

[4.3009]

#+end_src
** TODO Pijul
TODO: The package vc-pijul does not yet exist.
#+begin_src emacs-lisp

Insertion in programming-setup.org at line 290 [3.1]

[4.3019]

[3.5268]

(use-package vc-pijul
    :defer t
    :init (add-to-list 'vc-handled-backends 'Pijul t)
    )