File tree Expand file tree Collapse file tree 1 file changed +13
-2
lines changed Expand file tree Collapse file tree 1 file changed +13
-2
lines changed Original file line number Diff line number Diff line change @@ -508,7 +508,11 @@ and the beginning")
508
508
(should (string= (evil-describe 1 2 'exclusive )
509
509
" 1 character" ))
510
510
(should (string= (evil-describe 5 2 'exclusive )
511
- " 3 characters" ))))))
511
+ " 3 characters" )))
512
+ (compose-region 9 15 " ϐ" ) ; visually replaces "buffer" with ϐ
513
+ (ert-info (" Adjust range to account for composed characters" )
514
+ (should (equal (evil-normalize 10 10 'exclusive )
515
+ '(9 15 exclusive)))))))
512
516
513
517
(ert-deftest evil-test-inclusive-type ()
514
518
" Expand and contract the `inclusive' type"
@@ -533,7 +537,14 @@ and the beginning")
533
537
(should (string= (evil-describe 1 1 'inclusive )
534
538
" 1 character" ))
535
539
(should (string= (evil-describe 5 2 'inclusive )
536
- " 4 characters" )))))
540
+ " 4 characters" )))
541
+ (compose-region 9 15 " ϐ" ) ; visually replaces "buffer" with ϐ
542
+ (ert-info (" Don't end in composed characters" )
543
+ (should (equal (evil-expand 7 12 'inclusive )
544
+ '(7 15 inclusive :expanded t ))))
545
+ (ert-info (" Don't begin in composed characters" )
546
+ (should (equal (evil-expand 10 20 'inclusive )
547
+ '(9 21 inclusive :expanded t ))))))
537
548
538
549
(ert-deftest evil-test-line-type ()
539
550
" Expand the `line' type"
You can’t perform that action at this time.
0 commit comments