From a5977a274072f6828a91e1131ce6aea9d320cb47 Mon Sep 17 00:00:00 2001
From: Nicolas Goaziou <mail@nicolasgoaziou.fr>
Date: Wed, 2 Dec 2015 23:27:28 +0100
Subject: [PATCH] ox: Tiny refactoring

* lisp/ox.el (org-export--smart-quote-status): Tiny refactoring.
---
 lisp/ox.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/ox.el b/lisp/ox.el
index e705196b9..2908fed9b 100644
--- a/lisp/ox.el
+++ b/lisp/ox.el
@@ -5284,7 +5284,7 @@ INFO is the current export state, as a plist."
 			     (let ((p (org-export-get-previous-element
 				       text info)))
 			       (cond ((not p) nil)
-				     ((stringp p) (substring p (1- (length p))))
+				     ((stringp p) (substring p -1))
 				     ((memq (org-element-property :post-blank p)
 					    '(0 nil))
 				      'no-blank)