Mercurial > repo
comparison bin/whoq @ 11591:8d0288361b28 draft
<fizzie> fetch bin/whoq https://hack.esolangs.org/get/bin/whoq
author | HackEso <hackeso@esolangs.org> |
---|---|
date | Wed, 08 Aug 2018 13:49:39 +0000 |
parents | |
children | eb873414aa9c |
comparison
equal
deleted
inserted
replaced
11590:ddc7063c3095 | 11591:8d0288361b28 |
---|---|
1 if [[ "$1" =~ "^[0-9]*$" ]]; then | |
2 rev="$(hg blame quotes | sed "$1{s/^ *//;s/:.*//;q};d")" | |
3 if [[ -n "$rev" ]]; then | |
4 hg log -r "$rev" -T "{desc}" | |
5 else | |
6 echo "$1: no such quote" | |
7 fi | |
8 else | |
9 echo "usage: `whoq N" | |
10 fi |