Location: steve@xxxxxxxxxxxxxx http://arch.eicq.org/2005/
Revision: xwem--steve--2.1--patch-5
Archive: steve@xxxxxxxxxxxxxx
Creator: Steve Youngs <steve@xxxxxxxx>
Date: Tue Feb 15 00:56:32 EST 2005
Standard-date: 2005-02-14 14:56:32 GMT
New-files: xwem-agent/.arch-ids/.arch-inventory.id
xwem-agent/.arch-inventory
Modified-files: lisp/xwem-main.el xwem-agent/xwem-agent.c
New-patches: steve@xxxxxxxxxxxxxx/xwem--steve--2.1--patch-5
Summary: Implement XWEM_RUNNING environment variable.
Keywords: enhancement
* xwem-agent/xwem-agent.c (start_emacs): Set the environment variable
XWEM_RUNNING to `notyet'.
(main): Unset XWEM_RUNNING environment variable when we fall out of the
event loop.
Also update commentary section.
* lisp/xwem-main.el (xwem-after-window-setup): Maybe set XWEM_RUNNING
environment variable to "yes".
(xwem-fini): Maybe unset XWEM_RUNNING environment variable.
The XWEM_RUNNING variable can be used to later control doing things in
(S)XEmacs that either shouldn't be done if XWEM is running or should only
be done if XWEM is running. For example, in your init.el, you could have
something like...
;; Only set the frame plists if we are _not_ in XWEM
(unless (getenv "XWEM_RUNNING")
(setq initial-frame-plist '(top 10 left 10 width 98 height 41)
default-frame-plist '(top 10 left 10 width 98 height 41)))
;; Only start XWEM if we're on a window system device and XWEM_RUNNING is
;; set to "notyet".
(when (and (string= "notyet" (getenv "XWEM_RUNNING"))
(device-on-window-system-p))
(xwem-init))
* xwem-agent/.arch-inventory: Make xwem-agent and xwem-agent.o precious.
|