rc

commit c24992d132dfb21ad5b1ee44154a5a8c008d6def
parent 31b3400165654188894b35dcf43ede44dc7e553e
Author: tjg <tjg>
Date:   Thu, 11 Nov 1999 09:26:33 +0000

1999-11-10

  Feature: make `version' a list.

Diffstat:
M
ChangeLog
 | 
2
++
M
var.c
 | 
5
+++--

2 files changed, 5 insertions(+), 2 deletions(-)
diff --git 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
@@ -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;