diff --git a/tex-bar.el b/tex-bar.el
index 49e1b3ca..0140dc4c 100644
--- a/tex-bar.el
+++ b/tex-bar.el
@@ -215,6 +215,7 @@ format of the argument MEANING-ALIST in the mentioned function."
   (add-to-list 'toolbarx-image-path
                (expand-file-name "images" TeX-data-directory))
   (add-hook 'TeX-PDF-mode-hook #'toolbarx-refresh nil t)
+  (setq-local tool-bar-style 'image) ; Disable label string.
   (toolbarx-install-toolbar TeX-bar-TeX-buttons
                             (let ((append-list))
                               (dolist (elt TeX-bar-TeX-all-button-alists)
@@ -364,6 +365,7 @@ format of the argument MEANING-ALIST in the mentioned function."
   ;; could have been changed.  Append the refresh to the hook so it is run after
   ;; the other styles-related changes.
   (add-hook 'TeX-update-style-hook #'toolbarx-refresh t t)
+  (setq-local tool-bar-style 'image) ; Disable label string.
   (toolbarx-install-toolbar TeX-bar-LaTeX-buttons
                             (let ((append-list))
                               (dolist (elt TeX-bar-LaTeX-all-button-alists)
diff --git a/toolbar-x.el b/toolbar-x.el
index d95ca591..c03446f6 100644
--- a/toolbar-x.el
+++ b/toolbar-x.el
@@ -1116,7 +1116,9 @@ function `toolbar-install-toolbar'."
                               (cadr (memq :visible filtered-props))))
                (button (cons (memq :button filtered-props)
                              (cadr (memq :button filtered-props))))
-               (menuitem (append
+               (menuitem (if (eq symbol 'separator)
+                             '(menu-item "--")
+                         (append
                           (list 'menu-item
                                 (toolbarx-make-string-from-symbol symbol)
                                 command
@@ -1128,7 +1130,7 @@ function `toolbar-install-toolbar'."
                           (when (car visible)
                             (list :visible (cdr visible)))
                           (when (car button)
-                            (list :button (cdr button)))))
+                            (list :button (cdr button))))))
                (key-not-used
                 (let* ((count 0)
                        (symb symbol))