Skip to content

Commit

Permalink
Remove use of deprecated function preceding-sexp
Browse files Browse the repository at this point in the history
Closes #17
  • Loading branch information
ljos committed Mar 28, 2018
1 parent c54bfdd commit 48814f5
Showing 1 changed file with 4 additions and 3 deletions.
7 changes: 4 additions & 3 deletions ob-prolog.el
Original file line number Diff line number Diff line change
Expand Up @@ -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))))

Expand Down

0 comments on commit 48814f5

Please sign in to comment.