Yuta Yamada
null+****@clear*****
Thu Aug 23 15:46:42 JST 2012
Yuta Yamada 2012-08-23 15:46:42 +0900 (Thu, 23 Aug 2012) New Revision: 6fb026128e612e8d3ab93a840d1dfb21e6c8cd7d https://github.com/logaling/logalimacs/commit/6fb026128e612e8d3ab93a840d1dfb21e6c8cd7d Log: loga-insert-bracket -> loga-mixture-bracket Modified files: logalimacs.el Modified: logalimacs.el (+2 -2) =================================================================== --- logalimacs.el 2012-08-23 15:13:42 +0900 (26ca820) +++ logalimacs.el 2012-08-23 15:46:42 +0900 (4bc94b9) @@ -203,10 +203,10 @@ Example: (defun loga-make-displaying-commands () (loop with commands = '() for (prefix . command) in loga-command-alist - collect (loga-insert-bracket prefix command) into commands + collect (loga-mixture-bracket prefix command) into commands finally return (mapconcat 'identity commands ","))) -(defun loga-insert-bracket (command-prefix command) +(defun loga-mixture-bracket (command-prefix command) (loop with command = (loga-from-symbol-to-string command) with prefix = (char-to-string command-prefix) with rest = '() -------------- next part -------------- An HTML attachment was scrubbed... Download