From 3e9e4d3f8f518f8f467066593ae6f270d97f6d60 Mon Sep 17 00:00:00 2001
From: Toby Goodwin <tjg@star.le.ac.uk>
Date: Wed, 10 Nov 1999 14:55:51 +0000
Subject: beta: rc-1.6b1

---
 var.c | 9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

(limited to 'var.c')

diff --git a/var.c b/var.c
index 8ef453b..e7161de 100644
--- a/var.c
+++ b/var.c
@@ -57,14 +57,19 @@ extern bool varassign_string(char *extdef) {
    associated with $status)
 */
 
+static List id2 = { "$Release: @(#)" PACKAGE " " VERSION " " RELDATE " $", 0, 0 };
+static List id1 = { VERSION, 0, &id2 };
+
 extern List *varlookup(char *name) {
 	Variable *look;
 	List *ret, *l;
 	int sub;
-	if (streq(name, "status"))
-		return sgetstatus();
 	if (streq(name, "apids"))
 		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