mirror of https://github.com/akelge/vim
34 lines
801 B
VimL
34 lines
801 B
VimL
" Converts a file to PDF and display it (only on OS X)
|
|
function! ToPDF()
|
|
"define PS file name
|
|
let psname= "/tmp/" . expand("%:t:r") . ".ps"
|
|
"save colorscheme name
|
|
let g:colorname=g:colors_name
|
|
execute "write"
|
|
execute "colorscheme default"
|
|
execute "hardcopy > " . l:psname
|
|
execute "silent !launch -w " . l:psname
|
|
execute "silent !rm " . l:psname
|
|
execute "colorscheme" g:colorname
|
|
redraw!
|
|
endfunction
|
|
|
|
" Set up menu for the function
|
|
an 10.520 &File.-SEP3- <Nop>
|
|
an 10.530 &File.&ToPDF :call ToPDF()<CR>
|
|
vunmenu &File.&ToPDF
|
|
vnoremenu &File.&ToPDF :call ToPDF()<CR>
|
|
|
|
" Zoom in/out of gvim
|
|
function! Zoom()
|
|
if has("gui_running")
|
|
if &guifont =~ 'Monaco:h12'
|
|
set guifont=Monaco:h9
|
|
set lines=70
|
|
else
|
|
set guifont=Monaco:h12
|
|
set lines=50
|
|
endif
|
|
endif
|
|
endfunction
|