Hi Guys,
There is a conflict in command names between libraries
seq.el and sequential-command.el.
They both define a command seq-count.
Pasted in the two defuns below.
Any recommendations?
Thanks
Mike Fitzgerald
## MTF from sequential-command.el
(defun seq-count ()
"Returns number of times `this-command' was executed.
It also updates `seq-start-position'."
(if (eq last-command this-command)
(incf seq-store-count)
(setq seq-start-position (cons (point) (window-start))
seq-store-count 0)))
## MTF from seq.el
(defun seq-count (pred seq)
"Return the number of elements for which (PRED element) is non-nil in SEQ."
(let ((count 0))
(seq-doseq (elt seq)
(when (funcall pred elt)
(setq count (+ 1 count))))
count))