Update snakify; add lispify

This commit is contained in:
Jeffrey Serio 2023-08-11 11:48:18 -05:00
parent 570fd71c76
commit 030006762e
2 changed files with 15 additions and 1 deletions

12
lispify Executable file
View File

@ -0,0 +1,12 @@
#!/usr/bin/env zsh
# Lispify - convert file names to-lisp-case
filename=$(basename -- "$1")
extension="${filename##*.}"
filename="${filename%.*}"
new_filename=$(echo ${filename// /-} | tr '_' '-' | tr -cd '[:alnum:]._-')
new_basename=$(echo "$new_filename.$extension")
mv -i "$1" "$new_basename"
if ! [ "$new_basename" = "${new_basename:l}" ]; then
mv -i "$new_basename" "${new_basename:l}"
fi

View File

@ -7,4 +7,6 @@ filename="${filename%.*}"
new_filename=$(echo ${filename// /_} | tr '-' '_' | tr -cd '[:alnum:]._-')
new_basename=$(echo "$new_filename.$extension")
mv -i "$1" "$new_basename"
if ! [ "$new_basename" = "${new_basename:l}" ]; then
mv -i "$new_basename" "${new_basename:l}"
fi