Mercurial > repo
view bin/whoq @ 11593:eb873414aa9c draft
<fizzie> fetch bin/whoq https://hack.esolangs.org/get/bin/whoq
author | HackEso <hackeso@esolangs.org> |
---|---|
date | Wed, 08 Aug 2018 13:51:09 +0000 |
parents | 8d0288361b28 |
children | 27e437aef877 |
line wrap: on
line source
if [[ "$1" =~ "^[0-9]*$" ]]; then rev="$(hg blame quotes | sed "$1{s/^ *//;s/:.*//;q};d")" if [[ -n "$rev" ]]; then hg log -r "$rev" -T "{desc}" else echo "$1: no such quote" fi else echo "usage: \`whoq N" fi