From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Fri, 23 Feb 2001 16:17:57 +0000 (+0000)
Subject: (hi-lock-unface-buffer): Use nil rather than t for
X-Git-Tag: emacs-pretest-21.0.99~152
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=932c309e302c184696d78c94cf93f994dc3f2f0a;p=emacs.git

(hi-lock-unface-buffer): Use nil rather than t for
predicate passed to completing-read.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 982efa28fcd..c583ccdeac3 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2001-02-23  Stefan Monnier  <monnier@cs.yale.edu>
+
+	* hi-lock.el (hi-lock-unface-buffer): Use nil rather than t for
+	predicate passed to completing-read.
+
 2001-02-23  Eli Zaretskii  <eliz@is.elta.co.il>
 
 	* startup.el (command-line): Fix last change.
diff --git a/lisp/hi-lock.el b/lisp/hi-lock.el
index 20961226cb5..610a217916f 100644
--- a/lisp/hi-lock.el
+++ b/lisp/hi-lock.el
@@ -420,7 +420,7 @@ interactive functions.  \(See `hi-lock-interactive-patterns'.\)
          (error "No highlighting to remove"))
        (list
         (completing-read "Regexp to unhighlight: "
-                         hi-lock-interactive-patterns t t
+                         hi-lock-interactive-patterns nil t
                          (car (car hi-lock-interactive-patterns))
                          (cons 'history-list 1))))))
   (let ((keyword (assoc regexp hi-lock-interactive-patterns)))