emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/objed d5dd1d0 045/216: Fix function name


From: Stefan Monnier
Subject: [elpa] externals/objed d5dd1d0 045/216: Fix function name
Date: Tue, 8 Jan 2019 12:29:09 -0500 (EST)

branch: externals/objed
commit d5dd1d0c159af643c0b993711db77402b8e5a00c
Author: Clemera <address@hidden>
Commit: Clemera <address@hidden>

    Fix function name
---
 objed-objects.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/objed-objects.el b/objed-objects.el
index dfb8f15..8c72b40 100644
--- a/objed-objects.el
+++ b/objed-objects.el
@@ -1910,7 +1910,7 @@ non-nil the indentation block can contain empty lines."
 
 ;; from `evil-textobj-syntax'
 (defun objed--get-syntax-range (&optional inclusive arg)
-  (let ((point-face (-what-face))
+  (let ((point-face (objed--what-face))
         (backward-point (point)) ; last char when stop, including white space
         (backward-none-space-point (point)) ; last none white space char
         (forward-point (point)) ; last char when stop, including white space
@@ -1924,7 +1924,7 @@ non-nil the indentation block can contain empty lines."
       (let ((continue t))
         (while (and continue (>= (- (point) 1) (point-min)))
           (backward-char)
-          (let ((backward-point-face (-what-face)))
+          (let ((backward-point-face (objed--what-face)))
             (if (= 32 (char-syntax (char-after)))
                 (setq backward-point (point))
               (if (equal point-face backward-point-face)
@@ -1938,7 +1938,7 @@ non-nil the indentation block can contain empty lines."
       (let ((continue t))
         (while (and continue (< (+ (point) 1) (point-max)))
           (forward-char)
-          (let ((forward-point-face (-what-face)))
+          (let ((forward-point-face (objed---what-face)))
             (if (= 32 (char-syntax (char-after)))
                 (setq forward-point (point))
               (if (equal point-face forward-point-face)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]