home/rc/extra/autorestore.kak
Frank LENORMAND c379c5cbdc rc: Simplify/POSIXify the autorestore.kak script
This commit allows buffers that were not previously written to disk to
be restored if a backup has been generated in their name. Consequently,
we got rid of a few non-POSIX calls to `find` (using `-maxdepth` or
`-delete`), and of the logic that detected the newest backup (which
didn't seem a good reason enough to steer away from a portable command).

Fixes #1236
2017-02-24 14:48:49 +03:00

61 lines
2.2 KiB
Plaintext

## If set to true, backups will be removed as soon as they have been restored
decl bool autorestore_purge_restored true
## Insert the content of the backup file into the current buffer, if a suitable one is found
def autorestore-restore-buffer -docstring "Restore the backup for the current file if it exists" %{
%sh{
buffer_basename="${kak_buffile##*/}"
buffer_dirname=$(dirname "${kak_buffile}")
## Find the name of the latest backup created for the buffer that was open
backup_path=$(ls -1t ."${kak_bufname}".kak.* | head -n 1)
if [ -z "${backup_path}" ]; then
exit
fi
printf %s\\n "
## Replace the content of the buffer with the content of the backup file
exec -draft %{ %d!cat<space>${backup_path}<ret>d }
## If the backup file has to be removed, issue the command once
## the current buffer has been saved
## If the autorestore_purge_restored option has been unset right after the
## buffer was restored, do not remove the backup
hook -group autorestore buffer BufWritePost '${kak_buffile}' %{
nop %sh{
if [ \"\${kak_opt_autorestore_purge_restored}\" = true ]; then
ls -1 '${buffer_dirname}'/.'${buffer_basename}'.kak.* | while read -r f; do
rm -f \"\${f}\"
done
fi
}
}
"
}
}
## Remove all the backups that have been created for the current buffer
def autorestore-purge-backups -docstring "Remove all the backups of the current buffer" %{
nop %sh{
if [ ! -f "${kak_buffile}" ]; then
exit
fi
buffer_basename="${kak_bufname##*/}"
buffer_dirname=$(dirname "${kak_bufname}")
ls -1 "${buffer_dirname}"/."${buffer_basename}".kak.* | while read -r f; do
rm -f "${f}"
done
}
echo -color Information 'Backup files removed'
}
## If for some reason, backup files need to be ignored
def autorestore-disable -docstring "Disable automatic backup recovering" %{
remove-hooks global autorestore
}
hook -group autorestore global BufCreate .* %{ autorestore-restore-buffer }