From eb0dd101266b038be18f0811e606f32fcc428e2e Mon Sep 17 00:00:00 2001 From: Tom Willemse Date: Mon, 29 Jun 2015 13:16:38 +0200 Subject: Fix warning about `in-string-p' --- emacs/.emacs.d/init.org | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'emacs/.emacs.d/init.org') diff --git a/emacs/.emacs.d/init.org b/emacs/.emacs.d/init.org index 2c7fa7a..a7c2248 100644 --- a/emacs/.emacs.d/init.org +++ b/emacs/.emacs.d/init.org @@ -939,11 +939,11 @@ (defun oni:delete-string-contents () (interactive) - (unless (in-string-p) + (unless (nth 3 (syntax-ppss)) (error "You must be in a string for this command to work")) (save-excursion - (while (in-string-p) (forward-char -1)) + (while (nth 3 (syntax-ppss)) (forward-char -1)) (let ((bos (point))) (forward-sexp) -- cgit v1.2.3-54-g00ecf