annotate paste/paste.12049 @ 9554:23f43464694e

<Zarutian> le/rn Frams\xc3\xb3knarflokkurinn/A, now defunct, political party in Iceland. Like its sister party Sj\xc3\xa1lfst\xc3\xa6\xc3\xb0isflokkurinn it is named by the antonym of what it is. (The name means the Progressive Party but they have nearly always been highly regressive). Think dumb Hill-Billies in ill fitting suits and you get their constiuents.
author HackBot
date Sun, 30 Oct 2016 14:33:24 +0000
parents e925c0adf7ad
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
434
e925c0adf7ad <elliott> paste lib/karma
HackBot
parents:
diff changeset
1 #!/bin/sh
e925c0adf7ad <elliott> paste lib/karma
HackBot
parents:
diff changeset
2 count () {
e925c0adf7ad <elliott> paste lib/karma
HackBot
parents:
diff changeset
3 hg log --template '{desc}\n' |
e925c0adf7ad <elliott> paste lib/karma
HackBot
parents:
diff changeset
4 egrep '<[^]]*> karma\'$1 |
e925c0adf7ad <elliott> paste lib/karma
HackBot
parents:
diff changeset
5 fgrep -vix "<$2> karma$1 $2" |
e925c0adf7ad <elliott> paste lib/karma
HackBot
parents:
diff changeset
6 cut -d' ' -f3 |
e925c0adf7ad <elliott> paste lib/karma
HackBot
parents:
diff changeset
7 fgrep -cix "$2"
e925c0adf7ad <elliott> paste lib/karma
HackBot
parents:
diff changeset
8 }
e925c0adf7ad <elliott> paste lib/karma
HackBot
parents:
diff changeset
9 plus=$(count + "$1")
e925c0adf7ad <elliott> paste lib/karma
HackBot
parents:
diff changeset
10 minus=$(count - "$1")
e925c0adf7ad <elliott> paste lib/karma
HackBot
parents:
diff changeset
11 echo $(($plus-$minus))
e925c0adf7ad <elliott> paste lib/karma
HackBot
parents:
diff changeset
12