From eb0dd101266b038be18f0811e606f32fcc428e2e Mon Sep 17 00:00:00 2001
From: Tom Willemse <tom@ryuslash.org>
Date: Mon, 29 Jun 2015 13:16:38 +0200
Subject: [PATCH] Fix warning about `in-string-p'

---
 emacs/.emacs.d/init.org | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

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)