-
This commit is contained in:
14
archive/.bash_profile
Normal file
14
archive/.bash_profile
Normal file
@@ -0,0 +1,14 @@
|
||||
#!/usr/bin/env bash
|
||||
|
||||
eval $(keychain --eval --quiet ry_ecdsa)
|
||||
eval $(keychain --eval --quiet id_rsa)
|
||||
export MOZ_ENABLE_WAYLAND=1
|
||||
export XDG_CONFIG_HOME=~/.config
|
||||
export XDG_CACHE_HOME=~/.cache
|
||||
export XDG_DATA_HOME=~/.local/share
|
||||
export PASSWORD_STORE_ENABLE_EXTENSIONS=true
|
||||
export BROWSER=/usr/bin/firefox
|
||||
export VISUAL=vim
|
||||
export EDITOR=vim
|
||||
export WGETRC="$XDG_CONFIG_HOME/wgetrc"
|
||||
[[ -f ~/.bashrc ]] && . ~/.bashrc
|
||||
362
archive/.bashrc
Executable file
362
archive/.bashrc
Executable file
@@ -0,0 +1,362 @@
|
||||
#!/bin/bash
|
||||
iatest=$(expr index "$-" i)
|
||||
|
||||
#Source global definitions
|
||||
if [ -f /etc/bashrc ]; then
|
||||
. /etc/bashrc
|
||||
fi
|
||||
|
||||
#Enable bash programmable completion features in interactive shells
|
||||
if [ -f /usr/share/bash-completion/bash_completion ]; then
|
||||
. /usr/share/bash-completion/bash_completion
|
||||
elif [ -f /etc/bash_completion ]; then
|
||||
. /etc/bash_completion
|
||||
fi
|
||||
|
||||
#######################################################
|
||||
# EXPORTS
|
||||
#######################################################
|
||||
|
||||
# Expand the history size
|
||||
export HISTFILESIZE=99999
|
||||
export HISTSIZE=99999
|
||||
|
||||
# Don't put duplicate lines in the history and do not add lines that start with a space
|
||||
export HISTCONTROL=erasedups:ignoredups:ignorespace
|
||||
|
||||
# Check the window size after each command and, if necessary, update the values of LINES and COLUMNS
|
||||
shopt -s checkwinsize
|
||||
|
||||
# Causes bash to append to history instead of overwriting it so if you start a new terminal, you have old session history
|
||||
shopt -s histappend
|
||||
PROMPT_COMMAND='history -a'
|
||||
|
||||
# Allow ctrl-S for history navigation (with ctrl-R)
|
||||
stty -ixon
|
||||
|
||||
# Ignore case on auto-completion
|
||||
# Note: bind used instead of sticking these in .inputrc
|
||||
if [[ $iatest > 0 ]]; then bind "set completion-ignore-case on"; fi
|
||||
|
||||
# Show auto-completion list automatically, without double tab
|
||||
if [[ $iatest > 0 ]]; then bind "set show-all-if-ambiguous On"; fi
|
||||
|
||||
# Set the default editor
|
||||
export EDITOR=vim
|
||||
export VISUAL=vim
|
||||
|
||||
# To have colors for ls and all grep commands such as grep, egrep and zgrep
|
||||
export CLICOLOR=1
|
||||
export LS_COLORS='no=00:fi=00:di=00;34:ln=01;36:pi=40;33:so=01;35:do=01;35:bd=40;33;01:cd=40;33;01:or=40;31;01:ex=01;32:*.tar=01;31:*.tgz=01;31:*.arj=01;31:*.taz=01;31:*.lzh=01;31:*.zip=01;31:*.z=01;31:*.Z=01;31:*.gz=01;31:*.bz2=01;31:*.deb=01;31:*.rpm=01;31:*.jar=01;31:*.jpg=01;35:*.jpeg=01;35:*.gif=01;35:*.bmp=01;35:*.pbm=01;35:*.pgm=01;35:*.ppm=01;35:*.tga=01;35:*.xbm=01;35:*.xpm=01;35:*.tif=01;35:*.tiff=01;35:*.png=01;35:*.mov=01;35:*.mpg=01;35:*.mpeg=01;35:*.avi=01;35:*.fli=01;35:*.gl=01;35:*.dl=01;35:*.xcf=01;35:*.xwd=01;35:*.ogg=01;35:*.mp3=01;35:*.wav=01;35:*.xml=00;31:'
|
||||
alias grep="/usr/bin/grep $GREP_OPTIONS"
|
||||
unset GREP_OPTIONS
|
||||
|
||||
# Color for manpages in less makes manpages a little easier to read
|
||||
export LESS_TERMCAP_mb=$'\E[01;31m'
|
||||
export LESS_TERMCAP_md=$'\E[01;31m'
|
||||
export LESS_TERMCAP_me=$'\E[0m'
|
||||
export LESS_TERMCAP_se=$'\E[0m'
|
||||
export LESS_TERMCAP_so=$'\E[01;44;33m'
|
||||
export LESS_TERMCAP_ue=$'\E[0m'
|
||||
export LESS_TERMCAP_us=$'\E[01;32m'
|
||||
export LC_WHO=rorlando
|
||||
# Scripts Path
|
||||
PATH=$PATH:~/code/scripts
|
||||
PATH=$PATH:~/.local/bin
|
||||
# Ruby Path
|
||||
PATH=$PATH:~/.local/share/gem/ruby/2.7.0/bin
|
||||
# Doom Path
|
||||
PATH=$PATH:~/.config/emacs/bin/
|
||||
|
||||
#######################################################
|
||||
# ALIAS
|
||||
#######################################################
|
||||
# To temporarily bypass an alias, we preceed the command with a \
|
||||
# EG: the ls command is aliased, but to use the normal ls command you would type \ls
|
||||
|
||||
# Pacman aliases
|
||||
alias install='sudo pacman -S'
|
||||
alias update='sudo pacman -Syu'
|
||||
alias search='pacman -Ss'
|
||||
alias remove='sudo pacman -Rs'
|
||||
alias uninstall='sudo pacman -Rs'
|
||||
|
||||
# Rsync push music to jellyfin
|
||||
alias music-push="rsync -r -e 'ssh -p 46668' --info=progress2 /home/opal/music/to-push/* cleric:/data/container_storage/jellyfin/media/music/to-sort/"
|
||||
|
||||
# Add an "alert" alias for long running commands. Use like so:
|
||||
# sleep 10; alert
|
||||
alias alert='notify-send --urgency=low -i "$([ $? = 0 ] && echo terminal || echo error)" "$(history|tail -n1|sed -e '\''s/^\s*[0-9]\+\s*//;s/[;&|]\s*alert$//'\'')"'
|
||||
|
||||
# alias to show the date
|
||||
alias da='date "+%Y-%m-%d %A %T %Z"'
|
||||
|
||||
# Alias's to modified commands
|
||||
alias cp='cp -i'
|
||||
alias mv='mv -i'
|
||||
alias rm='rm -iv'
|
||||
alias mkdir='mkdir -p'
|
||||
alias ps='ps auxf'
|
||||
alias ping='ping -c 10'
|
||||
alias less='less -R'
|
||||
alias vi='vim'
|
||||
alias vis='vim "+set si"'
|
||||
|
||||
# Change directory aliases
|
||||
alias home='cd ~'
|
||||
alias cd..='cd ..'
|
||||
alias ..='cd ..'
|
||||
alias ...='cd ../..'
|
||||
alias ....='cd ../../..'
|
||||
alias .....='cd ../../../..'
|
||||
|
||||
# cd into the old directory
|
||||
alias bd='cd "$OLDPWD"'
|
||||
|
||||
# Alias's for multiple directory listing commands
|
||||
alias la='ls -Alh' # show hidden files
|
||||
alias ls='ls -aFh --color=always' # add colors and file type extensions
|
||||
alias lx='ls -lXBh' # sort by extension
|
||||
alias lk='ls -lSrh' # sort by size
|
||||
alias lc='ls -lcrh' # sort by change time
|
||||
alias lu='ls -lurh' # sort by access time
|
||||
alias lr='ls -lRh' # recursive ls
|
||||
alias lt='ls -ltrh' # sort by date
|
||||
alias lm='ls -alh |more' # pipe through 'more'
|
||||
alias lw='ls -xAh' # wide listing format
|
||||
alias ll='ls -Fls' # long listing format
|
||||
alias labc='ls -lap' #alphabetical sort
|
||||
alias ldir="ls -l | egrep '^d'" # directories only
|
||||
|
||||
# Search command line history
|
||||
alias h="history | grep "
|
||||
|
||||
# Search files in the current folder
|
||||
alias f="find . | grep "
|
||||
|
||||
# Count all files (recursively) in the current folder
|
||||
alias countfiles="for t in files links directories; do echo \`find . -type \${t:0:1} | wc -l\` \$t; done 2> /dev/null"
|
||||
|
||||
# Show current network connections to the server
|
||||
alias ipview="netstat -anpl | grep :80 | awk {'print \$5'} | cut -d\":\" -f1 | sort | uniq -c | sort -n | sed -e 's/^ *//' -e 's/ *\$//'"
|
||||
|
||||
# Show open ports
|
||||
alias openports='netstat -nape --inet'
|
||||
|
||||
# Alias's to show disk space and space used in a folder
|
||||
alias diskspace="du -S | sort -n -r |more"
|
||||
alias folders='du -h --max-depth=1'
|
||||
alias folderssort='find . -maxdepth 1 -type d -print0 | xargs -0 du -sk | sort -rn'
|
||||
alias tree='tree -CAhF --dirsfirst'
|
||||
alias treed='tree -CAFd'
|
||||
alias mountedinfo='df -hT'
|
||||
|
||||
# Alias's for archives
|
||||
alias mktar='tar -cvf'
|
||||
alias mkbz2='tar -cvjf'
|
||||
alias mkgz='tar -cvzf'
|
||||
alias untar='tar -xvf'
|
||||
alias unbz2='tar -xvjf'
|
||||
alias ungz='tar -xvzf'
|
||||
|
||||
# Show all logs in /var/log
|
||||
alias logs="sudo find /var/log -type f -exec file {} \; | grep 'text' | cut -d' ' -f1 | sed -e's/:$//g' | grep -v '[0-9]$' | xargs tail -f"
|
||||
|
||||
# SHA1
|
||||
alias sha1='openssl sha1'
|
||||
|
||||
# Wireguard
|
||||
alias wgup='sudo wg-quick up /etc/wireguard/wg0.conf'
|
||||
alias wgdown='sudo wg-quick down /etc/wireguard/wg0.conf'
|
||||
|
||||
# Hugo
|
||||
alias hss='hugo server --noHTTPCache'
|
||||
|
||||
# Work
|
||||
alias stork='ssh stork'
|
||||
alias mail='ssh mail'
|
||||
alias eel='ssh eel'
|
||||
|
||||
# Wget (keeps hsts files out of $HOME)
|
||||
alias wget='wget --hsts-file="$XDG_CACHE_HOME/wget-hsts"'
|
||||
|
||||
# vim -> neovim (cuz nvim > vim)
|
||||
alias vim='nvim'
|
||||
|
||||
# #######################################################
|
||||
# # SPECIAL FUNCTIONS
|
||||
# #######################################################
|
||||
|
||||
# Searches for text in all files in the current folder
|
||||
ftext() {
|
||||
# -i case-insensitive
|
||||
# -I ignore binary files
|
||||
# -H causes filename to be printed
|
||||
# -r recursive search
|
||||
# -n causes line number to be printed
|
||||
# optional: -F treat search term as a literal, not a regular expression
|
||||
# optional: -l only print filenames and not the matching lines ex. grep -irl "$1" *
|
||||
grep -iIHrn --color=always "$1" . | less -r
|
||||
}
|
||||
|
||||
# Copy file with a progress bar
|
||||
cpp() {
|
||||
set -e
|
||||
strace -q -ewrite cp -- "${1}" "${2}" 2>&1 |
|
||||
awk '{
|
||||
count += $NF
|
||||
if (count % 10 == 0) {
|
||||
percent = count / total_size * 100
|
||||
printf "%3d%% [", percent
|
||||
for (i=0;i<=percent;i++)
|
||||
printf "="
|
||||
printf ">"
|
||||
for (i=percent;i<100;i++)
|
||||
printf " "
|
||||
printf "]\r"
|
||||
}
|
||||
}
|
||||
END { print "" }' total_size=$(stat -c '%s' "${1}") count=0
|
||||
}
|
||||
|
||||
# Copy and go to the directory
|
||||
cpg() {
|
||||
if [ -d "$2" ]; then
|
||||
cp $1 $2 && cd $2
|
||||
else
|
||||
cp $1 $2
|
||||
fi
|
||||
}
|
||||
|
||||
# Move and go to the directory
|
||||
mvg() {
|
||||
if [ -d "$2" ]; then
|
||||
mv $1 $2 && cd $2
|
||||
else
|
||||
mv $1 $2
|
||||
fi
|
||||
}
|
||||
|
||||
# Create and go to the directory
|
||||
mkdirg() {
|
||||
mkdir -p $1
|
||||
cd $1
|
||||
}
|
||||
|
||||
# Goes up a specified number of directories (i.e. up 4)
|
||||
up() {
|
||||
local d=""
|
||||
limit=$1
|
||||
for ((i = 1; i <= limit; i++)); do
|
||||
d=$d/..
|
||||
done
|
||||
d=$(echo $d | sed 's/^\///')
|
||||
if [ -z "$d" ]; then
|
||||
d=..
|
||||
fi
|
||||
cd $d
|
||||
}
|
||||
|
||||
# Show current network information
|
||||
netinfo() {
|
||||
echo "--------------- Network Information ---------------"
|
||||
/sbin/ifconfig | awk /'inet addr/ {print $2}'
|
||||
echo ""
|
||||
/sbin/ifconfig | awk /'Bcast/ {print $3}'
|
||||
echo ""
|
||||
/sbin/ifconfig | awk /'inet addr/ {print $4}'
|
||||
|
||||
/sbin/ifconfig | awk /'HWaddr/ {print $4,$5}'
|
||||
echo "---------------------------------------------------"
|
||||
}
|
||||
|
||||
# IP address lookup
|
||||
alias whatismyip="whatsmyip"
|
||||
function whatsmyip() {
|
||||
# Dumps a list of all IP addresses for every device
|
||||
# /sbin/ifconfig |grep -B1 "inet addr" |awk '{ if ( $1 == "inet" ) { print $2 } else if ( $2 == "Link" ) { printf "%s:" ,$1 } }' |awk -F: '{ print $1 ": " $3 }';
|
||||
|
||||
# Internal IP Lookup
|
||||
echo -n "Internal IP: "
|
||||
/sbin/ifconfig eth0 | grep "inet addr" | awk -F: '{print $2}' | awk '{print $1}'
|
||||
|
||||
# External IP Lookup
|
||||
echo -n "External IP: "
|
||||
wget http://smart-ip.net/myip -O - -q
|
||||
}
|
||||
|
||||
# View Apache logs
|
||||
apachelog() {
|
||||
if [ -f /etc/httpd/conf/httpd.conf ]; then
|
||||
cd /var/log/httpd && ls -xAh && multitail --no-repeat -c -s 2 /var/log/httpd/*_log
|
||||
else
|
||||
cd /var/log/apache2 && ls -xAh && multitail --no-repeat -c -s 2 /var/log/apache2/*.log
|
||||
fi
|
||||
}
|
||||
|
||||
#######################################################
|
||||
# Prompt
|
||||
#######################################################
|
||||
|
||||
function __setprompt {
|
||||
|
||||
# Define colors
|
||||
local LIGHTGRAY="\033[0;37m"
|
||||
local WHITE="\033[1;37m"
|
||||
local BLACK="\033[0;30m"
|
||||
local DARKGRAY="\033[1;30m"
|
||||
local RED="\033[0;31m"
|
||||
local LIGHTRED="\033[1;31m"
|
||||
local GREEN="\033[0;32m"
|
||||
local LIGHTGREEN="\033[1;32m"
|
||||
local BROWN="\033[0;33m"
|
||||
local YELLOW="\033[1;33m"
|
||||
local BLUE="\033[0;34m"
|
||||
local LIGHTBLUE="\033[1;34m"
|
||||
local MAGENTA="\033[0;35m"
|
||||
local LIGHTMAGENTA="\033[1;35m"
|
||||
local CYAN="\033[0;36m"
|
||||
local LIGHTCYAN="\033[1;36m"
|
||||
local NOCOLOR="\033[0m"
|
||||
|
||||
PS1=""
|
||||
# User and server
|
||||
local SSH_IP=$(echo $SSH_CLIENT | awk '{ print $1 }')
|
||||
local SSH2_IP=$(echo $SSH2_CLIENT | awk '{ print $1 }')
|
||||
if [ $SSH2_IP ] || [ $SSH_IP ]; then
|
||||
PS1+="(\[${RED}\]\u@\h"
|
||||
else
|
||||
PS1+="(\[${RED}\]\u"
|
||||
fi
|
||||
|
||||
# Current directory
|
||||
PS1+="\[${LIGHTGRAY}\]:\[${BROWN}\]\w\[${LIGHTGRAY}\])-"
|
||||
|
||||
# Total size of files in current directory
|
||||
PS1+="(\[${GREEN}\]$(/bin/ls -lah | /bin/grep -m 1 total | /bin/sed 's/total //')\[${LIGHTGRAY}\]:"
|
||||
|
||||
# Number of files
|
||||
PS1+="\[${GREEN}\]\$(/bin/ls -A -1 | /usr/bin/wc -l)\[${LIGHTGRAY}\])-"
|
||||
|
||||
# git branch
|
||||
PS1+="(\[${LIGHTGRAY}\]\$(git branch --show-current 2>/dev/null)\[${LIGHTGRAY}\])"
|
||||
|
||||
# Skip to the next line
|
||||
PS1+="\n"
|
||||
|
||||
if [[ $EUID -ne 0 ]]; then
|
||||
PS1+="\[${GREEN}\] >\[${NOCOLOR}\] " # Normal user
|
||||
else
|
||||
PS1+="\[${RED}\]>\[${NOCOLOR}\] " # Root user
|
||||
fi
|
||||
|
||||
# PS2 is used to continue a command using the \ character
|
||||
PS2="\[${LIGHTGRAY}\]>\[${NOCOLOR}\] "
|
||||
|
||||
# PS3 is used to enter a number choice in a script
|
||||
PS3='Please enter a number from above list: '
|
||||
|
||||
# PS4 is used for tracing a script in debug mode
|
||||
PS4='\[${LIGHTGRAY}\]+\[${NOCOLOR}\] '
|
||||
}
|
||||
PROMPT_COMMAND='__setprompt'
|
||||
466
archive/emacs.org
Normal file
466
archive/emacs.org
Normal file
@@ -0,0 +1,466 @@
|
||||
#+TITLE: Emacs Configuration
|
||||
|
||||
* Config.el
|
||||
** Splash Screen
|
||||
Set splash screen image
|
||||
#+begin_src emacs-lisp :tangle ~/opalfiles/.config/doom/config.el
|
||||
(setq fancy-splash-image "~/.config/doom/splash.png")
|
||||
#+end_src
|
||||
|
||||
Remove the menu items + cursor.
|
||||
#+begin_src emacs-lisp :tangle ~/opalfiles/.config/doom/config.el
|
||||
(remove-hook '+doom-dashboard-functions #'doom-dashboard-widget-shortmenu)
|
||||
(remove-hook '+doom-dashboard-functions #'doom-dashboard-widget-footer)
|
||||
(remove-hook '+doom-dashboard-functions #'doom-dashboard-widget-loaded)
|
||||
(add-hook! '+doom-dashboard-mode-hook (hide-mode-line-mode 1) (hl-line-mode -1))
|
||||
(setq-hook! '+doom-dashboard-mode-hook evil-normal-state-cursor (list nil))
|
||||
#+end_src
|
||||
|
||||
** Load Path
|
||||
I have to load mu4e manually from =/usr/share/emacs= for some reason.
|
||||
#+begin_src emacs-lisp :tangle ~/opalfiles/.config/doom/config.el
|
||||
(add-load-path! "/usr/share/emacs/site-lisp/mu4e")
|
||||
#+end_src
|
||||
** User Info
|
||||
#+begin_src emacs-lisp :tangle ~/opalfiles/.config/doom/config.el
|
||||
(setq user-full-name "opal"
|
||||
user-mail-address "ry.orlando@pm.me")
|
||||
#+end_src
|
||||
** Theme
|
||||
#+begin_src emacs-lisp :tangle ~/opalfiles/.config/doom/config.el
|
||||
;; (setq doom-theme 'doom-dracula)
|
||||
(load-theme 'modus-vivendi t)
|
||||
(define-key global-map (kbd "<f5>") #'modus-themes-toggle)
|
||||
#+end_src
|
||||
** Interface
|
||||
#+begin_src emacs-lisp :tangle ~/opalfiles/.config/doom/config.el
|
||||
(dolist (mode '(org-mode-hook
|
||||
term-mode-hook
|
||||
shell-mode-hook
|
||||
eshell-mode-hook))
|
||||
(add-hook mode (lambda () (display-line-numbers-mode 0))))
|
||||
#+end_src
|
||||
|
||||
#+begin_src emacs-lisp :tangle ~/opalfiles/.config/doom/config.el
|
||||
(setq browse-url-browser-function 'browse-url-generic
|
||||
browse-url-generic-program "qutebrowser")
|
||||
#+end_src
|
||||
** Fonts
|
||||
#+begin_src emacs-lisp :tangle ~/opalfiles/.config/doom/config.el
|
||||
(set-face-attribute 'default nil :font "Hack" :height 130 :weight 'regular)
|
||||
(set-face-attribute 'fixed-pitch nil :font "Hack" :height 1.0 :weight 'regular)
|
||||
(set-face-attribute 'variable-pitch nil :font "Iosevka" :height 1.0 :weight 'bold)
|
||||
#+end_src
|
||||
** Org
|
||||
*** General
|
||||
#+begin_src emacs-lisp :tangle ~/opalfiles/.config/doom/config.el
|
||||
(defun opal/org-font-setup ()
|
||||
;; Replace list hyphen with dot
|
||||
(font-lock-add-keywords 'org-mode
|
||||
'(("^ *\\([-]\\) "
|
||||
(0 (prog1 () (compose-region (match-beginning 1) (match-end 1)
|
||||
"•"))))))
|
||||
|
||||
;; Set faces for heading levels
|
||||
(dolist (face '((org-level-1 . 1.2)
|
||||
(org-level-2 . 1.1)
|
||||
(org-level-3 . 1.05)
|
||||
(org-level-4 . 1.0)
|
||||
(org-level-5 . 1.1)
|
||||
(org-level-6 . 1.1)
|
||||
(org-level-7 . 1.1)
|
||||
(org-level-8 . 1.1)))
|
||||
(set-face-attribute (car face) nil :font "Iosevka" :weight 'regular :height (cdr face)))
|
||||
|
||||
;; Ensure that anything that should be fixed-pitch in Org files appears that way
|
||||
(set-face-attribute 'org-block nil :foreground nil :inherit 'fixed-pitch)
|
||||
(set-face-attribute 'org-table nil :inherit 'fixed-pitch)
|
||||
(set-face-attribute 'org-formula nil :inherit 'fixed-pitch)
|
||||
(set-face-attribute 'org-code nil :inherit '(shadow fixed-pitch))
|
||||
(set-face-attribute 'org-table nil :inherit '(shadow fixed-pitch))
|
||||
(set-face-attribute 'org-verbatim nil :inherit '(shadow fixed-pitch))
|
||||
(set-face-attribute 'org-special-keyword nil :inherit '(font-lock-comment-face fixed-pitch))
|
||||
(set-face-attribute 'org-meta-line nil :inherit '(font-lock-comment-face fixed-pitch))
|
||||
(set-face-attribute 'org-checkbox nil :inherit 'fixed-pitch)
|
||||
(set-face-attribute 'line-number nil :inherit 'fixed-pitch)
|
||||
(set-face-attribute 'line-number-current-line nil :inherit 'fixed-pitch))
|
||||
|
||||
|
||||
(defun opal/org-mode-setup ()
|
||||
(org-indent-mode)
|
||||
(variable-pitch-mode 1)
|
||||
(visual-line-mode 1))
|
||||
|
||||
(use-package org
|
||||
:commands (org-capture org-agenda)
|
||||
:hook (org-mode . opal/org-mode-setup)
|
||||
:config
|
||||
(setq org-ellipsis " ▾")
|
||||
(setq org-agenda-start-with-log-mode t)
|
||||
(setq org-log-done 'time)
|
||||
(setq org-log-into-drawer t)
|
||||
(setq org-startup-folded t)
|
||||
(setq org-agenda-files
|
||||
'("~/work/work.org"))
|
||||
|
||||
(require 'org-habit)
|
||||
(add-to-list 'org-modules 'org-habit)
|
||||
(setq org-habit-graph-column 60)
|
||||
|
||||
(setq org-todo-keywords
|
||||
'((sequence "NEXT(n)" "TODO(t)" "|" "DONE(d!)")
|
||||
(sequence "ACTIVE(a)" "PROJ(p)" "WAIT(w@/!)" "HOLD(h)" "BACKLOG(b)" "DOC(u)" "|" "COMPLETED(c)" "CANC(k@)")))
|
||||
|
||||
(setq org-refile-targets
|
||||
'(("archive.org" :maxlevel . 1)
|
||||
("planner.org" :maxlevel . 1)))
|
||||
|
||||
;; Save Org buffers after refiling!
|
||||
(advice-add 'org-refile :after 'org-save-all-org-buffers)
|
||||
|
||||
(add-hook 'org-mode-hook #'org-make-toc-mode)
|
||||
|
||||
;; Configure custom agenda views
|
||||
(setq org-agenda-custom-commands
|
||||
'(("d" "Dashboard"
|
||||
((agenda "" ((org-deadline-warning-days 7)))
|
||||
(todo "NEXT"
|
||||
((org-agenda-overriding-header "Next Tasks")))
|
||||
(tags-todo "agenda/ACTIVE" ((org-agenda-overriding-header "Active Projects")))))
|
||||
|
||||
("n" "Next Tasks"
|
||||
((todo "NEXT"
|
||||
((org-agenda-overriding-header "Next Tasks")))))
|
||||
|
||||
;; Low-effort next actions
|
||||
("e" tags-todo "+TODO=\"NEXT\"+Effort<15&+Effort>0"
|
||||
((org-agenda-overriding-header "Low Effort Tasks")
|
||||
(org-agenda-max-todos 20)
|
||||
(org-agenda-files org-agenda-files)))))
|
||||
|
||||
;; Create capture templates
|
||||
(setq org-capture-templates
|
||||
`(("t" "Tasks")
|
||||
("tt" "Task" entry (file+olp "~/work/work.org" "Inbox")
|
||||
"* TODO %?\n %U\n %a\n %i" :empty-lines 1)))
|
||||
|
||||
;; Tell Org to stop indenting inside of org source blocks.
|
||||
(setq org-edit-src-content-indentation 0)
|
||||
|
||||
;; Set org agenda dir
|
||||
(setq org-directory "~/org/")
|
||||
|
||||
;; Open links in browser
|
||||
(setq browse-url-browser-function 'browse-url-generic
|
||||
browse-url-generic-program "firefox")
|
||||
|
||||
;; Init org font setup
|
||||
(opal/org-font-setup))
|
||||
#+end_src
|
||||
|
||||
*** Pretty Bullets
|
||||
Creates nicer (-) bullets.
|
||||
#+begin_src emacs-lisp :tangle ~/opalfiles/.config/doom/config.el
|
||||
(use-package org-bullets
|
||||
:after org
|
||||
:hook (org-mode . org-bullets-mode)
|
||||
:custom
|
||||
(org-bullets-bullet-list '("◉" "○" "●" "○" "●" "○" "●")))
|
||||
#+end_src
|
||||
|
||||
*** Visual Fill Mode
|
||||
Creates margins in Org mode to make it more pleasant to look at.
|
||||
#+begin_src emacs-lisp :tangle ~/opalfiles/.config/doom/config.el
|
||||
|
||||
(defun opal/org-mode-visual-fill ()
|
||||
(setq visual-fill-column-width 150
|
||||
visual-fill-column-center-text t)
|
||||
(visual-fill-column-mode 1))
|
||||
|
||||
(use-package visual-fill-column
|
||||
:hook (org-mode . opal/org-mode-visual-fill))
|
||||
|
||||
#+end_src
|
||||
|
||||
#+RESULTS:
|
||||
| er/add-org-mode-expansions | org-tempo-setup | org-bullets-mode | org-make-toc-mode | +lookup--init-org-mode-handlers-h | (closure ((hook . org-mode-hook) (--dolist-tail--) t) (&rest _) (add-hook 'before-save-hook 'org-encrypt-entries nil t)) | #[0 \300\301\302\303\304$\207 [add-hook change-major-mode-hook org-show-all append local] 5] | #[0 \300\301\302\303\304$\207 [add-hook change-major-mode-hook org-babel-show-result-all append local] 5] | org-babel-result-hide-spec | org-babel-hide-all-hashes | #[0 \301\211\207 [imenu-create-index-function org-imenu-get-tree] 2] | opal/org-mode-visual-fill | opal/org-mode-setup | (lambda nil (display-line-numbers-mode 0)) | doom-disable-show-paren-mode-h | doom-disable-show-trailing-whitespace-h | +org-enable-auto-reformat-tables-h | +org-enable-auto-update-cookies-h | +org-make-last-point-visible-h | evil-org-mode | toc-org-enable | embrace-org-mode-hook | org-eldoc-load |
|
||||
|
||||
*** Org Babel
|
||||
#+begin_src emacs-lisp :tangle ~/opalfiles/.config/doom/config.el
|
||||
;; Load languages for babel code blocks.
|
||||
(with-eval-after-load 'org
|
||||
(org-babel-do-load-languages
|
||||
'org-babel-load-languages
|
||||
'((emacs-lisp . t)
|
||||
(lisp . t)
|
||||
(python . t)
|
||||
(sql . t)
|
||||
(clojure . t)))
|
||||
|
||||
(push '("conf-unix" . conf-unix) org-src-lang-modes))
|
||||
|
||||
;; Set geiser default language
|
||||
(setq geiser-default-implementation '(guile))
|
||||
|
||||
(with-eval-after-load 'org
|
||||
(require 'org-tempo)
|
||||
(add-to-list 'org-structure-template-alist '("sh" . "src shell"))
|
||||
(add-to-list 'org-structure-template-alist '("el" . "src emacs-lisp"))
|
||||
(add-to-list 'org-structure-template-alist '("cl" . "src lisp"))
|
||||
(add-to-list 'org-structure-template-alist '("sql" . "src sql"))
|
||||
(add-to-list 'org-structure-template-alist '("py" . "src python"))
|
||||
(add-to-list 'org-structure-template-alist '("clj" . "src clojure")))
|
||||
#+end_src
|
||||
|
||||
#+RESULTS:
|
||||
: ((:results . output))
|
||||
|
||||
** Email (mu4e)
|
||||
Not using this much atm.
|
||||
#+begin_src emacs-lisp :tangle ~/opalfiles/.config/doom/config.el
|
||||
;; (use-package mu4e
|
||||
;; :config
|
||||
;; ;; Se t to 't' to avoid mail syncing issues w/ mbsync
|
||||
;; (setq mu4e-change-filenames-when-moving t)
|
||||
|
||||
;; ;; Refresh mail every X minutes
|
||||
;; (setq mu4e-update-interval (* 10 60))
|
||||
;; (setq mu4e-get-mail-command "mbsync -a -c ~/.config/mbsync/mbsyncrc")
|
||||
;; (setq mu4e-maildir "~/mail")
|
||||
|
||||
;; (setq mu4e-contexts
|
||||
;; (list
|
||||
;; ;; Work Email
|
||||
;; (make-mu4e-context
|
||||
;; :name "work"
|
||||
;; :match-func
|
||||
;; (lambda (msg)
|
||||
;; (when msg
|
||||
;; (string-prefix-p "/work" (mu4e-message-field msg :maildir))))
|
||||
|
||||
;; :vars '((user-mail-address . "rorlando@flyingcroc.net")
|
||||
;; (user-full-name . "Ryan Orlando")
|
||||
;; (mu4e-drafts-folder . "/work/drafts")
|
||||
;; (mu4e-sent-folder . "/work/sent")
|
||||
;; (mu4e-trash-folder . "/work/trash")))))
|
||||
|
||||
;; (setq mu4e-maildir-shortcuts
|
||||
;; '(("/work/inbox" . ?i)
|
||||
;; ("/work/sent" . ?s)
|
||||
;; ("/work/trash" . ?t)
|
||||
;; ("/work/drafts" . ?d))))
|
||||
#+end_src
|
||||
** Terminals
|
||||
#+begin_src emacs-lisp :tangle ~/opalfiles/.config/doom/config.el
|
||||
(use-package vterm
|
||||
:commands vterm
|
||||
:config
|
||||
(setq vterm-shell "bash"))
|
||||
#+end_src
|
||||
** Elfeed
|
||||
Rss reader
|
||||
|
||||
#+begin_src emacs-lisp :tangle ~/opalfiles/.config/doom/config.el
|
||||
(setq rmh-elfeed-org-files (list "~/sync/elfeed/feeds.org"))
|
||||
(add-hook! 'elfeed-search-mode-hook 'elfeed-update)
|
||||
(after! elfeed
|
||||
(setq elfeed-search-filter "@1-month-ago +unread"))
|
||||
#+end_src
|
||||
|
||||
* Package.el
|
||||
#+begin_src emacs-lisp :tangle ~/opalfiles/.config/doom/packages.el
|
||||
(package! org-bullets)
|
||||
(package! visual-fill-column)
|
||||
(package! org-make-toc)
|
||||
(package! modus-themes)
|
||||
(package! quelpa)
|
||||
(package! quelpa-use-package)
|
||||
#+end_src
|
||||
* Init.el
|
||||
#+begin_src emacs-lisp :tangle ~/opalfiles/.config/doom/init.el
|
||||
;; 'C-c c k' for non-vim users) to view its documentation. This works on
|
||||
;; flags as well (those symbols that start with a plus).
|
||||
;;
|
||||
;; Alternatively, press 'gd' (or 'C-c c d') on a module to browse its
|
||||
;; directory (for easy access to its source code).
|
||||
|
||||
(doom! :input
|
||||
;;chinese
|
||||
;;japanese
|
||||
;;layout ; auie,ctsrnm is the superior home row
|
||||
|
||||
:completion
|
||||
company ; the ultimate code completion backend
|
||||
;;helm ; the *other* search engine for love and life
|
||||
;;ido ; the other *other* search engine...
|
||||
;;ivy ; a search engine for love and life
|
||||
vertico ; the search engine of the future
|
||||
|
||||
:ui
|
||||
;;deft ; notational velocity for Emacs
|
||||
doom ; what makes DOOM look the way it does
|
||||
doom-dashboard ; a nifty splash screen for Emacs
|
||||
doom-quit ; DOOM quit-message prompts when you quit Emacs
|
||||
;;(emoji +unicode) ; 🙂
|
||||
hl-todo ; highlight TODO/FIXME/NOTE/DEPRECATED/HACK/REVIEW
|
||||
;;hydra
|
||||
;;indent-guides ; highlighted indent columns
|
||||
;;ligatures ; ligatures and symbols to make your code pretty again
|
||||
minimap ; show a map of the code on the side
|
||||
modeline ; snazzy, Atom-inspired modeline, plus API
|
||||
;;nav-flash ; blink cursor line after big motions
|
||||
;;neotree ; a project drawer, like NERDTree for vim
|
||||
ophints ; highlight the region an operation acts on
|
||||
(popup +defaults) ; tame sudden yet inevitable temporary windows
|
||||
tabs ; a tab bar for Emacs
|
||||
treemacs ; a project drawer, like neotree but cooler
|
||||
unicode ; extended unicode support for various languages
|
||||
vc-gutter ; vcs diff in the fringe
|
||||
vi-tilde-fringe ; fringe tildes to mark beyond EOB
|
||||
;;window-select ; visually switch windows
|
||||
workspaces ; tab emulation, persistence & separate workspaces
|
||||
;;zen ; distraction-free coding or writing
|
||||
|
||||
:editor
|
||||
(evil +everywhere); come to the dark side, we have cookies
|
||||
file-templates ; auto-snippets for empty files
|
||||
fold ; (nigh) universal code folding
|
||||
(format +onsave) ; automated prettiness
|
||||
;;god ; run Emacs commands without modifier keys
|
||||
;;lispy ; vim for lisp, for people who don't like vim
|
||||
;;multiple-cursors ; editing in many places at once
|
||||
;;objed ; text object editing for the innocent
|
||||
;;parinfer ; turn lisp into python, sort of
|
||||
;;rotate-text ; cycle region at point between text candidates
|
||||
snippets ; my elves. They type so I don't have to
|
||||
;;word-wrap ; soft wrapping with language-aware indent
|
||||
|
||||
:emacs
|
||||
dired ; making dired pretty [functional]
|
||||
electric ; smarter, keyword-based electric-indent
|
||||
;;ibuffer ; interactive buffer management
|
||||
undo ; persistent, smarter undo for your inevitable mistakes
|
||||
vc ; version-control and Emacs, sitting in a tree
|
||||
|
||||
:term
|
||||
eshell ; the elisp shell that works everywhere
|
||||
;;shell ; simple shell REPL for Emacs
|
||||
;;term ; basic terminal emulator for Emacs
|
||||
vterm ; the best terminal emulation in Emacs
|
||||
|
||||
:checkers
|
||||
syntax ; tasing you for every semicolon you forget
|
||||
;;(spell +flyspell) ; tasing you for misspelling mispelling
|
||||
;;grammar ; tasing grammar mistake every you make
|
||||
|
||||
:tools
|
||||
ansible
|
||||
;;biblio ; Writes a PhD for you (citation needed)
|
||||
;;debugger ; FIXME stepping through code, to help you add bugs
|
||||
;;direnv
|
||||
;;docker
|
||||
;;editorconfig ; let someone else argue about tabs vs spaces
|
||||
;;ein ; tame Jupyter notebooks with emacs
|
||||
(eval +overlay) ; run code, run (also, repls)
|
||||
;;gist ; interacting with github gists
|
||||
lookup ; navigate your code and its documentation
|
||||
lsp ; M-x vscode
|
||||
magit ; a git porcelain for Emacs
|
||||
;;make ; run make tasks from Emacs
|
||||
;;pass ; password manager for nerds
|
||||
pdf ; pdf enhancements
|
||||
;;prodigy ; FIXME managing external services & code builders
|
||||
rgb ; creating color strings
|
||||
;;taskrunner ; taskrunner for all your projects
|
||||
;;terraform ; infrastructure as code
|
||||
;;tmux ; an API for interacting with tmux
|
||||
r;;upload ; map local to remote projects via ssh/ftp
|
||||
|
||||
:os
|
||||
(:if IS-MAC macos) ; improve compatibility with macOS
|
||||
;;tty ; improve the terminal Emacs experience
|
||||
|
||||
:lang
|
||||
;;agda ; types of types of types of types...
|
||||
;;beancount ; mind the GAAP
|
||||
;;cc ; C > C++ == 1
|
||||
;;clojure ; java with a lisp
|
||||
;;common-lisp ; if you've seen one lisp, you've seen them all
|
||||
;;clojure ; java with a lisp
|
||||
;;common-lisp ; if you've seen one lisp, you've seen them all
|
||||
;;coq ; proofs-as-programs
|
||||
;;crystal ; ruby at the speed of c
|
||||
;;csharp ; unity, .NET, and mono shenanigans
|
||||
;;data ; config/data formats
|
||||
;;(dart +flutter) ; paint ui and not much else
|
||||
;;dhall
|
||||
;;elixir ; erlang done right
|
||||
;;elm ; care for a cup of TEA?
|
||||
emacs-lisp ; drown in parentheses
|
||||
;;erlang ; an elegant language for a more civilized age
|
||||
;;ess ; emacs speaks statistics
|
||||
;;factor
|
||||
;;faust ; dsp, but you get to keep your soul
|
||||
;;fortran ; in FORTRAN, GOD is REAL (unless declared INTEGER)
|
||||
;;fsharp ; ML stands for Microsoft's Language
|
||||
;;fstar ; (dependent) types and (monadic) effects and Z3
|
||||
;;gdscript ; the language you waited for
|
||||
;;(go +lsp) ; the hipster dialect
|
||||
;;(haskell +lsp) ; a language that's lazier than I am
|
||||
;;hy ; readability of scheme w/ speed of python
|
||||
;;idris ; a language you can depend on
|
||||
json ; At least it ain't XML
|
||||
;;(java +meghanada) ; the poster child for carpal tunnel syndrome
|
||||
;;javascript ; all(hope(abandon(ye(who(enter(here))))))
|
||||
;;julia ; a better, faster MATLAB
|
||||
;;kotlin ; a better, slicker Java(Script)
|
||||
;;latex ; writing papers in Emacs has never been so fun
|
||||
;;lean ; for folks with too much to prove
|
||||
;;ledger ; be audit you can be
|
||||
;;lua ; one-based indices? one-based indices
|
||||
markdown ; writing docs for people to ignore
|
||||
;;nim ; python + lisp at the speed of c
|
||||
;;nix ; I hereby declare "nix geht mehr!"
|
||||
;;ocaml ; an objective camel
|
||||
org ; organize your plain life in plain text
|
||||
;;php ; perl's insecure younger brother
|
||||
;;plantuml ; diagrams for confusing people more
|
||||
;;purescript ; javascript, but functional
|
||||
python ; beautiful is better than ugly
|
||||
;;qt ; the 'cutest' gui framework ever
|
||||
;;racket ; a DSL for DSLs
|
||||
;;raku ; the artist formerly known as perl6
|
||||
;;rest ; Emacs as a REST client
|
||||
;;rst ; ReST in peace
|
||||
(ruby +rails) ; 1.step {|i| p "Ruby is #{i.even? ? 'love' : 'life'}"}
|
||||
;;rust ; Fe2O3.unwrap().unwrap().unwrap().unwrap()
|
||||
;;scala ; java, but good
|
||||
;;(scheme +guile) ; a fully conniving family of lisps
|
||||
sh ; she sells {ba,z,fi}sh shells on the C xor
|
||||
;;sml
|
||||
;;solidity ; do you need a blockchain? No.
|
||||
;;swift ; who asked for emoji variables?
|
||||
;;terra ; Earth and Moon in alignment for performance.
|
||||
;;web ; the tubes
|
||||
yaml ; JSON, but readable
|
||||
;;zig ; C, but simpler
|
||||
|
||||
:email
|
||||
;;(mu4e +org +gmail)
|
||||
;;notmuch
|
||||
;;(wanderlust +gmail)
|
||||
|
||||
:app
|
||||
;;calendar
|
||||
;;emms
|
||||
;;everywhere ; *leave* Emacs!? You must be joking
|
||||
;;irc ; how neckbeards socialize
|
||||
(rss +org) ; emacs as an RSS reader
|
||||
;;twitter ; twitter client https://twitter.com/vnought
|
||||
|
||||
:config
|
||||
;;literate
|
||||
(default +bindings +smartparens))
|
||||
#+end_src
|
||||
|
||||
#+RESULTS:
|
||||
Reference in New Issue
Block a user