annotate paste/paste.12049 @ 11953:dcbbe7c31186 draft

<kmc> addquote <LKoen> kmc: it\'s 3am and instead of going to bed I just spent a looot of time reading a long article about circadian rythms and melatonin
author HackEso <hackeso@esolangs.org>
date Thu, 26 Sep 2019 01:03:26 +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