branch: externals/company
commit 0d83218a940c7e173eea352bba401bc0d8780e7c
Author: Dmitry Gutov <dmi...@gutov.dev>
Commit: Dmitry Gutov <dmi...@gutov.dev>

    Don't use pos-bol, not available in < 29
---
 test/capf-tests.el | 13 +++++++------
 1 file changed, 7 insertions(+), 6 deletions(-)

diff --git a/test/capf-tests.el b/test/capf-tests.el
index 0a646e6bbe..72cef8e0b1 100644
--- a/test/capf-tests.el
+++ b/test/capf-tests.el
@@ -178,12 +178,13 @@
           (cc2 '("abcz" "abczdef" "abcz123"))
           (comp2
            (lambda ()
-             (list (pos-bol) (point)
-                   (mapcar
-                    (lambda (s)
-                      (concat (buffer-substring (pos-bol) (+ (pos-bol) 
(current-indentation)))
-                              s))
-                    cc2)))))
+             (let ((bol (line-beginning-position)))
+               (list bol (point)
+                     (mapcar
+                      (lambda (s)
+                        (concat (buffer-substring bol (+ bol 
(current-indentation)))
+                                s))
+                      cc2))))))
 
      (setq-local completion-at-point-functions
                  (list comp1 comp2))

Reply via email to