changeset 83: |
8bd50ea9a546 |
parent 52: |
5fd0502a3231 |
child 85: |
862659891933 |
author: |
Richard Westhaver <ellis@rwest.io> |
date: |
Mon, 12 Aug 2024 21:50:44 -0400 |
files: |
.bash_profile .bashrc .emacs.d/ellis.el .profile .skelrc .stumpwm.d/init.lisp |
description: |
zor updates |
1.1--- a/.bash_profile Thu Jul 04 20:40:22 2024 -0400
1.2+++ /dev/null Thu Jan 01 00:00:00 1970 +0000
1.3@@ -1,17 +0,0 @@
1.4-# .bash_profile --- bash profile
1.5-
1.6-export PYTHON=python3.11
1.7-export PYENV_ROOT="$HOME/.pyenv"
1.8-export PATH="$PYENV_ROOT/bin:$PATH"
1.9-export PATH="$HOME/go/bin:$HOME/.nimble/bin:$HOME/.cargo/bin:$HOME/.local/bin:$HOME/bin:$PATH"
1.10-
1.11-if ! shopt -oq posix; then
1.12- if [ -f /usr/share/bash-completion/bash_completion ]; then
1.13- . /usr/share/bash-completion/bash_completion
1.14- elif [ -f /etc/bash_completion ]; then
1.15- . /etc/bash_completion
1.16- fi
1.17-fi
1.18-
1.19-eval "$(pyenv init --path)"
1.20-if command -v rhg>>/dev/null; then alias hg='rhg';fi
2.1--- a/.bashrc Thu Jul 04 20:40:22 2024 -0400
2.2+++ b/.bashrc Mon Aug 12 21:50:44 2024 -0400
2.3@@ -1,6 +1,24 @@
2.4 # .bashrc --- bash configuration
2.5 # Set prompt
2.6 PS1="\u [\!]:\t:\w\n >> \[\e[0m\]"
2.7+
2.8+export PYTHON=python3.11
2.9+export PYENV_ROOT="$HOME/.pyenv"
2.10+export PATH="$PYENV_ROOT/bin:$PATH"
2.11+export PATH="$HOME/go/bin:$HOME/.nimble/bin:$HOME/.cargo/bin:$HOME/.local/bin:$HOME/bin:$PATH"
2.12+
2.13+if ! shopt -oq posix; then
2.14+ if [ -f /usr/share/bash-completion/bash_completion ]; then
2.15+ . /usr/share/bash-completion/bash_completion
2.16+ elif [ -f /etc/bash_completion ]; then
2.17+ . /etc/bash_completion
2.18+ fi
2.19+fi
2.20+
2.21+eval "$(pyenv init --path)"
2.22+if command -v rhg>>/dev/null; then alias hg='rhg';fi
2.23+. "$HOME/.cargo/env"
2.24+
2.25 # default Envs
2.26 export LISP='sbcl'
2.27 export ESHELL='/usr/bin/bash'
3.1--- a/.emacs.d/ellis.el Thu Jul 04 20:40:22 2024 -0400
3.2+++ b/.emacs.d/ellis.el Mon Aug 12 21:50:44 2024 -0400
3.3@@ -1,4 +1,4 @@
3.4-;;; ellis.el --- Richard's custom Emacs config -*- lexical-binding: t; -*-
3.5+;;; ellis.el --- Richard's custom Emacs config
3.6
3.7 ;; Copyright (C) 2024
3.8
3.9@@ -562,18 +562,22 @@
3.10 files)
3.11 files))
3.12
3.13-(defvar org-agenda-directories (list org-directory user-lab-directory)
3.14+(defvar org-agenda-directories (list org-directory
3.15+ (join-paths user-lab-directory "org")
3.16+ (join-paths company-source-directory "org/*"))
3.17 "List of directories containing org files.")
3.18 (defvar org-agenda-extensions '(".org")
3.19 "List of extensions of agenda files")
3.20
3.21 (defun org-set-agenda-files ()
3.22 (interactive)
3.23- (setq org-agenda-files (org-list-files
3.24- org-agenda-directories
3.25- org-agenda-extensions)))
3.26+ (setq org-agenda-files
3.27+ (org-list-files
3.28+ org-agenda-directories
3.29+ org-agenda-extensions)))
3.30
3.31-(add-hook 'after-init-hook 'org-set-agenda-files)
3.32+(with-eval-after-load 'org
3.33+ (org-set-agenda-files))
3.34
3.35 ;;; Skel Config
3.36 (use-package skel
3.37@@ -734,5 +738,18 @@
3.38 (auto-insert-mode t)
3.39 (keymap-set skel-minor-mode-map "C-<return>" 'company-tempo))
3.40
3.41+;;; dictionary
3.42+;; requires dictd server running
3.43+(setq dictionary-server "compiler.company")
3.44+;;; ispell
3.45+;; requires aspell and a hunspell dictionary (hunspell-en_us)
3.46+(setq-default ispell-program-name "aspell")
3.47+(add-hook 'mail-send-hook #'ispell-message)
3.48+;;; glossary
3.49+(with-eval-after-load 'org-glossary
3.50+ (setq org-glossary-collection-root (join-paths company-source-directory "org/meta/"))
3.51+ (cl-pushnew '("Terms" . glossary) org-glossary-headings)
3.52+ (cl-pushnew '("Acronyms" . acronym) org-glossary-headings))
3.53+
3.54 (provide 'ellis)
3.55 ;;; ellis.el ends here
4.1--- /dev/null Thu Jan 01 00:00:00 1970 +0000
4.2+++ b/.profile Mon Aug 12 21:50:44 2024 -0400
4.3@@ -0,0 +1,7 @@
4.4+# if running bash
4.5+if [ -n "$BASH_VERSION" -a -n "$PS1" ]; then
4.6+ # include .bashrc if it exists
4.7+ if [ -f "$HOME/.bashrc" ]; then
4.8+ . "$HOME/.bashrc"
4.9+ fi
4.10+fi
5.1--- a/.skelrc Thu Jul 04 20:40:22 2024 -0400
5.2+++ b/.skelrc Mon Aug 12 21:50:44 2024 -0400
5.3@@ -1,5 +1,6 @@
5.4 ;;; .skelrc @ 2023-10-12.02:58:08 -*- mode: skel; -*-
5.5-:name "Richard Westhaver <ellis@rwest.io>"
5.6+:name "Richard Westhaver"
5.7+:email "richard.westhaver@gmail.com"
5.8 :user "ellis"
5.9 :version "0.1.0"
5.10 :tags ("auto")
5.11@@ -8,13 +9,8 @@
5.12 :auto-insert t
5.13 :license :mpl2
5.14 :log-level :info
5.15-:shed ".shed"
5.16 :stash ".stash"
5.17-:scratch ".stash/scratch"
5.18-:cache ".cache"
5.19-:registry "~/.data/skel/registry"
5.20+;; :scratch ".stash/scratch"
5.21+:cache ".stash/cache"
5.22+:registry ".data/skel/registry"
5.23 :scripts ("/usr/local/share/stash/scripts" "~/stash/scripts")
5.24-:alias-list
5.25-(("p" "vc push")
5.26- ("P" "vc pull")
5.27- ("ci" "vc commit"))
6.1--- a/.stumpwm.d/init.lisp Thu Jul 04 20:40:22 2024 -0400
6.2+++ b/.stumpwm.d/init.lisp Mon Aug 12 21:50:44 2024 -0400
6.3@@ -2,28 +2,66 @@
6.4
6.5 (in-package :stumpwm)
6.6
6.7-(defvar *stumpwm-port* 4004)
6.8-(ql:quickload :swank)
6.9-(require :swank)
6.10-(swank-loader:init)
6.11-(ignore-errors
6.12- (swank:create-server :port *stumpwm-port*
6.13- :style swank:*communication-style*))
6.14+;; (ql:quickload :swank)
6.15+;; (require :swank)
6.16+
6.17+;; (defvar *stumpwm-port* 4040)
6.18+;; (swank-loader:init)
6.19+;; (swank:create-server :port *stumpwm-port*
6.20+;; :style swank:*communication-style*)
6.21+
6.22+(defcommand load-std () ()
6.23+ (ql:quickload :std))
6.24+
6.25+(defcommand load-prelude () ()
6.26+ (ql:quickload :prelude))
6.27+
6.28+(defcommand load-core () ()
6.29+ (ql:quickload :core))
6.30+
6.31+(defcommand load-user () ()
6.32+ (ql:quickload :user))
6.33
6.34 (setq *mouse-focus-policy* :sloppy
6.35 *float-window-modifier* :SUPER
6.36 *startup-message* "Greetings, stranger.")
6.37
6.38-;; (set-font "CommitMono")
6.39+(set-font "-*-terminal")
6.40 (set-module-dir "/usr/share/stupmwm/contrib/")
6.41 (init-load-path *module-dir*)
6.42
6.43+(set-fg-color "#ffffff")
6.44+(set-bg-color "#000000")
6.45+(set-border-color "#7E5D90")
6.46+(set-focus-color "#170F14")
6.47+(set-unfocus-color "#232731")
6.48+(set-win-bg-color "#22272F")
6.49+(set-float-focus-color "#8ED3A1")
6.50+(set-float-unfocus-color "#232731")
6.51+
6.52+(setf *mode-line-background-color* "#161613")
6.53+(setf *mode-line-foreground-color* "#FFFFFF")
6.54+(setf *mode-line-border-color* "#28394c")
6.55+(setf *mode-line-position* :bottom)
6.56+
6.57+(setf *colors* (list "#010101" ; 0 black
6.58+ "#BF616A" ; 1 red
6.59+ "#A3BE8C" ; 2 green
6.60+ "#EBCB8B" ; 3 yellow
6.61+ "#5E81AC" ; 4 blue
6.62+ "#9D5AAF" ; 5 magenta
6.63+ "#8FBCBB" ; 6 cyan
6.64+ "#FEFEFE")) ; 7 white
6.65+
6.66 (setf *window-format* "%m%n%s%c")
6.67 (setf *screen-mode-line-format* (list "[^B%n^b] %W^>%d"))
6.68-
6.69+(set-normal-gravity :center)
6.70+(set-maxsize-gravity :center)
6.71+(set-transient-gravity :center)
6.72 (setf *time-modeline-string* "%a %b %e %k:%M")
6.73
6.74 (setq *mode-line-timeout* 4)
6.75+(which-key-mode)
6.76
6.77 (when *initializing*
6.78 (run-shell-command "sh ~/.fehbg")
6.79@@ -32,8 +70,6 @@
6.80 (dolist (s stumpwm:*screen-list*)
6.81 (enable-mode-line s (car (screen-heads s)) t)))
6.82
6.83-(which-key-mode)
6.84-
6.85 (defcommand term (&optional program) ()
6.86 (sb-thread:make-thread
6.87 (lambda ()