sp--looking-back-p => looking-back (former causes warnings)

2016-05-30 14:10:00 -04:00 · 2016-05-30 14:10:00 -04:00 · f77e024a25
commit f77e024a25
parent 6d206fbe28
1 changed files with 1 additions and 1 deletions
--- a/core/defuns/defuns-whitespace.el
+++ b/core/defuns/defuns-whitespace.el
@ -69,7 +69,7 @@ possible, or just one char if that's not possible."
           (delete-char close-len))
          ;; Delete up to the nearest tab column IF only whitespace between
          ;; point and bol.
-          ((sp--looking-back-p "^[\\t ]*" (line-beginning-position))
+          ((save-match-data (looking-back "^[\\t ]*" (line-beginning-position)))
           (let ((movement (% (current-column) tab-width))
                 (p (point)))
             (when (= movement 0)