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

Merge pull request #40 from tkf/fix-dump-list

Browse Source 
Fix: mc/dump-list loosing old setting
This commit is contained in:
Magnar Sveen 2012-11-25 00:12:57 -08:00
commit 0b9aae12ca
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)))