Mercurial > repo
annotate bin/whoq @ 12020:9b7441dadcb5 draft
<b_jonas> `` /bin/sed -i \'s%"/hackenv/%($ENV{HACKENV}//"/hackenv")."/%\' bin/card-by-name
author | HackEso <hackeso@esolangs.org> |
---|---|
date | Thu, 14 Nov 2019 21:50:18 +0000 |
parents | 27e437aef877 |
children | 3d6b560fc682 |
rev | line source |
---|---|
11594
27e437aef877
<fizzie> fetch bin/whoq https://hack.esolangs.org/get/bin/whoq
HackEso <hackeso@esolangs.org>
parents:
11593
diff
changeset
|
1 if [[ "$1" =~ ^[0-9]+$ ]]; then |
11591
8d0288361b28
<fizzie> fetch bin/whoq https://hack.esolangs.org/get/bin/whoq
HackEso <hackeso@esolangs.org>
parents:
diff
changeset
|
2 rev="$(hg blame quotes | sed "$1{s/^ *//;s/:.*//;q};d")" |
8d0288361b28
<fizzie> fetch bin/whoq https://hack.esolangs.org/get/bin/whoq
HackEso <hackeso@esolangs.org>
parents:
diff
changeset
|
3 if [[ -n "$rev" ]]; then |
8d0288361b28
<fizzie> fetch bin/whoq https://hack.esolangs.org/get/bin/whoq
HackEso <hackeso@esolangs.org>
parents:
diff
changeset
|
4 hg log -r "$rev" -T "{desc}" |
8d0288361b28
<fizzie> fetch bin/whoq https://hack.esolangs.org/get/bin/whoq
HackEso <hackeso@esolangs.org>
parents:
diff
changeset
|
5 else |
8d0288361b28
<fizzie> fetch bin/whoq https://hack.esolangs.org/get/bin/whoq
HackEso <hackeso@esolangs.org>
parents:
diff
changeset
|
6 echo "$1: no such quote" |
8d0288361b28
<fizzie> fetch bin/whoq https://hack.esolangs.org/get/bin/whoq
HackEso <hackeso@esolangs.org>
parents:
diff
changeset
|
7 fi |
8d0288361b28
<fizzie> fetch bin/whoq https://hack.esolangs.org/get/bin/whoq
HackEso <hackeso@esolangs.org>
parents:
diff
changeset
|
8 else |
11593
eb873414aa9c
<fizzie> fetch bin/whoq https://hack.esolangs.org/get/bin/whoq
HackEso <hackeso@esolangs.org>
parents:
11591
diff
changeset
|
9 echo "usage: \`whoq N" |
11591
8d0288361b28
<fizzie> fetch bin/whoq https://hack.esolangs.org/get/bin/whoq
HackEso <hackeso@esolangs.org>
parents:
diff
changeset
|
10 fi |