diff --git a/lisp/org-table.el b/lisp/org-table.el
index 0555041..a8d2826 100644
--- a/lisp/org-table.el
+++ b/lisp/org-table.el
@@ -4437,7 +4437,7 @@ First element has index 0, or I0 if given."
 	 (txt (nth 1 e))
 	 name pos)
     (unless e (error "No radio table setup defined for %s" major-mode))
-    (setq name (read-string "Table name: "))
+    (setq name (read-no-blanks-input "Table name: "))
     (while (string-match "%n" txt)
       (setq txt (replace-match name t t txt)))
     (or (bolp) (insert "\n"))