From e377ac313d9ace21967b0b852868870b8a4bbd13 Mon Sep 17 00:00:00 2001
From: ueno <ueno>
Date: Wed, 20 Sep 2000 16:20:49 +0000
Subject: [PATCH] Fix typo.

---
 lisp/liece-minibuf.el |    4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/liece-minibuf.el b/lisp/liece-minibuf.el
index 891a5f4..1db543c 100644
--- a/lisp/liece-minibuf.el
+++ b/lisp/liece-minibuf.el
@@ -63,7 +63,7 @@
 	(forward-char)
 	(setq preceding-char (char-before))
 	(cond
-	 ((and (eq state 'flag) (memq preceding-char ?(+ ?-)))
+	 ((and (eq state 'flag) (memq preceding-char '(+ ?-)))
 	  (setq state 'mode
 		type nil))
 	 ((and (eq state 'mode) (eq preceding-char ? ))
@@ -74,7 +74,7 @@
 	 ((and (eq state 'mode) (eq preceding-char ?b))
 	  (setq type (nconc type (list 'ban (char-before (1- (point)))))))))
       (cons state type))))
-	
+
 (defun liece-minibuffer-prepare-candidate ()
   (let ((point (point)))
     (skip-syntax-backward "^ ")
-- 
1.7.10.4