From f77e024a2545b6c7a25a628fe1f9080a89759de4 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Mon, 30 May 2016 14:10:00 -0400 Subject: [PATCH] sp--looking-back-p => looking-back (former causes warnings) --- core/defuns/defuns-whitespace.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/core/defuns/defuns-whitespace.el b/core/defuns/defuns-whitespace.el index 10f63d6b2..6eeedde64 100644 --- 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)