changeset 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 ddc7063c3095
children 86501fb700bb
files bin/whoq
diffstat 1 files changed, 10 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/bin/whoq	Wed Aug 08 13:49:39 2018 +0000
@@ -0,0 +1,10 @@
+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