From 23a55546da00c742b63afc78f0ac21fd4e193240 Mon Sep 17 00:00:00 2001 From: Chris Hanson Date: Sun, 23 Apr 1989 23:31:56 +0000 Subject: [PATCH] Fix error in definition of `unix/current-file-time'. --- v7/src/runtime/unxprm.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/v7/src/runtime/unxprm.scm b/v7/src/runtime/unxprm.scm index 2e1d377c4..0719544c4 100644 --- a/v7/src/runtime/unxprm.scm +++ b/v7/src/runtime/unxprm.scm @@ -1,6 +1,6 @@ #| -*-Scheme-*- -$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/runtime/unxprm.scm,v 1.1 1989/04/05 04:26:29 cph Exp $ +$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/runtime/unxprm.scm,v 1.2 1989/04/23 23:31:56 cph Exp $ Copyright (c) 1988, 1989 Massachusetts Institute of Technology @@ -111,7 +111,7 @@ MIT in each case. |# (ucode-primitive current-gid)) (define unix/current-file-time - (ucode-primitive current-user-name)) + (ucode-primitive current-file-time)) (define unix/file-time->string (ucode-primitive file-time->string)) -- 2.25.1