diff --git a/lisp/ob.el b/lisp/ob.el
index 64a96dd29..4601e73b5 100644
--- a/lisp/ob.el
+++ b/lisp/ob.el
@@ -1612,7 +1612,7 @@ following the source block."
 	   (inlinep (when (org-babel-get-inline-src-block-matches)
 			(match-end 0)))
 	   (name (if on-lob-line
-		     (nth 0 (org-babel-lob-get-info))
+		     (mapconcat #'identity (butlast (org-babel-lob-get-info)) "")
 		   (nth 4 (or info (org-babel-get-src-block-info 'light)))))
 	   (head (unless on-lob-line (org-babel-where-is-src-block-head)))
 	   found beg end)