diff options
| author | Artur Malabarba <bruce.connor.am@gmail.com> | 2015-09-10 22:34:43 +0100 |
|---|---|---|
| committer | Artur Malabarba <bruce.connor.am@gmail.com> | 2015-09-28 12:38:49 +0100 |
| commit | 2a27fa03a77c59be5fe8d766826eff104461c329 (patch) | |
| tree | e2a50b1c6ea8d6e7241b734752df0e2fd2b28596 /cider-util.el | |
| parent | a1d110b2fb735dabfa3008844e76d2faeedaea9d (diff) | |
Implement dynamic indentation
Diffstat (limited to 'cider-util.el')
| -rw-r--r-- | cider-util.el | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/cider-util.el b/cider-util.el index 8380ef1c..678d4679 100644 --- a/cider-util.el +++ b/cider-util.el @@ -290,6 +290,16 @@ The project name is the final component of DIR if not nil." (when dir (file-name-nondirectory (directory-file-name dir)))) +;;; Vectors +(defun cider--deep-vector-to-list (x) + "Convert vectors in X to lists. +If X is a sequence, return a list of `cider--deep-vector-to-list' applied to +each of its elements. +Any other value is just returned." + (if (sequencep x) + (mapcar #'cider--deep-vector-to-list x) + x)) + ;;; Words of inspiration (defun cider-user-first-name () "Find the current user's first name." |