From 6eb13d686485e40543806e4b07ec79adba0d155d Mon Sep 17 00:00:00 2001 From: Arthur Gleckler Date: Fri, 9 Aug 1991 18:42:23 +0000 Subject: [PATCH] Export Edwin variables to the (edwin) package: X-SCREEN-NAME-FORMAT X-SCREEN-ICON-NAME-FORMAT X-SCREEN-ICON-NAME-LENGTH --- v7/src/edwin/edwin.pkg | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/v7/src/edwin/edwin.pkg b/v7/src/edwin/edwin.pkg index a0752fe18..c6fb70913 100644 --- a/v7/src/edwin/edwin.pkg +++ b/v7/src/edwin/edwin.pkg @@ -1,6 +1,6 @@ #| -*-Scheme-*- -$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/edwin/edwin.pkg,v 1.48 1991/08/06 22:52:31 bal Exp $ +$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/edwin/edwin.pkg,v 1.49 1991/08/09 18:42:23 arthur Exp $ Copyright (c) 1989-91 Massachusetts Institute of Technology @@ -281,7 +281,10 @@ MIT in each case. |# x-button2-up x-button3-up x-button4-up - x-button5-up) + x-button5-up + edwin-variable$x-screen-name-format + edwin-variable$x-screen-icon-name-format + edwin-variable$x-screen-icon-name-length) (export (edwin x-screen) update-xterm-screen-names!)) -- 2.25.1