Drop support for terminator.el
Before I switched to vterm.el, I used alacritty as my primary terminal. I could not install alacritty on gLinux, so I switched to terminator. When I was ricing my machine, I wanted my Emacs theme to change my terminator theme. I never finished that project, and it is quite dusty now.
This commit is contained in:
parent
695ab28a6c
commit
431f68298d
2 changed files with 0 additions and 1888 deletions
File diff suppressed because it is too large
Load diff
|
@ -1,94 +0,0 @@
|
||||||
;;; terminator.el --- Experimenting with theming Terminator -*- lexical-binding: t -*-
|
|
||||||
;; Author: William Carroll <wpcarro@gmail.com>
|
|
||||||
|
|
||||||
;;; Commentary:
|
|
||||||
;; I think most of this module is me getting carried away with the idea of
|
|
||||||
;; theming Terminator. Terminator themes are defined in a themes.json file. As
|
|
||||||
;; far as I know, Terminator does not support specifying these themes by name on
|
|
||||||
;; the command line, which would greatly simplify things. Terminator does
|
|
||||||
;; support passing a --profile flag, however, which can be used to specify the
|
|
||||||
;; themes. The idea, albeit quite awkward and over-engineered, was to create
|
|
||||||
;; these profile files on the fly and pass them to terminator. After around 45
|
|
||||||
;; minutes of tinkering with this, the idea is starting to disenchant me.
|
|
||||||
;;
|
|
||||||
;; Alternative solutions include:
|
|
||||||
;; 1. Further investigating what other options Terminator supports.
|
|
||||||
;; 2. Using a different terminal emulator.
|
|
||||||
;; 3. Just right clicking Terminator and changing the themes manually.
|
|
||||||
|
|
||||||
;;; Code:
|
|
||||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
||||||
;; Dependencies
|
|
||||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
||||||
|
|
||||||
(require 'prelude)
|
|
||||||
(require 'alist)
|
|
||||||
(require 'string)
|
|
||||||
(require 'json)
|
|
||||||
|
|
||||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
||||||
;; Library
|
|
||||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
||||||
|
|
||||||
(cl-defstruct terminator/theme
|
|
||||||
foreground-color
|
|
||||||
background-color
|
|
||||||
cursor-color
|
|
||||||
palette)
|
|
||||||
|
|
||||||
(defvar terminator/palettes
|
|
||||||
'((solarized-light . "#002831:#d11c24:#738a05:#a57706:#2176c7:#c61c6f:#259286:#eae3cb:#001e27:#bd3613:#475b62:#536870:#708284:#5956ba:#819090:#fcf4dc"))
|
|
||||||
"Mapping of theme names to the color palette that terminator expects.")
|
|
||||||
|
|
||||||
(defconst terminator/profile-template "[global_config]
|
|
||||||
enabled_plugins = LaunchpadBugURLHandler, LaunchpadCodeURLHandler, APTURLHandler, TerminatorThemes
|
|
||||||
[keybindings]
|
|
||||||
[profiles]
|
|
||||||
[[default]]
|
|
||||||
background_color = \"%s\"
|
|
||||||
cursor_shape = ibeam
|
|
||||||
cursor_color = \"%s\"
|
|
||||||
font = Input Mono Medium 12
|
|
||||||
foreground_color = \"%s\"
|
|
||||||
show_titlebar = False
|
|
||||||
scrollbar_position = hidden
|
|
||||||
palette = \"%s\"
|
|
||||||
use_system_font = False
|
|
||||||
[layouts]
|
|
||||||
[[default]]
|
|
||||||
[[[child1]]]
|
|
||||||
parent = window0
|
|
||||||
type = Terminal
|
|
||||||
profile = Molokai
|
|
||||||
[[[window0]]]
|
|
||||||
parent = \"\"
|
|
||||||
type = Window
|
|
||||||
[plugins]"
|
|
||||||
"Template string of a terminator profile file.")
|
|
||||||
|
|
||||||
(cl-defun terminator/render-profile (&key foreground-color
|
|
||||||
background-color
|
|
||||||
cursor-color
|
|
||||||
palette)
|
|
||||||
"Create a terminator profile with THEME as the palette."
|
|
||||||
(string/format terminator/profile-template
|
|
||||||
background-color
|
|
||||||
cursor-color
|
|
||||||
foreground-color
|
|
||||||
palette))
|
|
||||||
|
|
||||||
(defun terminator/as-heredoc (x)
|
|
||||||
"Return an EOF-terminator heredoc of X."
|
|
||||||
(string/format "<<EOF\n%s\nEOF" x))
|
|
||||||
|
|
||||||
(prelude/start-process
|
|
||||||
:name "termination"
|
|
||||||
:command (string/format "zsh -c terminator --profile=%s"
|
|
||||||
(->> 'solarized-light
|
|
||||||
terminator/render-profile
|
|
||||||
terminator/as-heredoc)))
|
|
||||||
(string/format terminator/profile-template
|
|
||||||
(alist/get 'solarized-light terminator/palettes))
|
|
||||||
|
|
||||||
(provide 'terminator)
|
|
||||||
;;; terminator.el ends here
|
|
Loading…
Reference in a new issue