From 955c8dedd68c74f3cf692c1249513f048518c4c9 Mon Sep 17 00:00:00 2001 From: "David J. Rosenbaum" Date: Thu, 2 Jun 2022 16:15:08 -0700 Subject: [PATCH] avy.el (avy--overlay): Avoid error on empty string Fixes #351 Fixes #352 --- avy.el | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/avy.el b/avy.el index 80f9a41..4c94a30 100644 --- a/avy.el +++ b/avy.el @@ -1019,10 +1019,11 @@ COMPOSE-FN is a lambda that concatenates the old string at BEG with STR." (os-line-prefix (get-text-property 0 'line-prefix old-str)) (os-wrap-prefix (get-text-property 0 'wrap-prefix old-str)) other-ol) - (when os-line-prefix - (add-text-properties 0 1 `(line-prefix ,os-line-prefix) str)) - (when os-wrap-prefix - (add-text-properties 0 1 `(wrap-prefix ,os-wrap-prefix) str)) + (unless (= (length str) 0) + (when os-line-prefix + (add-text-properties 0 1 `(line-prefix ,os-line-prefix) str)) + (when os-wrap-prefix + (add-text-properties 0 1 `(wrap-prefix ,os-wrap-prefix) str))) (when (setq other-ol (cl-find-if (lambda (o) (overlay-get o 'goto-address)) (overlays-at beg)))