branch: elpa/evil-goggles
commit 6ab09a09c7c1c75d8d455c176da50a25f495329f
Author: Evgeni Kolev <[email protected]>
Commit: Evgeni Kolev <[email protected]>
Don't use `caadr`
---
evil-goggles.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/evil-goggles.el b/evil-goggles.el
index 161e110102..697b57b8e6 100644
--- a/evil-goggles.el
+++ b/evil-goggles.el
@@ -297,9 +297,9 @@ This function tries to return a single list, either:
;; TODO how can this be handled, reprodcued with Otext<esc>u:
;; ((text-added 1 5) (text-added 1 2))
((and (eq 2 (length processed-list))
- (eq (caadr processed-list) (caar processed-list)))
+ (eq (car (car (cdr processed-list))) (caar processed-list)))
(let (
- (change-type (caadr processed-list))
+ (change-type (car (car (cdr processed-list))))
(start-of-first-region (nth 1 (nth 0 processed-list)))
(end-of-first-region (nth 2 (nth 0 processed-list)))
(start-of-second-region (nth 1 (nth 1 processed-list)))
