diff options
Diffstat (limited to 'lisp/acdw.el')
| -rw-r--r-- | lisp/acdw.el | 2 |
1 files changed, 1 insertions, 1 deletions
| diff --git a/lisp/acdw.el b/lisp/acdw.el index d789a74..91381da 100644 --- a/lisp/acdw.el +++ b/lisp/acdw.el | |||
| @@ -564,7 +564,7 @@ It's called 'require-private' for historical reasons." | |||
| 564 | (sort-beg (progn (beginning-of-defun) | 564 | (sort-beg (progn (beginning-of-defun) |
| 565 | (re-search-forward "[ \\t]*(" (point-at-eol)) | 565 | (re-search-forward "[ \\t]*(" (point-at-eol)) |
| 566 | (forward-sexp) | 566 | (forward-sexp) |
| 567 | (re-search-forward "\\<" (point-at-eol)) | 567 | (re-search-forward "\\_<" (point-at-eol)) |
| 568 | (point-marker)))) | 568 | (point-marker)))) |
| 569 | (narrow-to-region (1- sort-beg) (1+ sort-end)) | 569 | (narrow-to-region (1- sort-beg) (1+ sort-end)) |
| 570 | (sort-subr nil #'sort-setq-next-record #'sort-setq-end-record))))) | 570 | (sort-subr nil #'sort-setq-next-record #'sort-setq-end-record))))) |