Desktop.el под emacsclient - PullRequest
Новая
       10

Desktop.el под emacsclient

1 голос
/ 18 сентября 2010

Я пытаюсь использовать функциональность рабочего стола (http://www.emacswiki.org/emacs/DeskTop) в emacs. Я добавил следующий код в мой .emacs: 

(require 'desktop)
(setq desktop-save t)
(setq desktop-load-locked-desktop t)
(setq *desktop-dir* (list (expand-file-name "~/.emacs.d/desktop")))
(setq desktop-base-file-name ".emacs.desktop")
(setq desktop-path *desktop-dir*)
(setq desktop-dir *desktop-dir*)
(desktop-save-mode 1)
(desktop-read)

Если я использую emacs как отдельное приложение, вызывающее как "$ emacs -nw", все нормально, но когда я пытаюсь использовать тот же конфиг с emacsclient, emacs просто зависает при запуске сервера. Закомментируя две последние строки, сервер emacs запускается, как и ожидалось.

См. Часть официального скрипта Gentoo из /etc/init.d для запуска демона emacs. 

: ${EMACS:=/usr/bin/emacs}
: ${EMACS_OPTS:=--daemon}
: ${EMACS_SHELL=/bin/bash}
: ${EMACS_START:=/usr/libexec/emacs/emacs-wrapper.sh}
: ${EMACS_TIMEOUT:=30}
: ${EMACS_SHUTDOWN_TIMEOUT:=10}
USER=${SVCNAME#*.}
PIDFILE_DIR=/var/run/emacs/${USER}
PIDFILE=${PIDFILE_DIR}/emacs.pid
...
local home
checkconfig || return 1

eval home="~${USER}"

SHELL=${EMACS_SHELL:-$(awk -F: "\$1 == \"${USER}\" { print \$7 }" \
    /etc/passwd)}
export SHELL EMACS EMACS_TIMEOUT

ebegin "Starting Emacs daemon for user ${USER}"
if [ -z "${RC_SVCNAME}" ]; then
    # baselayout-1
    start-stop-daemon --start \
        --user "${USER}" --exec "${EMACS}" --pidfile "${PIDFILE}" \
        --chuid "${USER}" --chdir "${home}" --env HOME="${home}" \
        --startas "${EMACS_START}" -- ${EMACS_OPTS}
else
    # OpenRC
    start-stop-daemon --start \
        --user "${USER}" --pidfile "${PIDFILE}" --chdir "${home}" \
        --exec "${EMACS_START}" -- ${EMACS_OPTS}
fi
eend $?

Можно ли как-то отладить проблемы с истощением? Может быть, кто-то может дать подсказку?

* * 1012 P.S. Я использую Gentoo Linux, пакет emacs-vcs-23.2.9999, только терминал.
...