I don't know the syntax, but add a new button with the "no Multiple" option.
I found this which make multiple for earlier versions.
(command ".undefine" "copy")
(defun c:copy () (command ".copy" (ssget) "" "m"))
and how about this
"^C^C_select;\_copy;_p;m;