Re: fix for bug 10994 breaks ido customizations in major way

[Vitalie Spinu]

 >> Leo Liu <address@hidden>
 >> on Wed, 08 May 2013 12:49:53 +0800 wrote:

 > +(defun ido-remove-consecutive-dups (list)
 > +  "Remove consecutive duplicates in LIST.
 > +Use `equal' for comparison.  First and last elements are
 > +considered consecutive."
 > +  (let ((tail list)
 > +    (last (make-symbol ""))
 > +    (result nil))
 > +    (while (consp tail)
 > +      (unless (equal (car tail) last)
 > +    (push (setq last (car tail)) result))
 > +      (setq tail (cdr tail)))
 > +    (nreverse (if (and (equal last (car list))
 > +                   (cdr result))
 > +              (cdr result)
 > +            result))))
 > +

Looks like a generally useful piece. May be subr.el? 

Also delete-consecutive-dups could be very handy.