From 2e67f638ea031ce0138891b6356806b463f5e9af Mon Sep 17 00:00:00 2001
From: Toby Goodwin <tjg@star.le.ac.uk>
Date: Wed, 22 May 2002 14:25:10 +0100
Subject: candidate: rc-1.6c7

---
 var.c | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'var.c')

diff --git a/var.c b/var.c
index 1c30fba..e53ff09 100644
--- a/var.c
+++ b/var.c
@@ -18,6 +18,7 @@ extern void varassign(char *name, List *def, bool stack) {
 	new = get_var_place(name, stack);
 	new->def = newdef;
 	new->extdef = NULL;
+	set_exportable(name, TRUE);
 #if READLINE
 	if (interactive && (streq(name, "TERM") || streq(name, "TERMCAP")))
 		rl_reset_terminal(NULL);
@@ -68,8 +69,6 @@ extern List *varlookup(char *name) {
 		return sgetapids();
 	if (streq(name, "status"))
 		return sgetstatus();
-	if (streq(name, "version"))
-		return &id1;
 	if (*name != '\0' && (sub = a2u(name)) != -1) { /* handle $1, $2, etc. */
 		for (l = varlookup("*"); l != NULL && sub != 0; --sub)
 			l = l->n;
-- 
cgit v1.2.3