mirror of
https://codeberg.org/hyperreal/bin
synced 2024-11-01 16:43:08 +01:00
13 lines
399 B
Plaintext
13 lines
399 B
Plaintext
|
#!/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
|