From 48814f5fabc1a908a3f400dd5a3abbded2f636ba Mon Sep 17 00:00:00 2001
From: Bjarte Johansen <bjarte.johansen@gmail.com>
Date: Wed, 28 Mar 2018 19:10:42 +0200
Subject: [PATCH] Remove use of deprecated function preceding-sexp

Closes #17
---
 ob-prolog.el | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/ob-prolog.el b/ob-prolog.el
index 053a2df..dd61723 100644
--- a/ob-prolog.el
+++ b/ob-prolog.el
@@ -112,9 +112,10 @@ Example:
       (insert goal)
       (while (search-backward "=" nil t)
 	(delete-char 1 t)
-	(forward-sexp)
-	(let ((value (eval (preceding-sexp))))
-	  (kill-sexp -1)
+	(let ((value (eval
+                      (read
+                       (thing-at-point 'sexp)))))
+	  (kill-sexp)
 	  (insert (format "%S" value))))
       (buffer-string))))