wezterm: Replace Lua config with Fennel

2 files changed, 87 insertions, 80 deletions

diff --git a/wezterm/.config/wezterm/wezterm.fnl b/wezterm/.config/wezterm/wezterm.fnl
new file mode 100644
index 0000000..eb1bffe
--- /dev/null
+++ b/wezterm/.config/wezterm/wezterm.fnl
@@ -0,0 +1,68 @@
+(local wezterm (require :wezterm))
+
+(local colors { :foreground "#bfbfbf"
+                :background "#222424" })
+
+(local open-url-key
+       { :key "E"
+         :mods "CTRL|SHIFT"
+         :action (wezterm.action.QuickSelectArgs
+                  { :label "open url"
+                    :patterns [ "https?://[[:alnum:]./-]+[[:alnum:]/]" ]
+                    :action (wezterm.action_callback
+                             (fn [window pane]
+                               (let [url (window:get_selection_text_for_pane pane)]
+                                 (wezterm.log_info (.. "opening: " url))
+                                 (wezterm.open_with url)))) }) })
+
+(local copy-guix-hash-key
+       { :key "G"
+         :mods "CTRL|SHIFT"
+         :action (wezterm.action.QuickSelectArgs
+                  { :label "copy hash"
+                    :patterns [ "[a-z0-9]{52}" ]
+                    :action (wezterm.action_callback
+                             (fn [window pane]
+                               (let [text (window:get_selection_text_for_pane pane)]
+                                 (wezterm.log_info (.. "copying: " text))
+                                 (window:copy_to_clipboard text)))) }) })
+(local keys
+       [ open-url-key
+         copy-guix-hash-key
+         { :key "o" :mods "ALT" :action wezterm.action.PaneSelect }
+         { :key "p" :mods "ALT" :action (wezterm.action.ScrollToPrompt -1) }
+         { :key "n" :mods "ALT" :action (wezterm.action.ScrollToPrompt 1) } ])
+
+(local inactive_pane_hsb
+       { :saturation 0.8
+         :brightness 0.7 })
+
+{
+ ;; I use a tiling window manager, so the window size can't change when the font
+ ;; size changes.
+ :adjust_window_size_when_changing_font_size false
+
+ :default_cursor_style "SteadyBar"
+
+ : colors
+ : keys
+ : inactive_pane_hsb
+
+ ;; :command_palette_font (wezterm.font "Fantasque Sans Mono")
+ :command_palette_font_size 14
+ :command_palette_bg_color "#111414"
+ :command_palette_fg_color "#bfbfbf"
+ :command_palette_rows 10
+
+ :font (wezterm.font "Fantasque Sans Mono")
+ :font_size 20
+
+ :hide_tab_bar_if_only_one_tab true
+
+ :quick_select_alphabet "arstdhneio"
+
+ ;; "INTEGRATED_BUTTONS|RESIZE" keeps the borders resizable and puts the
+ ;; Min/Max/Close buttons in the tab bar (modern look).
+ :window_decorations "INTEGRATED_BUTTONS|RESIZE"
+
+ }
diff --git a/wezterm/.config/wezterm/wezterm.lua b/wezterm/.config/wezterm/wezterm.lua
index ebf6494..3459deb 100644
--- a/wezterm/.config/wezterm/wezterm.lua
+++ b/wezterm/.config/wezterm/wezterm.lua
@@ -1,80 +1,19 @@
-local wezterm = require 'wezterm'
-
-local colors = {
-   foreground = '#bfbfbf',
-   background = '#222424',
-}
-
-local open_url_key = {
-   key = 'E',
-   mods = 'CTRL|SHIFT',
-   action = wezterm.action.QuickSelectArgs {
-      label = 'open url',
-      patterns = {
-         'https?://[[:alnum:]./-]+[[:alnum:]/]',
-      },
-      action = wezterm.action_callback(function(window, pane)
-            local url = window:get_selection_text_for_pane(pane)
-            wezterm.log_info('opening: ' .. url)
-            wezterm.open_with(url)
-      end),
-   },
-}
-
-local copy_guix_hash_key = {
-   key = 'G',
-   mods = 'CTRL|SHIFT',
-   action = wezterm.action.QuickSelectArgs {
-      label = 'copy hash',
-      patterns = {
-         '[a-z0-9]{52}',
-      },
-      action = wezterm.action_callback(function(window, pane)
-            local text = window:get_selection_text_for_pane(pane)
-            wezterm.log_info('copying: ' .. text)
-            window:copy_to_clipboard(text)
-      end),
-   },
-}
-
-local keys = {
-   open_url_key,
-   copy_guix_hash_key,
-   { key = 'o', mods = 'ALT', action = wezterm.action.PaneSelect },
-   { key = 'p', mods = 'ALT', action = wezterm.action.ScrollToPrompt(-1) },
-   { key = 'n', mods = 'ALT', action = wezterm.action.ScrollToPrompt(1) },
-}
-
-local inactive_pane_hsb = {
-   saturation = 0.8,
-   brightness = 0.7
-}
-
-return {
-   -- I use a tiling window manager, so the window size can't change when the
-   -- font size changes.
-   adjust_window_size_when_changing_font_size = false,
-
-   default_cursor_style = 'SteadyBar',
-
-   colors = colors,
-   keys = keys,
-   inactive_pane_hsb = inactive_pane_hsb,
-
-   command_palette_font = wezterm.font 'Fantasque Sans Mono',
-   command_palette_font_size = 14,
-   command_palette_bg_color = '#111414',
-   command_palette_fg_color = '#bfbfbf',
-   command_palette_rows = 10,
-
-   font = wezterm.font 'Fantasque Sans Mono',
-   font_size = 14,
-
-   hide_tab_bar_if_only_one_tab = true,
-
-   quick_select_alphabet = "arstdhneio",
-
-   -- "INTEGRATED_BUTTONS|RESIZE" keeps the borders resizable and
-   -- puts the Min/Max/Close buttons in the tab bar (modern look).
-   window_decorations = "INTEGRATED_BUTTONS|RESIZE",
-}
+local wezterm = require("wezterm")
+local colors = {foreground = "#bfbfbf", background = "#222424"}
+local open_url_key
+local function _1_(window, pane)
+  local url = window:get_selection_text_for_pane(pane)
+  wezterm.log_info(("opening: " .. url))
+  return wezterm.open_with(url)
+end
+open_url_key = {key = "E", mods = "CTRL|SHIFT", action = wezterm.action.QuickSelectArgs({label = "open url", patterns = {"https?://[[:alnum:]./-]+[[:alnum:]/]"}, action = wezterm.action_callback(_1_)})}
+local copy_guix_hash_key
+local function _2_(window, pane)
+  local text = window:get_selection_text_for_pane(pane)
+  wezterm.log_info(("copying: " .. text))
+  return window:copy_to_clipboard(text)
+end
+copy_guix_hash_key = {key = "G", mods = "CTRL|SHIFT", action = wezterm.action.QuickSelectArgs({label = "copy hash", patterns = {"[a-z0-9]{52}"}, action = wezterm.action_callback(_2_)})}
+local keys = {open_url_key, copy_guix_hash_key, {key = "o", mods = "ALT", action = wezterm.action.PaneSelect}, {key = "p", mods = "ALT", action = wezterm.action.ScrollToPrompt(-1)}, {key = "n", mods = "ALT", action = wezterm.action.ScrollToPrompt(1)}}
+local inactive_pane_hsb = {saturation = 0.8, brightness = 0.7}
+return {default_cursor_style = "SteadyBar", colors = colors, keys = keys, inactive_pane_hsb = inactive_pane_hsb, command_palette_font_size = 14, command_palette_bg_color = "#111414", command_palette_fg_color = "#bfbfbf", command_palette_rows = 10, font = wezterm.font("Fantasque Sans Mono"), font_size = 20, hide_tab_bar_if_only_one_tab = true, quick_select_alphabet = "arstdhneio", window_decorations = "INTEGRATED_BUTTONS|RESIZE", adjust_window_size_when_changing_font_size = false}