From: Chris Hanson <org/chris-hanson/cph>
Date: Wed, 15 Mar 2000 03:37:01 +0000 (+0000)
Subject: Use new release version string from runtime rather than deprecated
X-Git-Tag: 20090517-FFI~4204
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=72e3e4805267fe7228ff44d9af606e208649c12d;p=mit-scheme.git

Use new release version string from runtime rather than deprecated
string from microcode.
---

diff --git a/v7/src/edwin/sendmail.scm b/v7/src/edwin/sendmail.scm
index b1086795d..878d9f0bf 100644
--- a/v7/src/edwin/sendmail.scm
+++ b/v7/src/edwin/sendmail.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;; $Id: sendmail.scm,v 1.45 2000/02/29 02:41:44 cph Exp $
+;;; $Id: sendmail.scm,v 1.46 2000/03/15 03:37:01 cph Exp $
 ;;;
 ;;; Copyright (c) 1991-2000 Massachusetts Institute of Technology
 ;;;
@@ -371,7 +371,7 @@ is inserted."
        (string-append "Edwin [version "
 		      (get-subsystem-version-string "edwin")
 		      ", MIT Scheme Release "
-		      microcode-id/release-string
+		      (get-subsystem-version-string "release")
 		      "]")))
 
 (define-variable mail-setup-hook