diff -r 2b198f0a86fe -r dda9eb90cf5d specky/plugin/specky.vim --- a/specky/plugin/specky.vim Wed Jan 02 09:14:17 2013 -0800 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,370 +0,0 @@ -" vim: set noet nosta sw=4 ts=4 fdm=marker : -" -" Specky! -" Mahlon E. Smith -" $Id$ -" - - -" Hook up the functions to the user supplied key bindings. {{{ -" -if exists( 'g:speckySpecSwitcherKey' ) - execute 'map ' . g:speckySpecSwitcherKey . ' :call SpecSwitcher()' -" map &g:speckySpecSwitcherKey SpecSwitcher() -endif - -if exists( 'g:speckyQuoteSwitcherKey' ) - execute 'map ' . g:speckyQuoteSwitcherKey . ' :call QuoteSwitcher()' -endif - -if exists( 'g:speckyBannerKey' ) - execute 'map ' . g:speckyBannerKey . ' :call MakeBanner()' -endif - -if exists( 'g:speckyRunSpecKey' ) - execute 'map ' . g:speckyRunSpecKey . ' :call RunSpec()' -endif - -if exists( 'g:speckyRunRdocKey' ) - execute 'map ' . g:speckyRunRdocKey . ' :call RunRdoc()' -endif - -if exists( 'specky_loaded' ) - finish -endif -let specky_loaded = '$Rev$' - - -"}}} -" Menu configuration {{{ -" -let s:menuloc = '&Plugin.&specky' -execute 'menu ' . s:menuloc . '.&Jump\ to\ code/spec :call SpecSwitcher()' -execute 'menu ' . s:menuloc . '.Run\ &spec :call RunSpec()' -execute 'menu ' . s:menuloc . '.&RDoc\ lookup :call RunRdoc()' -execute 'menu ' . s:menuloc . '.Rotate\ "e\ style :call QuoteSwitcher()' -execute 'menu ' . s:menuloc . '.Make\ a\ &banner :call MakeBanner()' - - -" }}} -" SpecSwitcher() {{{ -" -" When in ruby code or an rspec BDD file, try and search recursively through -" the filesystem (within the current working directory) to find the -" respectively matching file. (code to spec, spec to code.) -" -" This operates under the assumption that you've used chdir() to put vim into -" the top level directory of your project. -" -function! SpecSwitcher() - - " If we aren't in a ruby or rspec file then we probably don't care - " too much about this function. - " - if &ft != 'ruby' && &ft != 'rspec' - call s:err( "Not currently in ruby or rspec mode." ) - return - endif - - " Ensure that we can always search recursively for files to open. - " - let l:orig_path = &path - set path=** - - " Get the current buffer name, and determine if it is a spec file. - " - " /tmp/something/whatever/rubycode.rb ---> rubycode.rb - " A requisite of the specfiles is that they match to the class/code file, - " this emulates the eigenclass stuff, but doesn't require the same - " directory structures. - " - " rubycode.rb ---> rubycode_spec.rb - " - let l:filename = matchstr( bufname('%'), '[0-9A-Za-z_.-]*$' ) - let l:is_spec_file = match( l:filename, '_spec.rb$' ) == -1 ? 0 : 1 - - if l:is_spec_file - let l:other_file = substitute( l:filename, '_spec\.rb$', '\.rb', '' ) - else - let l:other_file = substitute( l:filename, '\.rb$', '_spec\.rb', '' ) - endif - - let l:bufnum = bufnr( l:other_file ) - if l:bufnum == -1 - " The file isn't currently open, so let's search for it. - execute 'find ' . l:other_file - else - " We've already got an open buffer with this file, just go to it. - execute 'buffer' . l:bufnum - endif - - " Restore the original path. - execute 'set path=' . l:orig_path -endfunction - - -" }}} -" QuoteSwitcher() {{{ -" -" Wrap the word under the cursor in quotes. If in ruby mode, -" cycle between quoting styles and symbols. -" -" variable -> "variable" -> 'variable' -> :variable -" -function! QuoteSwitcher() - let l:type = strpart( expand(""), 0, 1 ) - let l:word = expand("") - - if l:type == '"' - " Double quote to single - execute ":normal viWc'" . l:word . "'" - - elseif l:type == "'" - if &ft == 'ruby' || &ft == 'rspec' - " Single quote to symbol - execute ':normal viWc:' . l:word - else - " Single quote to double - execute ':normal viWc"' . l:word . '"' - end - - else - " Whatever to double quote - execute ':normal viWc"' . l:word . '"' - endif - - " Move the cursor back into the cl:word - call cursor( 0, getpos('.')[2] - 1 ) -endfunction - - -" }}} -" MakeBanner() {{{ -" -" Create a quick banner from the current line's text. -" -function! MakeBanner() - let l:banner_text = toupper(join( split( getline('.'), '\zs' ), ' ' )) - let l:banner_text = substitute( l:banner_text, '^\s\+', '', '' ) - let l:sep = repeat( '#', &textwidth == 0 ? 72 : &textwidth ) - let l:line = line('.') - - call setline( l:line, l:sep ) - call append( l:line, [ '### ' . l:banner_text, l:sep ] ) - execute 'normal 3==' - call cursor( l:line + 3, 0 ) -endfunction - - -" }}} -" RunSpec() {{{ -" -" Run this function while in a spec file to run the specs within vim. -" -function! RunSpec() - - " If we're in the code instead of the spec, try and switch - " before running tests. - " - let l:filename = matchstr( bufname('%'), '[0-9A-Za-z_.-]*$' ) - let l:is_spec_file = match( l:filename, '_spec.rb$' ) == -1 ? 0 : 1 - if ( ! l:is_spec_file ) - silent call SpecSwitcher() - endif - - let l:spec = bufname('%') - let l:buf = 'specky:specrun' - let l:bufnum = bufnr( l:buf ) - let l:specver = (exists( 'g:speckySpecVersion') && g:speckySpecVersion == 1) ? 1 : 2 - - " Squash the old buffer, if it exists. - " - if buflisted( l:buf ) - execute 'bd! ' . l:buf - endif - - execute NewWindowCmd() . l:buf - setlocal buftype=nofile bufhidden=delete noswapfile - if ( l:specver == 1 ) - setlocal filetype=specrun1 - set foldtext='--'.getline(v:foldstart).v:folddashes - else - setlocal filetype=specrun - set foldtext=_formatFoldText() - endif - - " Set up some convenient keybindings. - " - nnoremap q :close - nnoremap e :call FindSpecError(1) - nnoremap r :call FindSpecError(-1) - nnoremap E :call FindSpecError(0) - nnoremap :let b:err_line=1 - - " Default cmd for spec - " - if !exists( 'g:speckyRunSpecCmd' ) - let g:speckyRunSpecCmd = l:specver == 1 ? 'spec -fs' : 'rspec' - endif - - " Call spec and gather up the output - " - let l:cmd = g:speckyRunSpecCmd . ' ' . l:spec - call append( line('$'), 'Output of: ' . l:cmd ) - call append( line('$'), '' ) - let l:output = system( l:cmd ) - call append( line('$'), split( l:output, "\n" ) ) - normal gg - - " Lockdown the buffer - setlocal nomodifiable -endfunction - - -" }}} -" RunRdoc() {{{ -" -" Get documentation for the word under the cursor. -" -function! RunRdoc() - - " If we aren't in a ruby file (specs are ruby-mode too) then we probably - " don't care too much about this function. - " - if ( &ft != 'ruby' && &ft != 'rdoc' && &ft != 'rspec' ) - call s:err( "Not currently in a rubyish-mode." ) - return - endif - - " Set defaults - " - if !exists( 'g:speckyRunRdocCmd' ) - let g:speckyRunRdocCmd = 'ri' - endif - - let l:buf = 'specky:rdoc' - let l:bufname = bufname('%') - - if ( match( l:bufname, l:buf ) != -1 ) - " Already in the rdoc buffer. This allows us to lookup - " something like Kernel#require. - " - let l:word = expand('') - else - " Not in the rdoc buffer. This allows us to lookup - " something like 'each' in some_hash.each { ... } - " - let l:word = expand('') - endif - - " Squash the old buffer, if it exists. - " - if buflisted( l:buf ) - execute 'bd! ' . l:buf - endif - - " With multiple matches, strip the commas from the cWORD. - let l:word = substitute( l:word, ',', '', 'eg' ) - - execute NewWindowCmd() . l:buf - setlocal buftype=nofile bufhidden=delete noswapfile filetype=rdoc - nnoremap q :close - - " Call the documentation and gather up the output - " - let l:cmd = g:speckyRunRdocCmd . ' ' . l:word - let l:output = system( l:cmd ) - call append( 0, split( l:output, "\n" ) ) - execute 'normal gg' - - " Lockdown the buffer - setlocal nomodifiable -endfunction - - -" }}} -" FindSpecError( detail ) {{{ -" -" detail: -" 1 -- find the next failure -" -1 -- find the previous failure -" 0 -- expand the current failure's detail -" -" Convenience searches for jumping to spec failures. -" -function! FindSpecError( detail ) - - let l:specver = (exists( 'g:speckySpecVersion') && g:speckySpecVersion == 1) ? 1 : 2 - let l:err_str = l:specver == 1 ? '(FAILED\|ERROR - \d\+)$' : 'FAILED - #\d\+)$' - - if ( a:detail == 0 ) - " Find the detailed failure text for the current failure line, - " and unfold it. - " - let l:orig_so = &so - set so=100 - if l:specver == 1 - call search('^' . matchstr(getline('.'),'\d\+)$') ) - else - call search('^FAILURE - #' . matchstr(getline('.'),'\d\+)$') ) - endif - if has('folding') - silent! normal za - endif - execute 'set so=' . l:orig_so - - else - " Find the 'regular' failure line - " - if exists( 'b:err_line' ) - call cursor( b:err_line, a:detail == -1 ? 1 : strlen(getline(b:err_line)) ) - endif - call search( l:err_str, a:detail == -1 ? 'b' : '' ) - let b:err_line = line('.') - nohl - - endif -endfunction - - -" }}} -" NewWindowCmd() {{{ -" -" Return the stringified command for a new window, based on user preferences. -" -function! NewWindowCmd() - if ( ! exists('g:speckyWindowType' ) ) - return 'tabnew ' - endif - - if ( g:speckyWindowType == 1 ) - return 'new ' - elseif ( g:speckyWindowType == 2 ) - return 'vert new ' - else - return 'tabnew ' - endif -endfunction - - -" }}} -" _formatFoldText() {{{ -" -" Make folded failure detail visually appealing when folded. -" -function! _formatFoldText() - let l:fold = tolower( getline(v:foldstart) ) - let l:fold = substitute( l:fold, '-', 'detail', 'e' ) - let l:fold = '--[ ' . substitute( l:fold, ')', ' ]', 'e' ) - return l:fold -endfunction - - -" }}} -" s:err( msg ) "{{{ -" Notify of problems in a consistent fashion. -" -function! s:err( msg ) - echohl WarningMsg|echomsg 'specky: ' . a:msg|echohl None -endfunction " }}} -