diff options
| author | Case Duckworth | 2022-05-06 10:23:02 -0500 |
|---|---|---|
| committer | Case Duckworth | 2022-05-06 10:23:02 -0500 |
| commit | fcd47a9c3a10b6028045773ff5b197a080ac345c (patch) | |
| tree | 0c01200c1a80723467fb43b7a7f6b97560eec6f9 /lisp/+init.el | |
| parent | Add +sort-lines (diff) | |
| download | emacs-fcd47a9c3a10b6028045773ff5b197a080ac345c.tar.gz emacs-fcd47a9c3a10b6028045773ff5b197a080ac345c.zip | |
meh
Diffstat (limited to 'lisp/+init.el')
| -rw-r--r-- | lisp/+init.el | 9 |
1 files changed, 4 insertions, 5 deletions
| diff --git a/lisp/+init.el b/lisp/+init.el index 8f999f9..a3f680b 100644 --- a/lisp/+init.el +++ b/lisp/+init.el | |||
| @@ -72,11 +72,10 @@ are sorted lexigraphically." | |||
| 72 | ;; otherwise, sort lexigraphically | 72 | ;; otherwise, sort lexigraphically |
| 73 | (t (string< s1 s2))))))))) | 73 | (t (string< s1 s2))))))))) |
| 74 | ;; Return to original point relative to the defun we were in | 74 | ;; Return to original point relative to the defun we were in |
| 75 | (goto-char (point-min)) | 75 | (ignore-errors (goto-char (point-min)) |
| 76 | (re-search-forward current-defun-re) | 76 | (re-search-forward current-defun-re) |
| 77 | (beginning-of-defun) | 77 | (beginning-of-defun) |
| 78 | (goto-char (+ (point) defun-point)) | 78 | (goto-char (+ (point) defun-point))))) |
| 79 | )) | ||
| 80 | 79 | ||
| 81 | (defun +init-sort-then-save () | 80 | (defun +init-sort-then-save () |
| 82 | "Sort init.el, then save it." | 81 | "Sort init.el, then save it." |