From d0d972e192f694475d4b722ebd8e1fbb4055b2b0 Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Sun, 21 May 2023 11:01:27 -0700 Subject: spw/may-pass-to-gdbmacs-p: use server-running-p --- .emacs.d/init.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/.emacs.d/init.el b/.emacs.d/init.el index e7e5a97a..fae2b927 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -2591,7 +2591,7 @@ Called by '~/src/dotfiles/bin/emacsclient --spw/update-environment'." (defun spw/may-pass-to-gdbmacs-p () (and (display-graphic-p) (not (string= (daemonp) "gdbmacs")) - (spw/daemon-pid "gdbmacs"))) + (eq (server-running-p "gdbmacs") t))) ;; open a frame on a new workspace with only the relevant dired buffer open, ;; eval this form: (global-set-key "\C-cG" #'spw/grading-advance) -- cgit v1.2.3