ld/multiple-cursors.el
1
0
Fork 0
mirror of https://github.com/magnars/multiple-cursors.el.git synced 2025-10-13 13:03:03 +00:00
Code Issues Packages Projects Releases Wiki Activity

Fix: mc/dump-list loosing old setting

Browse Source
This commit is contained in:
Takafumi Arakaki 2012-11-24 23:27:46 +01:00
parent bc8af45bfe
commit fa753aa587
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
multiple-cursors-core.el
View File

@ -513,9 +513,11 @@ for running commands with multiple cursors.")
(insert "(setq " (symbol-name list-symbol) "\n" (insert "(setq " (symbol-name list-symbol) "\n"
" '(") " '(")
(newline-and-indent) (newline-and-indent)
(set list-symbol
(sort value (lambda (x y) (string-lessp (symbol-name x)
(symbol-name y)))))
(mapc #'(lambda (cmd) (insert (format "%S" cmd)) (newline-and-indent)) (mapc #'(lambda (cmd) (insert (format "%S" cmd)) (newline-and-indent))
(sort value (lambda (x y) (string-lessp (symbol-name x) value)
(symbol-name y)))))
(insert "))") (insert "))")
(newline))) (newline)))