annotate bin/whoq @ 12500:e48c08805365 draft default tip

<b_jonas> ` learn \'The password of the month is Cthulhuquagdonic Mothraquagdonic Narwhalicorn.\' # https://logs.esolangs.org/libera-esolangs/2024-04.html#lKE Infinite craft
author HackEso <hackeso@esolangs.org>
date Wed, 01 May 2024 06:39:10 +0000
parents 3d6b560fc682
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
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
12121
3d6b560fc682 <fizzie> sled /hackenv/bin/whoq//s|quotes|${HACKENV-/hackenv}/quotes|
HackEso <hackeso@esolangs.org>
parents: 11594
diff changeset
2 rev="$(hg blame ${HACKENV-/hackenv}/quotes | sed "$1{s/^ *//;s/:.*//;q};d")"
11591
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