From dbe5d1a386d6e40187e4fac2522ff00bb0d4d840 Mon Sep 17 00:00:00 2001 From: Chris Hanson Date: Tue, 18 Aug 1992 22:43:08 +0000 Subject: [PATCH] Fix missing argument in call to prompt-for-string. --- v7/src/6001/make.scm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/v7/src/6001/make.scm b/v7/src/6001/make.scm index 62f50ad27..468a20402 100644 --- a/v7/src/6001/make.scm +++ b/v7/src/6001/make.scm @@ -1,6 +1,6 @@ #| -*-Scheme-*- -$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/6001/make.scm,v 15.9 1992/08/18 22:36:31 cph Exp $ +$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/6001/make.scm,v 15.10 1992/08/18 22:43:08 cph Exp $ Copyright (c) 1991-92 Massachusetts Institute of Technology @@ -65,7 +65,8 @@ MIT in each case. |# edwin-variable$mail-default-reply-to (lambda () (let ((reply-to - (prompt-for-string "Please enter an email address for replies"))) + (prompt-for-string "Please enter an email address for replies" + false))) (set-variable-value! edwin-variable$mail-default-reply-to reply-to) reply-to)))) -- 2.25.1