Merge pull request #5 from ltriant/nrepl-options-passthrough

fix refactor-nrepl option passthrough

Author: Deraen

README.md

@@ -49,8 +49,11 @@ own. Check the implementation file for `<Plug>` bindings.
 ```vim
 let g:cider_no_maps=1 " Disable built-in mappings
 
-" Set refactor-nrepl options, e.g. tell clean-ns to not use prefix forms
-let g:refactor_nrepl_options = '{:prefix-rewriting false}'
+" Set refactor-nrepl options 
+let g:refactor_nrepl_options = {
+	\ 'prefix-rewriting': 'false',      " tell clean-ns to not use prefix forms
+	\ 'prune-ns-form': 'false',         " ... and don't remove unused symbols
+	\ }
 
 " Setup visualmode bindings yourself, to some keys which don't interact
 " with e.g. change command

doc/cider.txt

@@ -18,12 +18,12 @@ g:cider_no_maps         Set this option to true to disable built-in maps.
 
                                                 *refactor-nrepl-options*
 g:refactor_nrepl_options
-                        Use this option to set settings for refactor-nrepl.
-                        Check https://github.com/clojure-emacs/refactor-nrepl#configure
+						Use this option to set settings for refactor-nrepl.
+						Check https://github.com/clojure-emacs/refactor-nrepl#configure
                         for documentation.
 
-                                                *cider-cf*
-cf{motion}              Format the code indicated by {motion}.
+                                                *cider-=f*
+=f{motion}              Format the code indicated by {motion}.
                         Use <Plug>CiderFormat to map this yourself.
                         Visual mode mapping is not by default enabled but you
                         can do that yourself:
@@ -33,15 +33,15 @@ cf{motion}              Format the code indicated by {motion}.
                         Just remeber to use mapping which doesn't conflict
                         with e.g. change command.
 
-                                                *cider-cff*
-cff                     Format the innertmost form at the cursor.
+                                                *cider-=ff*
+=ff                     Format the innertmost form at the cursor.
                         Like |fireplace-c!|
                         Use <Plug>CiderFormatCount to map this yourself.
 
-                                                *cider-cF*
-cF                      Format the current file.
-                        Use ggcfG to map this yourself (notice to use your own
-                        |cider-cf| mapping.)
+                                                *cider-=F*
+=F                      Format the current file.
+                        Use gg=fG to map this yourself (notice to use your own
+                        |cider-=f| mapping.)
 
                                                 *cider-cdd*
 cdd                     Undefine a variable or unalias namespace a alias

plugin/cider.vim

@@ -111,13 +111,6 @@ nnoremap <silent> <Plug>CiderUndef :<C-U>call <SID>undef()<CR>
 " CleanNs
 "
 
-function! s:init_refactor_nrepl() abort
-  if !exists('b:refactor_nrepl_loaded') && exists('g:refactor_nrepl_options')
-    let b:refactor_nrepl_loaded = 1
-    call fireplace#message({'op': 'configure', 'opts': g:refactor_nrepl_options})
-  endif
-endfunction
-
 function! s:paste(text) abort
   " Does charwise paste to current '[ and '] marks
   let @@ = a:text
@@ -128,8 +121,6 @@ function! s:paste(text) abort
 endfunction
 
 function! s:clean_ns() abort
-  call s:init_refactor_nrepl()
-
   " FIXME: Moves cursor
 
   let p = expand('%:p')
@@ -145,7 +136,10 @@ function! s:clean_ns() abort
   call setpos("']", [0, line2, col2, 0])
 
   if expand('<cword>') ==? 'ns'
-    let res = fireplace#message({'op': 'clean-ns', 'path': p})[0]
+    let opts = { 'op': 'clean-ns', 'path': p }
+    call extend(opts, get(g:, 'refactor_nrepl_options', {}))
+
+    let res = fireplace#message(opts)[0]
     let error = get(res, 'error')
     if !empty(error)
       throw error