Mercurial > vim
annotate src/testdir/test98.in @ 6143:de35e123e63c v7.4.409
updated for version 7.4.409
Problem: Can't build with Perl on Fedora 20.
Solution: Find xsubpp in another directory. (Michael Henry)
author | Bram Moolenaar <bram@vim.org> |
---|---|
date | Sun, 17 Aug 2014 17:05:44 +0200 |
parents | fa024ce48542 |
children |
rev | line source |
---|---|
5157 | 1 Test for 'scrollbind' causing an unexpected scroll of one of the windows. |
2 STARTTEST | |
3 :so small.vim | |
5214
fa024ce48542
updated for version 7.4a.033
Bram Moolenaar <bram@vim.org>
parents:
5157
diff
changeset
|
4 :" We don't want the status line to cause problems: |
fa024ce48542
updated for version 7.4a.033
Bram Moolenaar <bram@vim.org>
parents:
5157
diff
changeset
|
5 :set laststatus=0 |
fa024ce48542
updated for version 7.4a.033
Bram Moolenaar <bram@vim.org>
parents:
5157
diff
changeset
|
6 :let g:totalLines = &lines * 20 |
fa024ce48542
updated for version 7.4a.033
Bram Moolenaar <bram@vim.org>
parents:
5157
diff
changeset
|
7 :let middle = g:totalLines / 2 |
fa024ce48542
updated for version 7.4a.033
Bram Moolenaar <bram@vim.org>
parents:
5157
diff
changeset
|
8 :wincmd n |
fa024ce48542
updated for version 7.4a.033
Bram Moolenaar <bram@vim.org>
parents:
5157
diff
changeset
|
9 :wincmd o |
fa024ce48542
updated for version 7.4a.033
Bram Moolenaar <bram@vim.org>
parents:
5157
diff
changeset
|
10 :for i in range(1, g:totalLines) |
fa024ce48542
updated for version 7.4a.033
Bram Moolenaar <bram@vim.org>
parents:
5157
diff
changeset
|
11 : call setline(i, 'LINE ' . i) |
fa024ce48542
updated for version 7.4a.033
Bram Moolenaar <bram@vim.org>
parents:
5157
diff
changeset
|
12 :endfor |
fa024ce48542
updated for version 7.4a.033
Bram Moolenaar <bram@vim.org>
parents:
5157
diff
changeset
|
13 :exe string(middle) |
fa024ce48542
updated for version 7.4a.033
Bram Moolenaar <bram@vim.org>
parents:
5157
diff
changeset
|
14 :normal zt |
fa024ce48542
updated for version 7.4a.033
Bram Moolenaar <bram@vim.org>
parents:
5157
diff
changeset
|
15 :normal M |
fa024ce48542
updated for version 7.4a.033
Bram Moolenaar <bram@vim.org>
parents:
5157
diff
changeset
|
16 :aboveleft vert new |
fa024ce48542
updated for version 7.4a.033
Bram Moolenaar <bram@vim.org>
parents:
5157
diff
changeset
|
17 :for i in range(1, g:totalLines) |
fa024ce48542
updated for version 7.4a.033
Bram Moolenaar <bram@vim.org>
parents:
5157
diff
changeset
|
18 : call setline(i, 'line ' . i) |
fa024ce48542
updated for version 7.4a.033
Bram Moolenaar <bram@vim.org>
parents:
5157
diff
changeset
|
19 :endfor |
fa024ce48542
updated for version 7.4a.033
Bram Moolenaar <bram@vim.org>
parents:
5157
diff
changeset
|
20 :exe string(middle) |
fa024ce48542
updated for version 7.4a.033
Bram Moolenaar <bram@vim.org>
parents:
5157
diff
changeset
|
21 :normal zt |
fa024ce48542
updated for version 7.4a.033
Bram Moolenaar <bram@vim.org>
parents:
5157
diff
changeset
|
22 :normal M |
fa024ce48542
updated for version 7.4a.033
Bram Moolenaar <bram@vim.org>
parents:
5157
diff
changeset
|
23 :" Execute the following two command at once to reproduce the problem. |
fa024ce48542
updated for version 7.4a.033
Bram Moolenaar <bram@vim.org>
parents:
5157
diff
changeset
|
24 :setl scb | wincmd p |
fa024ce48542
updated for version 7.4a.033
Bram Moolenaar <bram@vim.org>
parents:
5157
diff
changeset
|
25 :setl scb |
fa024ce48542
updated for version 7.4a.033
Bram Moolenaar <bram@vim.org>
parents:
5157
diff
changeset
|
26 :wincmd w |
5157 | 27 :let topLineLeft = line('w0') |
28 :wincmd p | |
29 :let topLineRight = line('w0') | |
30 :setl noscrollbind | |
31 :wincmd p | |
32 :setl noscrollbind | |
33 :q! | |
34 :%del _ | |
35 :call setline(1, 'Difference between the top lines (left - right): ' . string(topLineLeft - topLineRight)) | |
36 :w! test.out | |
37 :brewind | |
38 ENDTEST | |
39 | |
40 STARTTEST | |
41 :qa! | |
42 ENDTEST | |
43 |