Fix lispindent to indent flet/labels right so I don't lose my goddamn mind
This code is an incomprehensible hellscape so this probably breaks something
somewhere but if I have to spend another moment without correctly-indented flets
and labelses I'm gonna jump out a fucking window.
author |
Steve Losh <steve@stevelosh.com> |
date |
Fri, 25 Mar 2016 21:34:05 +0000 |
parents |
1a4e4c34085d |
children |
(none) |
#!/usr/bin/env bash
INDEX=$(git status --porcelain 2> /dev/null)
STATUS=""
if $(echo "$INDEX" | grep '^UU ' &> /dev/null); then
STATUS="C$STATUS"
fi
if $(echo "$INDEX" | grep '^.[MD] ' &> /dev/null); then
STATUS="?$STATUS"
elif $(echo "$INDEX" | grep '^?? ' &> /dev/null); then
STATUS="?$STATUS"
fi
if $(echo "$INDEX" | grep '^[AMDR]. ' &> /dev/null); then
STATUS="!$STATUS"
fi
echo -n $STATUS