diff --git a/src/lsp/cmuutil.lsp b/src/lsp/cmuutil.lsp
index 6fdadc5cf..33a9836c5 100644
--- a/src/lsp/cmuutil.lsp
+++ b/src/lsp/cmuutil.lsp
@@ -136,13 +136,7 @@
 (defmacro with-unique-names (symbols &body body)
   `(let* ,(mapcar (lambda (symbol)
                     (let* ((symbol-name (symbol-name symbol))
-                           #+ecl-min
-                           (stem symbol-name)
-                           #-ecl-min
-                           (stem (if (every #'alpha-char-p symbol-name)
-                                     nil
-                                     symbol-name
-                                     (concatenate 'string symbol-name "-"))))
+                           (stem symbol-name))
                       `(,symbol (gensym ,stem))))
                   symbols)
      ,@body))