diff --git a/multiple-cursors-core.el b/multiple-cursors-core.el
index 132c415..387f7ea 100644
--- a/multiple-cursors-core.el
+++ b/multiple-cursors-core.el
@@ -486,7 +486,8 @@ for running commands with multiple cursors.")
             "      '(")
     (newline-and-indent)
     (mapc #'(lambda (cmd) (insert (format "%S" cmd)) (newline-and-indent))
-          value)
+          (sort value (lambda (x y) (string-lessp (symbol-name x)
+                                                  (symbol-name y)))))
     (insert "))")
     (newline)))