1
0
Fork 0
dotfiles/home/config/wezterm/config.fnl

277 lines
14 KiB
Fennel

(let [wezterm (require :wezterm)
window-padding 15
colors {:frame-background "#282A36"
:active-background "#282A36"
:active-foreground "#ABB2BF"
:active-indicator "#BD93F9"
:active-indicator-ssh "#FFB86C"
:inactive-background "#282A36"
:inactive-foreground "#6272A4"
:hover-background "#242530"
:hover-foreground "#191A21"
; Icons
:elixir "#A074C4"
:et "#1C3062"
:nvim "#019833"
:nix "#7EBAE4"
:reddit "#FA4400"
:ssh "#F4C82D"
:shell "#F8F8F2"}
enable-ligatures-flags [:calt=1 :clig=1 :liga=1]
disable-ligatures-flags [:calt=0 :clig=0 :liga=0]]
(var ligature-panes [])
(var latest-pane-update nil)
;; Event: Tab format
(fn extract-tab-title [tab]
(let [title tab.tab_title]
(if (and title (> (length title) 0)) title tab.active_pane.title)))
(fn extract-tab-info [title]
(match title
(where t (t:find "^nvim%s")) {:title (t:gsub "^nvim%s(.*)" "%1")
:icon " "
:color colors.nvim
:ignore-activity true}
(where t (t:find :^nvim$))
{: title :icon " " :color colors.nvim :ignore-activity true}
(where t (t:find "^git%s"))
{:title (t:gsub "^git%s(.*)" "%1") :icon "󰊢 " :color "#F25029"}
(where t (t:find "^mix%s"))
{:title (t:gsub "^mix%s(.*)" "%1") :icon " " :color colors.elixir}
(where t (t:find "^iex%s")) {: title :icon " " :color colors.elixir}
(where t (t:find "^upa%s")) {: title :icon " " :color colors.nix}
(where t (t:find "^upp%s")) {: title :icon " " :color colors.nix}
(where t (t:find "^nrsw%s")) {: title :icon " " :color colors.nix}
(where t (t:find :^nrsw$)) {: title :icon " " :color colors.nix}
(where t (t:find "^ngc%s")) {: title :icon " " :color colors.nix}
(where t (t:find :^ngc$)) {: title :icon " " :color colors.nix}
(where t (t:find "^nix%s")) {: title :icon " " :color colors.nix}
(where t (t:find "^nix%-%w+%s")) {: title :icon " " :color colors.nix}
(where t (t:find "^colmena%s"))
{: title :icon " " :color colors.nix :ssh-domain true}
(where t (t:find "^deploy%s"))
{: title :icon " " :color colors.nix :ssh-domain true}
(where t (t:find "^ssh%s"))
{: title :icon " " :color colors.ssh :ssh-domain true}
(where t (t:find "^scp%s"))
{: title :icon " " :color colors.ssh :ssh-domain true}
(where t (t:find "^et%s"))
{: title :icon " " :color colors.et :ssh-domain true}
(where t (t:find "^just%s")) {: title :icon " " :color "#C87D57"}
(where t (t:find :^ytdl)) {: title :icon " " :color "#FF0000"}
(where t (t:find "^instagram%-"))
{: title :icon " " :color "#FB2179" :ignore-activity true}
(where t (t:find "^gallery%-dl%s")) {:title (t:gsub "^gallery%-dl%s(.*)"
"%1")
:icon " "
:color "#009900"
:ignore-activity true}
(where t (t:find "^discord%-"))
{: title :icon " " :color "#5865F2" :ignore-activity true}
(where t (t:find "^bdfr%s")) {:title (t:gsub "^bdfr%s(.*)" "%1")
:icon " "
:color colors.reddit
:ignore-activity true}
(where t (t:find "^bdfr%-%w+%s"))
{: title :icon " " :color colors.reddit :ignore-activity true}
(where t (t:find "^rexit%s"))
{: title :icon " " :color colors.reddit :ignore-activity true}
(where t (t:find "^redis%-")) {: title :icon " " :color "#DC372C"}
(where t (t:find "^%[%w+%]%s"))
{: title :icon " " :color colors.ssh :ssh-domain true}
(where t (t:find "^%w+@%w+:%s"))
{: title :icon " " :color colors.ssh :ssh-domain true}
(where t (t:find "^%w+%-dev"))
{: title :icon " " :color "#0099CC" :ignore-activity true}
(where t (t:find "^%w+%-dl%s"))
{: title :icon " " :color "#22BC00" :ignore-activity true}
(where t (t:find "^~"))
{: title :icon " " :color colors.shell :ignore-activity true}
(where t (t:find :^zsh$))
{: title :icon "󰫫 " :color colors.shell :ignore-activity true}
(where t (t:find "^op%srun%s%-%-%s"))
(extract-tab-info (t:gsub "^op%srun%s%-%-%s(.*)" "%1"))
_ {: title :icon " " :color colors.shell}))
(fn is-ssh-domain [pane]
(or (= (?. pane :user_vars :cmd_domain) :ssh)
(= (string.sub pane.domain_name 1 3) :SSH)))
(fn show-tab-activity-indicator [panes]
(each [_ pane (ipairs panes)]
(when pane.has_unseen_output (lua "return true")))
false)
(wezterm.on :format-tab-title
(fn [tab _tabs _panes _config _hover max-width]
(let [raw-title (extract-tab-title tab)
tab-info (extract-tab-info raw-title)
title (wezterm.truncate_right tab-info.title
(- max-width 5))
active-indicator-color (if (or tab-info.ssh-domain
(is-ssh-domain tab.active_pane))
colors.active-indicator-ssh
colors.active-indicator)
(activity-indicator activity-color) (if (and (not tab-info.ignore-activity)
(show-tab-activity-indicator tab.panes))
(values "  "
"#FFB86C")
(values " " nil))]
(if tab.is_active
[; Left
{:Background {:Color colors.active-background}}
{:Foreground {:Color active-indicator-color}}
{:Text "│ "}
; Center
{:Foreground {:Color tab-info.color}}
{:Text tab-info.icon}
{:Foreground {:Color colors.active-foreground}}
{:Attribute {:Intensity :Bold}}
{:Attribute {:Italic true}}
{:Text title}
; Right
{:Foreground {:Color (or activity-color
colors.active-foreground)}}
{:Attribute {:Intensity :Normal}}
{:Attribute {:Italic false}}
{:Text activity-indicator}]
[; Left
{:Background {:Color colors.inactive-background}}
{:Foreground {:Color colors.inactive-foreground}}
{:Text " "}
; Center
{:Foreground {:Color colors.inactive-foreground}}
{:Text tab-info.icon}
{:Attribute {:Italic false}}
{:Text title}
; Right
{:Foreground {:Color (or activity-color
colors.inactive-foreground)}}
{:Text activity-indicator}]))))
;; Event: Ligatures
(wezterm.on :update-status
(fn [window pane]
(local pane-id (pane:pane_id))
(when (not= latest-pane-update pane-id)
(let [overrides (or (window:get_config_overrides) {})]
(set latest-pane-update pane-id)
(if (. ligature-panes pane-id)
(do
(set overrides.harfbuzz_features
enable-ligatures-flags)
(window:set_config_overrides overrides))
(do
(set overrides.harfbuzz_features
disable-ligatures-flags)
(window:set_config_overrides overrides)))))))
(wezterm.on :user-var-changed
(fn [window pane name value]
(let [overrides (or (window:get_config_overrides) {})
pane-id (pane:pane_id)]
(case [name value]
[:enable-ligatures :t] (do
(set overrides.harfbuzz_features
enable-ligatures-flags)
(tset ligature-panes pane-id true)
(window:set_config_overrides overrides))
[:enable-ligatures :f] (do
(set overrides.harfbuzz_features
disable-ligatures-flags)
(tset ligature-panes pane-id nil)
(window:set_config_overrides overrides))))))
;; Event: Screen options
(wezterm.on :window-resized
(fn [window _pane]
(let [overrides (or (window:get_config_overrides) {})
current-screen (. (wezterm.gui.screens) :active :name)]
(case current-screen
:S34J55x (do
(set overrides.line_height 1)
(set overrides.freetype_load_target :Normal)
(window:set_config_overrides overrides))
_ (do
(set overrides.line_height 0.95)
(set overrides.freetype_load_target :Light)
(window:set_config_overrides overrides))))))
;; Configuration
{:term :wezterm
:default_prog [_G.shells.zsh :-i]
;; Appearance
:color_scheme "Dracula (Official)"
:window_decorations :INTEGRATED_BUTTONS|RESIZE
:window_padding {:left window-padding
:right window-padding
:top (math.floor (/ window-padding 2))
:bottom (math.floor (/ window-padding 2))}
;; Tabs
:enable_tab_bar true
:use_fancy_tab_bar true
:hide_tab_bar_if_only_one_tab false
:tab_bar_at_bottom false
:tab_max_width 42
:window_frame {:active_titlebar_bg colors.frame-background
:inactive_titlebar_bg colors.frame-background
:font (wezterm.font {:family :TX-02
:weight :Regular
:harfbuzz_features disable-ligatures-flags})
:font_size 11}
:colors {:tab_bar {:background colors.frame-background
:inactive_tab_edge colors.frame-background
:new_tab {:bg_color colors.inactive-background
:fg_color colors.inactive-foreground}
:new_tab_hover {:bg_color colors.hover-background
:fg_color colors.hover-foreground}}}
;; Fonts
:font (wezterm.font_with_fallback [:TX-02
"Symbols Nerd Font"
"Apple Symbols"
"Apple Color Emoji"
"Noto Sans Symbols"
"Noto Sans Symbols 2"])
:font_size 13
:line_height 0.95
:freetype_load_target :Light
;:freetype_render_target :HorizontalLcd
:harfbuzz_features disable-ligatures-flags
:allow_square_glyphs_to_overflow_width :WhenFollowedBySpace
:adjust_window_size_when_changing_font_size false
;; Keys
:keys [{:key :UpArrow
:mods :SHIFT
:action (wezterm.action.ScrollToPrompt -1)}
{:key :DownArrow
:mods :SHIFT
:action (wezterm.action.ScrollToPrompt 1)}
{:key :LeftArrow
:mods :CMD
:action (wezterm.action.ActivateTabRelative -1)}
{:key :RightArrow
:mods :CMD
:action (wezterm.action.ActivateTabRelative 1)}]
:enable_kitty_keyboard true
:send_composed_key_when_left_alt_is_pressed true
:send_composed_key_when_right_alt_is_pressed true
;; Mouse
:mouse_bindings [; Only select text and don't open hyperlinks
{:event {:Up {:streak 1 :button :Left}}
:mods :NONE
:action (wezterm.action {:ExtendSelectionToMouseCursor :Cell})}
; Only select word on double click
{:event {:Up {:streak 2 :button :Left}}
:mods :NONE
:action (wezterm.action.SelectTextAtMouseCursor :Word)}
; Select entire output of command
{:event {:Down {:streak 3 :button :Left}}
:mods :NONE
:action (wezterm.action.SelectTextAtMouseCursor :SemanticZone)}
; CMD-click to open a hyperlink
{:event {:Up {:streak 1 :button :Left}}
:mods :SUPER
:action :OpenLinkAtMouseCursor}]
;; Scrollback
:scrollback_lines 5000
;; Other
:front_end :WebGpu
:max_fps 120
:check_for_updates false})