2011-04-13 15:34:51 +00:00
|
|
|
#!/bin/sh
|
|
|
|
|
2011-10-10 16:04:13 +00:00
|
|
|
# get list of available X windows.
|
2011-04-13 15:34:51 +00:00
|
|
|
x=`emacsclient --alternate-editor '' --eval '(x-display-list)' 2>/dev/null`
|
2011-10-10 16:04:13 +00:00
|
|
|
|
2014-03-24 11:10:18 +00:00
|
|
|
if [ -z "$x" ] || [ "$x" = "nil" ] ;then
|
2011-10-10 16:04:13 +00:00
|
|
|
# Create one if there is no X window yet.
|
2011-04-15 16:13:01 +00:00
|
|
|
emacsclient --alternate-editor "" --create-frame "$@"
|
2011-04-13 15:34:51 +00:00
|
|
|
else
|
2011-04-14 05:17:10 +00:00
|
|
|
# prevent creating another X frame if there is at least one present.
|
2011-04-15 16:13:01 +00:00
|
|
|
emacsclient --alternate-editor "" "$@"
|
2011-04-13 15:34:51 +00:00
|
|
|
fi
|