annotate bin/slashlearn @ 10304:7d14a8891360

<oerjan> sled bin/slashlearn//2s,\'.*\',\'Usage: `le/[/]rn <key>//<wisdom>\',
author HackBot
date Fri, 17 Feb 2017 02:40:08 +0000
parents 68aaf05e3aec
children 8c13cadf308f
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
9857
eee3c706c9e7 <oerjan> sled bin/slashlearn//1,2csep="//"
HackBot
parents: 9470
diff changeset
1 sep="//"
10304
7d14a8891360 <oerjan> sled bin/slashlearn//2s,\'.*\',\'Usage: `le/[/]rn <key>//<wisdom>\',
HackBot
parents: 9880
diff changeset
2 [[ "$1" == ?*"$sep"* ]] || { echo 'Usage: `le/[/]rn <key>//<wisdom>' >&2 ; exit 1; }
9466
f0e4ef9ab8b0 <oerjan> sled bin/slashlearn//s/; /\\n/g
HackBot
parents: 9307
diff changeset
3 key="$(echo "${1%%$sep*}" | lowercase)"
f0e4ef9ab8b0 <oerjan> sled bin/slashlearn//s/; /\\n/g
HackBot
parents: 9307
diff changeset
4 value="${1#*$sep}"
f0e4ef9ab8b0 <oerjan> sled bin/slashlearn//s/; /\\n/g
HackBot
parents: 9307
diff changeset
5 [ -e "wisdom/$key" ] && verb="Relearned" || verb="Learned"
9858
fc0b936bfb57 <oerjan> sled bin/slashlearn//$s,[/] , ,
HackBot
parents: 9857
diff changeset
6 echo "$value" > "$(echo-p "wisdom/$key")" && echo -n "$verb '$key': $(echo "$value" | sed 's.^[ ].0,04&.')"