view bin/whoops @ 12269:00ab7b8652c5 draft

<fizzie> mkx /hackenv/bin/guile///usr/bin/guile -c \'(display \'"$*"\')\'
author HackEso <hackeso@esolangs.org>
date Thu, 19 Dec 2019 20:00:51 +0000
parents 627b52c6b2cb
children
line wrap: on
line source

OLD="$HACKENV/wisdom/$1"; [ -z "$1" ] && OLD="$(lastfiles)"; NEW="${OLD}s"; if [ -f "$NEW" ]; then echo "«${NEW}» already exists"; exit 1; fi; mv "$OLD" "$NEW" && echo "«${OLD}» -> «${NEW}»"