Zander671/zsh-config
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Add extra confirmation to emacs-bookmark.zsh

Browse Source
This commit is contained in:
Alexander Rosenberg 2024-03-10 06:32:19 -07:00
parent bf92e25100
commit 8459b7e1ac
Signed by: Zander671
GPG Key ID: 5FD0394ADBD72730
1 changed files with 12 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
emacs-bookmark.zsh
View File

@ -135,6 +135,14 @@ function bmadd {
name="${2}"
;;
esac
__bm_update_bookmark_list
if __bm_bookmark_location "${name}" >/dev/null; then
printf 'Bookmark "%s" already exists. Overwrite it? [y/N] ' "${name}"
read -q
let ans=${?}
printf '\n'
(( ${ans} != 0 )) && return 1
fi
local res="$(emacsclient --eval \
"(let* ((loc \"${loc:gs#\\#\\\\#:gs#\"#\\\"#}\")
(name \"${name:gs#\\#\\\\#:gs#\"#\\\"#}\")
@ -163,7 +171,10 @@ function bmrm {
printf 'usage: bmrm [NAME]\n'
return 1
fi
printf 'Really delete "%s" [y/N]: ' "${1}"
__bm_update_bookmark_list
__bm_bookmark_location "${1}" >/dev/null || \
{ printf 'No such bookmark: "%s"\n' "${1}"; return 1 }
printf 'Really delete "%s"? [y/N] ' "${1}"
if read -q; then
printf '\n'
local res="$(emacsclient --eval \