1 Commits

Author SHA1 Message Date
Joe Frikker bbec58acba wip 2026-06-18 11:08:34 -04:00
3 changed files with 111 additions and 177 deletions
Generated
+9 -9
View File
@@ -25,11 +25,11 @@
] ]
}, },
"locked": { "locked": {
"lastModified": 1782233665, "lastModified": 1779969295,
"narHash": "sha256-h/xOtrByoA/Ak1lWHn0O1lVZz4qWYbwOSLQ8YSwQO0I=", "narHash": "sha256-HwIJ3tOcwSMiV75L7KqJXciXR9UfT+d7rwOZMX7cTnA=",
"owner": "nix-community", "owner": "nix-community",
"repo": "home-manager", "repo": "home-manager",
"rev": "062581938b4a378a82dfbb294b494808157153a1", "rev": "61e2c9659324181e0f0ed911958c536333b1d4f6",
"type": "github" "type": "github"
}, },
"original": { "original": {
@@ -65,11 +65,11 @@
] ]
}, },
"locked": { "locked": {
"lastModified": 1782030356, "lastModified": 1779604987,
"narHash": "sha256-h4WpMr455AfRub0FXBaon6Vcpe0waUyJ4GivIW6oyd4=", "narHash": "sha256-ZQ5z+fVhxYKtIFwtqGp5O0PD84BM1riASvqDaN5Xs+s=",
"owner": "nix-community", "owner": "nix-community",
"repo": "nix-index-database", "repo": "nix-index-database",
"rev": "3017088b49efd404f78e3b104f553b97e4af786b", "rev": "8fba98c80b48fa013820e0163c5096922fea4ddd",
"type": "github" "type": "github"
}, },
"original": { "original": {
@@ -80,11 +80,11 @@
}, },
"nixpkgs": { "nixpkgs": {
"locked": { "locked": {
"lastModified": 1781577229, "lastModified": 1779560665,
"narHash": "sha256-lrp67w8AulE9Ks53n27I45ADSzbOCn4H+CNW1Ck8B+8=", "narHash": "sha256-tpyBcxPpcQb8ukyNF7DoCwfSY3VPsxHoYwj00Cayv5o=",
"owner": "nixos", "owner": "nixos",
"repo": "nixpkgs", "repo": "nixpkgs",
"rev": "567a49d1913ce81ac6e9582e3553dd90a955875f", "rev": "64c08a7ca051951c8eae34e3e3cb1e202fe36786",
"type": "github" "type": "github"
}, },
"original": { "original": {
+3 -5
View File
@@ -41,7 +41,7 @@
''; '';
}; };
in { in {
homeConfigurations.redbook = homeConfigurations.shibumi =
let pkgs = import nixpkgs { system = "aarch64-darwin"; config.allowUnfree = true; }; let pkgs = import nixpkgs { system = "aarch64-darwin"; config.allowUnfree = true; };
modules = modules-for-system pkgs; modules = modules-for-system pkgs;
in home-manager.lib.homeManagerConfiguration { in home-manager.lib.homeManagerConfiguration {
@@ -50,16 +50,14 @@
modules = modules =
[ [
nix-index-database.homeModules.default nix-index-database.homeModules.default
"${modules}/base.nix" "${modules}"
"${modules}/desktop.nix"
"${modules}/redbook.nix"
"${modules}/redbook-desktop.nix"
] ++ ] ++
[{ [{
home.stateVersion = "22.05"; home.stateVersion = "22.05";
home.username = "jfrikker"; home.username = "jfrikker";
home.homeDirectory = "/Users/jfrikker"; home.homeDirectory = "/Users/jfrikker";
home.packages = [ pkgs.pinentry_mac ]; home.packages = [ pkgs.pinentry_mac ];
jfrikker.desktop.enable = true;
}]; }];
extraSpecialArgs = { kube = kube.packages.aarch64-darwin.default; }; extraSpecialArgs = { kube = kube.packages.aarch64-darwin.default; };
+99 -163
View File
@@ -1,36 +1,32 @@
#+PROPERTY: header-args :mkdirp yes #+PROPERTY: header-args :mkdirp yes
#+PROPERTY: header-args:elisp :lexical t #+PROPERTY: header-args:elisp :lexical t
* Categories * Base
#+BEGIN_SRC nix :tangle target/base.nix #+BEGIN_SRC nix :tangle target/default.nix
{lib, ...}: { {
imports = lib.filter imports = [
(n: lib.strings.hasSuffix ".nix" n) ./base_options.nix
(lib.filesystem.listFilesRecursive ./base); ./sbcl.nix
./crypto.nix
./rust-reimpls.nix
./ledger.nix
./nil.nix
./magic-wormhole.nix
./desktop-packages.nix
./shibumi.nix
./slack.nix
];
} }
#+END_SRC #+END_SRC
#+BEGIN_SRC nix :tangle target/desktop.nix #+BEGIN_SRC nix :tangle target/base_options.nix
{lib, ...}: { {lib, ...}:
imports = lib.filter with lib;
(n: lib.strings.hasSuffix ".nix" n) {
(lib.filesystem.listFilesRecursive ./desktop); options = {
} jfrikker.desktop.enable = mkEnableOption "desktop tools";
#+END_SRC jfrikker.shibumi.enable = mkEnableOption "shibumi-specific tools";
};
#+BEGIN_SRC nix :tangle target/redbook.nix
{lib, ...}: {
imports = lib.filter
(n: lib.strings.hasSuffix ".nix" n)
(lib.filesystem.listFilesRecursive ./redbook);
}
#+END_SRC
#+BEGIN_SRC nix :tangle target/redbook-desktop.nix
{lib, ...}: {
imports = lib.filter
(n: lib.strings.hasSuffix ".nix" n)
(lib.filesystem.listFilesRecursive ./redbook-desktop);
} }
#+END_SRC #+END_SRC
@@ -45,7 +41,7 @@ in a ~nix~ devshell I think I'd also like to use it for scripting / exploratory
so I'm installing it globally with a useful set of libraries. I should curate this somewhat so I'm installing it globally with a useful set of libraries. I should curate this somewhat
carefully so it doesn't get carried away... carefully so it doesn't get carried away...
#+BEGIN_SRC nix :tangle target/base/sbcl.nix #+BEGIN_SRC nix :tangle target/sbcl.nix
{pkgs, ...}: {pkgs, ...}:
{ {
home.packages = with pkgs; [ home.packages = with pkgs; [
@@ -96,7 +92,7 @@ the name implies, allows generating and storing ~age~ keys on a Yubikey. ~rage~
~age~ when using ~age.el~, because it supports ~pinentry~. That allows it to prompt for yubikey pins ~age~ when using ~age.el~, because it supports ~pinentry~. That allows it to prompt for yubikey pins
using a dialog, rather than a command line prompt. using a dialog, rather than a command line prompt.
#+BEGIN_SRC nix :tangle target/base/crypto.nix #+BEGIN_SRC nix :tangle target/crypto.nix
{pkgs, ...}: {pkgs, ...}:
{ {
home.packages = with pkgs; [ home.packages = with pkgs; [
@@ -116,7 +112,7 @@ tools. They boost better speed, or simply more streamlined features.
| ~ripgrep~ | ~grep~ | | ~ripgrep~ | ~grep~ |
| ~xh~ | ~curl~ | | ~xh~ | ~curl~ |
#+BEGIN_SRC nix :tangle target/base/rust-reimpls.nix #+BEGIN_SRC nix :tangle target/rust-reimpls.nix
{pkgs, ...}: {pkgs, ...}:
{ {
home.packages = with pkgs; [ home.packages = with pkgs; [
@@ -131,7 +127,7 @@ tools. They boost better speed, or simply more streamlined features.
[[https://ledger-cli.org/][~ledger~]] is how I manage my budget. It's a plain-text accounting tool that's really awesome. [[https://ledger-cli.org/][~ledger~]] is how I manage my budget. It's a plain-text accounting tool that's really awesome.
#+BEGIN_SRC nix :tangle target/base/ledger.nix #+BEGIN_SRC nix :tangle target/ledger.nix
{pkgs, ...}: {pkgs, ...}:
{ {
home.packages = with pkgs; [ home.packages = with pkgs; [
@@ -142,7 +138,7 @@ tools. They boost better speed, or simply more streamlined features.
~nil~ is an LSP server for nix files. ~nil~ is an LSP server for nix files.
#+BEGIN_SRC nix :tangle target/base/nil.nix #+BEGIN_SRC nix :tangle target/nil.nix
{pkgs, ...}: {pkgs, ...}:
{ {
home.packages = with pkgs; [ home.packages = with pkgs; [
@@ -155,57 +151,64 @@ tools. They boost better speed, or simply more streamlined features.
computers in the world, assuming that you have an out-of-band way to communicate a passphrase computers in the world, assuming that you have an out-of-band way to communicate a passphrase
between them. Once installed, the actual command is ~wormhole~. between them. Once installed, the actual command is ~wormhole~.
#+begin_src nix :tangle target/base/magic-wormhole.nix #+begin_src nix :tangle target/magic-wormhole.nix
{pkgs, ...}: {pkgs, ...}:
{ {
home.packages = with pkgs; [ home.packages = with pkgs; [
magic-wormhole magic-wormhole
]; ];
} }
#+end_src #+end_src
These are the other programs I have installed globally. A few (like ~awscli~, ~mysql-client~, etc.) These are the other programs I have installed globally. A few (like ~awscli~, ~mysql-client~, etc.)
are still Redbook-specific; ideally I'd find another way to install them. are still Shibumi-specific; ideally I'd find another way to install them.
#+BEGIN_SRC nix :tangle target/redbook/other-packages.nix #+BEGIN_SRC nix :tangle target/shibumi.nix
{pkgs, kube, ...}: {lib, pkgs, kube, config, ...}:
{ {
home.packages = with pkgs; [ config = lib.mkIf config.jfrikker.shibumi.enable {
postgresql home.packages = with pkgs; [
openssh aws-iam-authenticator
]; awscli2
kube
fonts.fontconfig.enable = true; kubectl
mariadb.client
openssh
];
};
} }
#+END_SRC #+END_SRC
These programs require a full desktop environment: These programs require a full desktop environment:
#+BEGIN_SRC nix :tangle target/desktop/desktop-packages.nix #+BEGIN_SRC nix :tangle target/desktop-packages.nix
{pkgs, ...}: {lib, pkgs, config, ...}:
{ {
home.packages = with pkgs; [ config = lib.mkIf config.jfrikker.desktop.enable {
google-chrome home.packages = with pkgs; [
nerd-fonts.jetbrains-mono google-chrome
nerd-fonts.symbols-only nerd-fonts.jetbrains-mono
(iosevka-bin.override { variant = "Aile"; }) (iosevka-bin.override { variant = "Aile"; })
(iosevka-bin.override { variant = "Etoile"; }) (iosevka-bin.override { variant = "Etoile"; })
(iosevka-bin.override { variant = "SGr-IosevkaTerm"; }) (iosevka-bin.override { variant = "SGr-IosevkaTerm"; })
keymapp keymapp
proton-pass proton-pass
wireshark wireshark
]; ];
fonts.fontconfig.enable = true;
};
} }
#+END_SRC #+END_SRC
#+BEGIN_SRC nix :tangle target/redbook-desktop/desktop-packages.nix #+BEGIN_SRC nix :tangle target/slack.nix
{pkgs, ...}: {lib, pkgs, config, ...}:
{ {
home.packages = with pkgs; [ config = lib.mkIf (config.jfrikker.shibumi.enable && config.jfrikker.desktop.enable) {
linear home.packages = with pkgs; [
slack slack
teams ];
]; };
} }
#+END_SRC #+END_SRC
@@ -312,8 +315,7 @@ We all know what ~git~ does.
programs.git = { programs.git = {
enable = true; enable = true;
settings.user.name = "Joe Frikker"; settings.user.name = "Joe Frikker";
settings.user.email = "joe@redbookcattle.com"; settings.user.email = "joe.frikker@shibumi.com";
settings.github.user = "joe@redbookcattle.com";
}; };
programs.delta = { programs.delta = {
@@ -913,7 +915,6 @@ Use variable-width fonts in text buffers. ~mixed-pitch-mode~ keeps most code blo
(add-hook 'yaml-ts-mode-hook 'no-mixed-pitch) (add-hook 'yaml-ts-mode-hook 'no-mixed-pitch)
(add-hook 'mhtml-mode 'no-mixed-pitch) (add-hook 'mhtml-mode 'no-mixed-pitch)
(add-hook 'nxml-mode 'no-mixed-pitch)
#+END_SRC #+END_SRC
A basic ace-window setup. Allows switching between windows quickly (although avy can do the same...). A basic ace-window setup. Allows switching between windows quickly (although avy can do the same...).
@@ -985,23 +986,6 @@ windows. I place windows in the bottom or on the right mostly depending on how w
content to be. content to be.
#+BEGIN_SRC elisp #+BEGIN_SRC elisp
(defun jf/100-px-window (window)
(let* ((desired (min (/ (frame-width) 2) 101))
(current (window-width window))
(delta (- desired current)))
(window-resize window delta :horizontal t)))
(defun jf/enforce-right-side-heights (win)
(let ((slot-heights '((-1 . 10)))
(parent (window-parent win)))
(when parent
(let ((child (window-child parent)))
(while child
(when-let* (((eq (window-parameter child 'window-side) 'right))
(height (alist-get (window-parameter child 'window-slot) slot-heights)))
(window-resize child (- height (window-height child))))
(setq child (window-next-sibling child)))))))
(setq display-buffer-alist (setq display-buffer-alist
'(((or "\\*Flymake diagnostics .*" '(((or "\\*Flymake diagnostics .*"
"\\*Embark Export: .*" "\\*Embark Export: .*"
@@ -1014,8 +998,7 @@ content to be.
"\\*EGLOT connections\\*" "\\*EGLOT connections\\*"
"\\*trace-output\\*" "\\*trace-output\\*"
"\\*occur\\*" "\\*occur\\*"
".*eshell\\*" ".*eshell\\*")
"\\*SQL: .*")
(display-buffer-in-side-window) (display-buffer-in-side-window)
(side . bottom) (side . bottom)
(slot . 0) (slot . 0)
@@ -1025,28 +1008,25 @@ content to be.
((or "magit: *" ((or "magit: *"
"magit-revision: .*" "magit-revision: .*"
"magit-log*" "magit-log*"
"\\*eldoc\\*"
"\\*Help\\*" "\\*Help\\*"
"\\*rustfmt\\*" "\\*rustfmt\\*"
"\\*slack: .*" "\\*slack: .*"
"\\*forge: .*" "\\*forge: .*"
"new-pullreq" "new-pullreq"
"\\*claude:.*" "\\*claude:.*"
"\\*Man .*" "\\*Man .*")
"\\*List .*")
(display-buffer-reuse-window display-buffer-in-side-window) (display-buffer-reuse-window display-buffer-in-side-window)
(side . right) (side . right)
(slot . 0) (slot . 0)
(window-width . jf/100-px-window) (window-width . 0.5)
(window-height . jf/enforce-right-side-heights)
(window-parameters (no-delete-other-windows . t) (window-parameters (no-delete-other-windows . t)
(no-other-window . t))) (no-other-window . t)))
((or "\\*Embark Actions\\*" ("\\*Embark Actions\\*"
"\\*eldoc\\*")
(display-buffer-in-side-window) (display-buffer-in-side-window)
(side . right) (side . right)
(slot . -1) (slot . -1)
(window-width . jf/100-px-window) (window-width . 0.5)
(window-height . jf/enforce-right-side-heights)
(window-parameters (no-delete-other-windows . t) (window-parameters (no-delete-other-windows . t)
(no-other-window . t))))) (no-other-window . t)))))
@@ -1072,11 +1052,9 @@ This configuration affects general text editing, across all modes. First, some p
avy avy
edit-indirect edit-indirect
embark embark
format-all evil
god-mode evil-collection
# evil evil-org
# evil-collection
# evil-org
string-inflection string-inflection
]; ];
extraConfig = builtins.readFile ./emacs-editing.el; extraConfig = builtins.readFile ./emacs-editing.el;
@@ -1096,32 +1074,17 @@ cancel them more frequently). In the end, I opted for Devil mode. It avoids modi
its own devil-mode-only repeat maps that don't interfere when using normal modifier key sequences. its own devil-mode-only repeat maps that don't interfere when using normal modifier key sequences.
#+BEGIN_SRC elisp #+BEGIN_SRC elisp
;; (setopt evil-want-keybinding nil) (setopt evil-want-keybinding nil)
;; (require 'evil) (require 'evil)
;; (evil-mode 1) (evil-mode 1)
;; (require 'evil-collection) (require 'evil-collection)
;; (evil-collection-init) (evil-collection-init)
;; (require 'evil-org) (require 'evil-org)
;; (add-hook 'org-mode-hook 'evil-org-mode) (add-hook 'org-mode-hook 'evil-org-mode)
;; (evil-org-set-key-theme '(navigation insert textobjects additional calendar)) (evil-org-set-key-theme '(navigation insert textobjects additional calendar))
;; (require 'evil-org-agenda) (require 'evil-org-agenda)
;; (evil-org-agenda-set-keys) (evil-org-agenda-set-keys)
(require 'god-mode)
(require 'which-key)
(bind-keys :map god-local-mode-map
("i" . (lambda () (interactive) (god-mode-all -1)))
("z" . repeat))
(bind-keys ("<escape>" . (lambda () (interactive) (god-mode-all 1))))
(defun my-god-mode-update-cursor-type ()
(setq cursor-type (cond
(org-present-mode nil)
((or (and (featurep 'god-mode) god-local-mode) buffer-read-only) 'box)
(t 'bar))))
(add-hook 'post-command-hook 'my-god-mode-update-cursor-type)
(which-key-enable-god-mode-support)
#+END_SRC #+END_SRC
Avy allows jumping to any place on the screen with just a few keystrokes. I've stolen most of these Avy allows jumping to any place on the screen with just a few keystrokes. I've stolen most of these
@@ -1179,34 +1142,6 @@ Just "silently" wrap when searching at the bottom of a document.
(bind-keys ("C-x 4 n" . edit-indirect-region)) (bind-keys ("C-x 4 n" . edit-indirect-region))
#+END_SRC #+END_SRC
** Workflow
:PROPERTIES:
:header-args:elisp: :tangle target/desktop/emacs-workflow.el
:END:
#+BEGIN_SRC nix :tangle target/desktop/emacs-workflow.nix
{
programs.emacs = {
enable = true;
extraPackages = epkgs: with epkgs; [
bufferlo
];
extraConfig = builtins.readFile ./emacs-workflow.el;
};
}
#+END_SRC
#+BEGIN_SRC elisp
(bufferlo-mode)
(with-eval-after-load 'bufferlo
(setq mode-line-misc-info
(assq-delete-all 'bufferlo-mode mode-line-misc-info)))
(bind-keys
("s-b" . bufferlo-switch-to-buffer))
#+END_SRC
** Language Support ** Language Support
:PROPERTIES: :PROPERTIES:
:header-args:elisp: :tangle target/desktop/emacs-languages.el :header-args:elisp: :tangle target/desktop/emacs-languages.el
@@ -1223,11 +1158,11 @@ Just "silently" wrap when searching at the bottom of a document.
jq-mode jq-mode
(lispy.overrideAttrs { (lispy.overrideAttrs {
packageRequires = [ packageRequires = [
ace-window iedit swiper zoutline hydra ace-window iedit swiper zoutline
]; ];
ignoreCompilationError = true; ignoreCompilationError = true;
}) })
# lispyville lispyville
lua-mode lua-mode
nix-mode nix-mode
rust-mode rust-mode
@@ -1408,15 +1343,15 @@ for completion. That makes it really annoying to use; don't use yasnippet with e
(setopt lispy-compat '(god-mode edebug)) (setopt lispy-compat '(god-mode edebug))
(add-hook 'emacs-lisp-mode-hook (lambda () (lispy-mode 1))) (add-hook 'emacs-lisp-mode-hook (lambda () (lispy-mode 1)))
(add-hook 'lisp-mode-hook (lambda () (lispy-mode 1))) (add-hook 'lisp-mode-hook (lambda () (lispy-mode 1)))
;; (with-eval-after-load 'lispy (with-eval-after-load 'lispy
;; (require 'lispyville) (require 'lispyville)
;; (add-hook 'lispy-mode-hook #'lispyville-mode) (add-hook 'lispy-mode-hook #'lispyville-mode)
;; (bind-keys :map lispy-mode-map (bind-keys :map lispy-mode-map
;; ("i" . (lambda () ("i" . (lambda ()
;; (interactive) (interactive)
;; (if (and (featurep 'god-mode) god-global-mode) (if (and (featurep 'god-mode) god-global-mode)
;; (god-mode-all -1) (god-mode-all -1)
;; (special-lispy-tab)))))) (special-lispy-tab))))))
#+END_SRC #+END_SRC
*** Typescript *** Typescript
@@ -1425,7 +1360,7 @@ for completion. That makes it really annoying to use; don't use yasnippet with e
(push '(typescript-mode . typescript-ts-mode) major-mode-remap-alist) (push '(typescript-mode . typescript-ts-mode) major-mode-remap-alist)
(push '("\\.tsx\\'" . tsx-mode) auto-mode-alist) (push '("\\.tsx\\'" . tsx-mode) auto-mode-alist)
(push '(tsx-mode . tsx-ts-mode) major-mode-remap-alist) (push '(tsx-mode . tsx-ts-mode) major-mode-remap-alist)
(setopt typescript-ts-mode-indent-offset 2) (setopt typescript-ts-mode-indent-offset 4)
(with-eval-after-load 'typescript-ts-mode (with-eval-after-load 'typescript-ts-mode
(defun my-tsx-ts-mode--indent-compatibility-b893426 () (defun my-tsx-ts-mode--indent-compatibility-b893426 ()
"Indent rules helper, to handle different releases of tree-sitter-tsx. "Indent rules helper, to handle different releases of tree-sitter-tsx.
@@ -1585,6 +1520,7 @@ for completion. That makes it really annoying to use; don't use yasnippet with e
;; ("C-x M-:" . consult-complex-command) ;; ("C-x M-:" . consult-complex-command)
("C-x b" . consult-buffer) ("C-x b" . consult-buffer)
("s-b" . consult-project-buffer)
("s-B" . consult-buffer) ("s-B" . consult-buffer)
("C-x 4 b" . consult-buffer-other-window) ("C-x 4 b" . consult-buffer-other-window)
("C-x 5 b" . consult-buffer-other-frame) ("C-x 5 b" . consult-buffer-other-frame)