Mercurial > vim

comparison src/testdir/test_hardcopy.vim @ 7580:e9c8eacb6760 v7.4.1090

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
commit https://github.com/vim/vim/commit/b5690794cf081773628fa0f1f2b948fd129d5b39 Author: Bram Moolenaar <Bram@vim.org> Date: Thu Jan 14 22:10:41 2016 +0100 patch 7.4.1090 Problem: No tests for :hardcopy and related options. Solution: Add test_hardcopy.
author Christian Brabandt <cb@256bit.org>
date Thu, 14 Jan 2016 22:15:05 +0100
parents
children 0738fa9c4971
comparison
equal deleted inserted replaced
7579:27ce584f5bbb 7580:e9c8eacb6760
1 " Test :hardcopy
2
3 func Test_printoptions_parsing()
4 " Only test that this doesn't throw an error.
5 set printoptions=left:5in,right:10pt,top:8mm,bottom:2pc
6 set printoptions=left:2in,top:30pt,right:16mm,bottom:3pc
7 set printoptions=header:3,syntax:y,number:7,wrap:n
8 set printoptions=duplex:short,collate:n,jobsplit:y,portrait:n
9 set printoptions=paper:10x14
10 set printoptions=paper:A3
11 set printoptions=paper:A4
12 set printoptions=paper:A5
13 set printoptions=paper:B4
14 set printoptions=paper:B5
15 set printoptions=paper:executive
16 set printoptions=paper:folio
17 set printoptions=paper:ledger
18 set printoptions=paper:legal
19 set printoptions=paper:letter
20 set printoptions=paper:quarto
21 set printoptions=paper:statement
22 set printoptions=paper:tabloid
23 set printoptions=formfeed:y
24 set printoptions=
25 set printoptions&
26 endfunc
27
28 func Test_printmbfont_parsing()
29 " Only test that this doesn't throw an error.
30 set printmbfont=r:WadaMin-Regular,b:WadaMin-Bold,i:WadaMin-Italic,o:WadaMin-Bold-Italic,c:yes,a:no
31 set printmbfont=
32 set printmbfont&
33 endfunc
34
35 func Test_printheader_parsing()
36 " Only test that this doesn't throw an error.
37 set printheader=%<%f\ %h%m%r%=%-14.(%l,%c%V%)\ %P
38 set printheader=%<%f%h%m%r%=%b\ 0x%B\ \ %l,%c%V\ %P
39 set printheader=%<%f%=\ [%1*%M%*%n%R%H]\ %-19(%3l,%02c%03V%)%O'%02b'
40 set printheader=...%r%{VarExists('b:gzflag','\ [GZ]')}%h...
41 set printheader=
42 set printheader&
43 endfunc
44
45 " Test that :hardcopy produces a non-empty file.
46 " We don't check much of the contents.
47 func Test_with_syntax()
48 set printoptions=syntax:y
49 syn on
50 hardcopy > Xhardcopy
51 let lines = readfile('Xhardcopy')
52 call assert_true(len(lines) > 20)
53 call assert_true(lines[0] =~ 'PS-Adobe')
54 call delete('Xhardcopy')
55 set printoptions&
56 endfunc