# HG changeset patch
# User Micha¸«³l Cadilhac <michael.cadilhac@lrde.org>
# Date 1173271635 0
# Node ID 3183de2acda44442767e89786d245e501f0fbe55
# Parent  6c53ec2b4b243d05d4a26f2a34adbc7578dfe48f
(PC-do-completion): Delete duplicates in the list of possible completions.

diff -r 6c53ec2b4b24 -r 3183de2acda4 lisp/complete.el
--- a/lisp/complete.el	Wed Mar 07 08:46:02 2007 +0000
+++ b/lisp/complete.el	Wed Mar 07 12:47:15 2007 +0000
@@ -560,6 +560,9 @@
 		   (setq poss (cons (car p) poss))))
 	    (setq p (cdr p)))))
 
+      ;; If table had duplicates, they can be here.
+      (delete-dups poss)
+
       ;; Handle completion-ignored-extensions
       (and filename
            (not (eq mode 'help))