From: Chris Hanson Date: Thu, 15 Jun 2000 00:36:59 +0000 (+0000) Subject: Allow description of a command, variable, or mode to be a thunk that X-Git-Tag: 20090517-FFI~3538 X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=4d31a152185200b2723ca7d7b68b183782d998eb;p=mit-scheme.git Allow description of a command, variable, or mode to be a thunk that evaluates to a string. --- diff --git a/v7/src/edwin/edwin.ldr b/v7/src/edwin/edwin.ldr index cdc490cf1..d9dd4debe 100644 --- a/v7/src/edwin/edwin.ldr +++ b/v7/src/edwin/edwin.ldr @@ -1,6 +1,6 @@ #| -*-Scheme-*- -$Id: edwin.ldr,v 1.70 2000/06/08 18:00:44 cph Exp $ +$Id: edwin.ldr,v 1.71 2000/06/15 00:36:59 cph Exp $ Copyright (c) 1989-2000 Massachusetts Institute of Technology @@ -129,6 +129,7 @@ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. (load "simple" environment) (load "debuge" environment) (load "modlin" (->environment '(EDWIN MODELINE-STRING))) + (load "hlpcom" environment) (load "input" (->environment '(EDWIN KEYBOARD))) (load "prompt" (->environment '(EDWIN PROMPT))) (load "comred" (->environment '(EDWIN COMMAND-READER))) @@ -218,7 +219,6 @@ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. (load "evlcom" environment) (load "filcom" environment) (load "fill" environment) - (load "hlpcom" environment) (load "info" (->environment '(EDWIN INFO))) (load "intmod" (->environment '(EDWIN INFERIOR-REPL))) (load "keymap" (->environment '(EDWIN COMMAND-SUMMARY)))