diff options
| author | Thierry Volpiatto <thierry.volpiatto@gmail.com> | 2014-04-25 11:40:04 +0200 |
|---|---|---|
| committer | Thierry Volpiatto <thierry.volpiatto@gmail.com> | 2014-04-25 11:40:04 +0200 |
| commit | e6c3ff112066f64777407256518e7ebb590a03c9 (patch) | |
| tree | 65ed4574ad9f686ddde667aa2f56080a5019bfee /helm-elscreen.el | |
| parent | 7e621fb654c64717a79b25d96566e5fb3351ad85 (diff) | |
Reindent all files again.
* helm-elisp-package.el: Use with instead of let.
Diffstat (limited to 'helm-elscreen.el')
| -rw-r--r-- | helm-elscreen.el | 20 |
1 files changed, 10 insertions, 10 deletions
diff --git a/helm-elscreen.el b/helm-elscreen.el index 92fa5a74..c13e1ed6 100644 --- a/helm-elscreen.el +++ b/helm-elscreen.el @@ -46,21 +46,21 @@ (if (cdr (elscreen-get-screen-to-name-alist)) (sort (cl-loop for sname in (elscreen-get-screen-to-name-alist) - append (list (format "[%d] %s" (car sname) (cdr sname)))) + append (list (format "[%d] %s" (car sname) (cdr sname)))) #'(lambda (a b) (compare-strings a nil nil b nil nil)))))) (action . (("Change Screen" . - (lambda (candidate) - (elscreen-goto (- (aref candidate 1) (aref "0" 0))))) + (lambda (candidate) + (elscreen-goto (- (aref candidate 1) (aref "0" 0))))) ("Kill Screen(s)" . - (lambda (candidate) - (cl-dolist (i (helm-marked-candidates)) - (elscreen-goto (- (aref i 1) (aref "0" 0))) - (elscreen-kill)))) + (lambda (candidate) + (cl-dolist (i (helm-marked-candidates)) + (elscreen-goto (- (aref i 1) (aref "0" 0))) + (elscreen-kill)))) ("Only Screen" . - (lambda (candidate) - (elscreen-goto (- (aref candidate 1) (aref "0" 0))) - (elscreen-kill-others))))))) + (lambda (candidate) + (elscreen-goto (- (aref candidate 1) (aref "0" 0))) + (elscreen-kill-others))))))) ;;;###autoload (defun helm-elscreen () |