Provide a run light for Edwin, which shows "eval" when Edwin is
authorArthur Gleckler <edu/mit/csail/zurich/arthur>
Wed, 28 Aug 1991 22:28:42 +0000 (22:28 +0000)
committerArthur Gleckler <edu/mit/csail/zurich/arthur>
Wed, 28 Aug 1991 22:28:42 +0000 (22:28 +0000)
commitb972f9ffa414978f2214799492b89170881dd5a8
tree95e46d58ccc0b2cbfa42bfd7755a6ae33c6e060f
parenta6a823c6f9c47ea600d2f23268ec80d17c02ea41
Provide a run light for Edwin, which shows "eval" when Edwin is
evaluating an expression provided by the user.  This is accomplished
by setting the Edwin variable RUN-LIGHT to "eval" or false.  The
default value of MODE-LINE-PROCESS will now cause ": eval" to appear
after the names of the minor modes on the mode line, e.g.:

  (Scheme Narrow)

when no evaluation is running, and

  (Scheme Narrow: eval)

when an evaluation is running.  Because this requires a DYNAMIC-WIND
at every evaluation, Edwin variable ENABLE-RUN-LIGHT? can be used to
disable this feature.
v7/src/edwin/evlcom.scm
v7/src/edwin/modlin.scm