diff options
| author | Craig Jennings <c@cjennings.net> | 2025-10-26 00:54:03 -0500 |
|---|---|---|
| committer | Craig Jennings <c@cjennings.net> | 2025-10-26 00:54:03 -0500 |
| commit | b16f2ef9e2b17f53c3938fdee13f86907c6e984d (patch) | |
| tree | 71d7b0d3b5937119d3e7af33a1c494e3e9c09bbe /modules/custom-line-paragraph.el | |
| parent | c0b0376bcae8dbf36bc9fc888a6c6e7a83a293ff (diff) | |
| download | dotemacs-b16f2ef9e2b17f53c3938fdee13f86907c6e984d.tar.gz dotemacs-b16f2ef9e2b17f53c3938fdee13f86907c6e984d.zip | |
test:custom-line-paragraph: add tests and fix region deactivation
- Add 11 new tests for cj/join-line-or-region covering boundary cases, Unicode, stress testing, and undo behavior
- Fix region deactivation in cj/join-line-or-region function
- All 62 tests now passing (41 join-line-or-region + 21 join-paragraph)
Diffstat (limited to 'modules/custom-line-paragraph.el')
| -rw-r--r-- | modules/custom-line-paragraph.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/modules/custom-line-paragraph.el b/modules/custom-line-paragraph.el index a23199e75..811f2a4b9 100644 --- a/modules/custom-line-paragraph.el +++ b/modules/custom-line-paragraph.el @@ -28,7 +28,8 @@ (while (< (point) end) (join-line 1)) (goto-char end) - (newline)) + (newline) + (deactivate-mark)) ;; No region - only join if there's a previous line (when (> (line-number-at-pos) 1) (join-line)) |