diff --git a/lisp/ox-latex.el b/lisp/ox-latex.el
index 63070d0f9..5b29a284c 100644
--- a/lisp/ox-latex.el
+++ b/lisp/ox-latex.el
@@ -2131,13 +2131,13 @@ information."
     (let ((environment (or (org-export-read-attribute
 			    :attr_latex example-block :environment)
 			   "verbatim")))
-      (format "\\begin{%s}%s\n%s\\end{%s}"
-	      environment
-              (if (org-element-property :name example-block)
-                  (org-latex--label example-block info nil 'full)
-                "")
-	      (org-export-format-code-default example-block info)
-	      environment))))
+      (org-latex--wrap-label
+       example-block
+       (format "\\begin{%s}\n%s\\end{%s}"
+	       environment
+	       (org-export-format-code-default example-block info)
+	       environment)
+       info))))
 
 
 ;;;; Export Block