diff --git a/contrib/lisp/org-e-latex.el b/contrib/lisp/org-e-latex.el
index 92cd87fa1..458579c16 100644
--- a/contrib/lisp/org-e-latex.el
+++ b/contrib/lisp/org-e-latex.el
@@ -2096,12 +2096,13 @@ contextual information."
       (let ((lst-lang
 	     (or (cadr (assq (intern lang) org-e-latex-listings-langs)) lang))
 	    (caption-str
-	     (let ((main (org-export-get-caption src-block))
-		   (secondary (org-export-get-caption src-block t)))
-	       (if (not secondary) (format "{%s}" (org-export-data main info))
-		 (format "{[%s]%s}"
-			 (org-export-data secondary info)
-			 (org-export-data main info))))))
+	     (when caption
+	       (let ((main (org-export-get-caption src-block))
+		     (secondary (org-export-get-caption src-block t)))
+		 (if (not secondary) (format "{%s}" (org-export-data main info))
+		   (format "{[%s]%s}"
+			   (org-export-data secondary info)
+			   (org-export-data main info)))))))
 	(concat
 	 ;; Options.
 	 (format "\\lstset{%s}\n"