Fix thinko.

diff --git a/v7/src/edwin/prompt.scm b/v7/src/edwin/prompt.scm
index 1fc5d34d0739e73348746df2b6ad84f671a14962..0bb8a5e0f58b9c56de93b16b178a9e4c0035859f 100644 (file)
--- a/v7/src/edwin/prompt.scm
+++ b/v7/src/edwin/prompt.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;; $Id: prompt.scm,v 1.181 1999/01/29 05:33:57 cph Exp $
+;;; $Id: prompt.scm,v 1.182 1999/01/31 04:01:19 cph Exp $
 ;;;
 ;;; Copyright (c) 1986, 1989-1999 Massachusetts Institute of Technology
 ;;;
@@ -392,8 +392,8 @@
     (or (boolean? object)
        (eq? 'CONFIRM object)))
   (lambda (options require-match?)
-    (set-options/mode! options
-                      (if require-match?
+    (if require-match?
+       (set-options/mode! options
                           (ref-mode-object minibuffer-local-must-match)))
     (set-options/confirm-completion?! options (eq? 'CONFIRM require-match?))))
 \f