From c24992d132dfb21ad5b1ee44154a5a8c008d6def Mon Sep 17 00:00:00 2001
From: tjg <tjg>
Date: Thu, 11 Nov 1999 09:26:33 +0000
Subject: 1999-11-10

  Feature: make `version' a list.
---
 ChangeLog | 2 ++
 var.c     | 5 +++--
 2 files changed, 5 insertions(+), 2 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index e620b9a..0234175 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -644,4 +644,6 @@ Changes since rc-1.5b2
 
 1999-11-10
 
+  Feature: make `version' a list.
+
   Release: rc-1.6b1.
diff --git a/var.c b/var.c
index e5fdfcb..e7161de 100644
--- a/var.c
+++ b/var.c
@@ -57,7 +57,8 @@ extern bool varassign_string(char *extdef) {
    associated with $status)
 */
 
-static List id = { "$Release: @(#)" PACKAGE " " VERSION " " RELDATE " $", 0, 0 };
+static List id2 = { "$Release: @(#)" PACKAGE " " VERSION " " RELDATE " $", 0, 0 };
+static List id1 = { VERSION, 0, &id2 };
 
 extern List *varlookup(char *name) {
 	Variable *look;
@@ -68,7 +69,7 @@ extern List *varlookup(char *name) {
 	if (streq(name, "status"))
 		return sgetstatus();
 	if (streq(name, "version"))
-		return &id;
+		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