mirror of
https://github.com/jimeh/.emacs.d.git
synced 2026-02-19 13:46:41 +00:00
I've set `lexical-binding` to `nil` in all Emacs Lisp files to suppress the warnings introduced in Emacs 31 requiring all elisp files to have a `lexical-binding` comment. This retains the default behavior of dynamic binding when no `lexical-binding` comment is present. With it set to `t` across the board, various things break, and fixing those is a task for another day.
25 lines
686 B
EmacsLisp
25 lines
686 B
EmacsLisp
;;; siren-sort-words.el --- jimeh's Emacs Siren: sort-words. -*- lexical-binding: nil; -*-
|
|
|
|
;;; Commentary:
|
|
|
|
;; Helper command to sort words in region. Shamelessly ripped from:
|
|
;; https://www.emacswiki.org/emacs/SortWords
|
|
|
|
;;; Code:
|
|
|
|
(defun sort-words (reverse beg end)
|
|
"Sort words in region alphabetically, in REVERSE if negative.
|
|
Prefixed with negative \\[universal-argument], sorts in reverse.
|
|
|
|
The variable `sort-fold-case' determines whether alphabetic case
|
|
affects the sort order.
|
|
|
|
See `sort-regexp-fields'."
|
|
(interactive "*P\nr")
|
|
(sort-regexp-fields reverse "\\w+" "\\&" beg end))
|
|
|
|
(defalias 'sw 'sort-words)
|
|
|
|
(provide 'siren-sort-words)
|
|
;;; siren-sort-words.el ends here
|