track) ;;
*) bail "unexpected first-line token \`$k'" ;;
esac
+ unset who
read -p k _
case $k in id) ;; *) bail "unexpected second-line token \`$k'" ;; esac
- read -p k _
- case $k in picked) read -p k _ ;; esac
+ read -p k _ name _
+ case $k in picked) who=$name; read -p k _ ;; esac
case $k in played) ;; *) bail "unexpected third-line token \`$k'" ;; esac
read -pA t
case $t[-1] in started | ok) st="" ;; paused) st=" (paused)" ;; esac
- kill $kid
+ kill $kid >/dev/null 2>&1 || :
artist=$(disorder part $track display artist)
album=$(disorder part $track display album)
title=$(disorder part $track display title)
case $artist in [A-Z]) artist=$album album= ;; esac
- echo "$artist: ‘$title’${album+, from ‘$album’}"
+ echo "$artist: ‘$title’${album+, from ‘$album’}${who+
+(chosen by $who)}"
}
op-scratch () { disorder scratch; }