count-fold-lines: Emacs hack to fold duplicate lines and count them.
I just wrote a thing in Emacs that others might find useful:
(defun count-fold-lines (start end)
"Replace lines from START to END with descending counts of unique lines.
It's easiest to just give an example to explain this. These lines...
foo
foo
bar
foo
baz
bar
foo
...would become this:
4 foo
2 bar
1 baz
(modulo some left-padding differences that we don't care about)."
(interactive "r")
(sort-lines nil start end)
(save-mark-and-excursion
;; Hah! You thought...