diff --git a/code/misc.lisp b/code/misc.lisp
index 80e7d8680024167a61899b05bd2dcd7392bbe363..8f5dc2bef25cc331f6e2cacda1fabfae2ae313cb 100644
--- a/code/misc.lisp
+++ b/code/misc.lisp
@@ -7,7 +7,7 @@
 ;;; Scott Fahlman (FAHLMAN@CMUC). 
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/misc.lisp,v 1.3 1990/08/24 18:11:59 wlott Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/misc.lisp,v 1.4 1990/10/17 03:38:02 ram Exp $
 ;;;
 ;;; Assorted miscellaneous functions for Spice Lisp.
 ;;;
@@ -100,7 +100,10 @@
 
 (defun software-version ()
   "Returns a string describing version of the supporting software."
-  NIL)
+  (string-trim
+   '(#\newline)
+   (with-output-to-string (stream)
+     (run-program "/usr/cs/etc/version" nil :output stream))))
 
 (defun short-site-name ()
   "Returns a string with the abbreviated site name."