From 6951f9af15920afacc7f6234bf7c681b43d1a989 Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Wed, 11 Jan 2012 14:50:05 +0100 Subject: [PATCH] org-export: Remove useless test * contrib/lisp/org-export.el (org-export-get-previous-element): Remove useless test. --- contrib/lisp/org-export.el | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/contrib/lisp/org-export.el b/contrib/lisp/org-export.el index 386af9abc..363e9caa0 100644 --- a/contrib/lisp/org-export.el +++ b/contrib/lisp/org-export.el @@ -2754,8 +2754,7 @@ a communication channel. Return previous element or object, a string, or nil." (let ((parent (car (plist-get info :genealogy)))) - (if (stringp parent) blob - (cadr (member blob (reverse (org-element-get-contents parent))))))) + (cadr (member blob (reverse (org-element-get-contents parent))))))