diff options
| author | Sean Whitton <spwhitton@spwhitton.name> | 2022-10-26 17:03:46 -0700 |
|---|---|---|
| committer | Sean Whitton <spwhitton@spwhitton.name> | 2022-10-29 21:47:37 -0700 |
| commit | 76950925a36c7f4dbccad52ff7ef5b489e3ac222 (patch) | |
| tree | c356280b29f461cedf75fc994eb52f80929ec38b /bin/emacsclient | |
| parent | e8f0e82c70d57653ddd1cb6fa89a710ab024ac7f (diff) | |
| download | dotfiles-76950925a36c7f4dbccad52ff7ef5b489e3ac222.tar.gz | |
emacsclient wrapper: use gdb-wait-for-pending when detaching gdbmacs
Diffstat (limited to 'bin/emacsclient')
| -rwxr-xr-x | bin/emacsclient | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/bin/emacsclient b/bin/emacsclient index ed1c2215..2b818e04 100755 --- a/bin/emacsclient +++ b/bin/emacsclient @@ -125,8 +125,12 @@ if [ -z "$daemon_name" ] && $devel_running && $want_installed; then # gdb so that `spw/gdbmacs-attach' doesn't look at `gdb-inferior-status'. [ -n "${gdbmacs:=$(get_listener ${socket_dir}gdbmacs)}" ] \ && "$installed_emacsclient" -sgdbmacs \ - --eval '(gud-basic-call "detach")' \ - --eval '(gud-basic-call "quit")' + --eval '(gdb-wait-for-pending + (lambda () + (gud-basic-call "detach") + (gdb-wait-for-pending + (lambda () + (gud-basic-call "quit")))))' wait $inotifywait devel_running=false |