Lassen Sie emacsclient nur dann einen Frame erstellen, wenn noch keiner vorhanden ist

Wie kann ich emacsclient -a '' -nnur dann einen neuen Rahmen erstellen, wenn noch keiner vorhanden ist?

Das Problem mit dem -cFlag ist, dass es jedes Mal einen neuen Frame erstellt. Das Problem ohne es ist, dass wenn kein Frame geöffnet ist, er in der Befehlszeile geöffnet wird.

Wenn ich überprüfen kann, ob ein offener Emacs-Frame in der Shell vorhanden ist, kann ich mit oder ohne davon aufrufen -c, um das gewünschte Verhalten zu erhalten. Ich habe es versucht:

$ emacsclient -a '' --eval '(frames-on-display-list)'
(#<frame F1 0xba2740>)

Ich bekomme immer das gleiche Ergebnis.

Ich könnte temporäre Dateien oder pgrep verwenden, aber diese Ansätze sind sehr fehleranfällig.

Dies ähnelt dieser Frage , ist jedoch kein Duplikat, da das dortige OP damit zufrieden war, vor dem Aufruf einen Frame geöffnet zu haben emacsclient.

Am Ende habe ich dieses Skript basierend darauf erstellt

#!/bin/bash -e

if [[ "$DISPLAY" ]]; then
        frame=`emacsclient -a '' -e "(member \"$DISPLAY\" (mapcar 'terminal-name (frames-on-display-list)))" 2>/dev/null`
        [[ "$frame" == "nil" ]] && opts='-c' # if there is no frame open create one
        [[ "${@/#-nw/}" == "$@" ]] && opts="$opts -n" # don't wait unless we've asked to run in a terminal
else
        opts='-nw'
fi

exec emacsclient -a '' $opts "$@"

Wenn keine Anzeige vorhanden ist, wird sie mit geöffnet -nw. Wenn festgelegt, $DISPLAYwird in dieser Anzeige nach Frames gesucht, um festzustellen, ob ein neuer erstellt werden muss.

Bearbeiten: Ich habe es so geändert, dass Sie manuell angeben können, -nwob Sie in einem Terminal öffnen möchten, auch wenn eine Anzeige vorhanden ist.

Sie können verwenden:

emacsclient -s server_name -e '(+ 1 0)' >/dev/null 2>&1

um zu überprüfen, ob der Emacs-Server "server_name"bereits ausgeführt wird. Wenn der Befehl den Exit-Code 0 zurückgibt, wird er ausgeführt. Wenn ja, verwenden Sie einfach den emacsclientBefehl:

emacsclient -s server_name -n file_name.txt

Wenn es nicht ausgeführt wird, können Sie einen neuen Emacs-Server öffnen, zum Beispiel mit:

emacs --eval '(setq server-name "server_name")' --eval '(server-start)' file_name.txt &