PATCH: missing :test duplicated ilisp-buffers entries

Bob Rogers <[email protected]>
Newsgroups gmane.lisp.ilisp.devel
Message-ID <[email protected]>
   This fixes a minor omission in the ilisp function that caused
duplicate ilisp-buffers entries.

					-- Bob Rogers
					   http://rgrjr.dyndns.org/

------------------------------------------------------------------------
Index: ilisp-mod.el
===================================================================
RCS file: /cvsroot/ilisp/ILISP/ilisp-mod.el,v
retrieving revision 1.6
diff -u -r1.6 ilisp-mod.el
--- ilisp-mod.el	3 Sep 2002 16:29:31 -0000	1.6
+++ ilisp-mod.el	23 Sep 2002 02:32:14 -0000
@@ -110,7 +110,7 @@
 			    (run-hooks 'ilisp-init-hook-local))))
 	(setq ilisp-initialized (delete* ilisp-buffer ilisp-initialized
 					 :test #'equal))
-	(unless (member* names ilisp-buffers :key #'car)
+	(unless (member* names ilisp-buffers :key #'car :test #'equal)
 	  (setq ilisp-buffers (cons (list names) ilisp-buffers)))
 	(lisp-pop-to-buffer ilisp-buffer)
 	(setq start (window-start (selected-window))


-------------------------------------------------------
This sf.net email is sponsored by:ThinkGeek
Welcome to geek heaven.
http://thinkgeek.com/sf
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.