hyperreal
/
bin
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

4
snakify
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"
mv -i "$new_basename" "${new_basename:l}"
if ! [ "$new_basename" = "${new_basename:l}" ]; then
mv -i "$new_basename" "${new_basename:l}"
fi