From: Chris Hanson Date: Fri, 13 Mar 1992 09:45:49 +0000 (+0000) Subject: Change EDITOR-FAILURE to post a regular message instead of a temporary X-Git-Tag: 20090517-FFI~9609 X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=20cd74ff7cde6305d9f64f23fb4f2969875c63f7;p=mit-scheme.git Change EDITOR-FAILURE to post a regular message instead of a temporary one. --- diff --git a/v7/src/edwin/basic.scm b/v7/src/edwin/basic.scm index 3a902dc5f..07fb7f957 100644 --- a/v7/src/edwin/basic.scm +++ b/v7/src/edwin/basic.scm @@ -1,6 +1,6 @@ ;;; -*-Scheme-*- ;;; -;;; $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/edwin/basic.scm,v 1.123 1992/03/08 18:33:55 arthur Exp $ +;;; $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/edwin/basic.scm,v 1.124 1992/03/13 09:45:49 cph Exp $ ;;; ;;; Copyright (c) 1986, 1989-92 Massachusetts Institute of Technology ;;; @@ -247,7 +247,7 @@ For more information type the HELP key while entering the name." (set-buffer-backed-up?! buffer false)) (define (editor-failure . strings) - (cond ((not (null? strings)) (apply temporary-message strings)) + (cond ((not (null? strings)) (apply message strings)) (*defining-keyboard-macro?* (clear-message))) (editor-beep) (keyboard-macro-disable))