annotate src/testdir/test98a.in @ 5157:7a6ce0c426fe v7.4a.005

updated for version 7.4a.005 Problem: Scroll binding causes unexpected scroll. Solution: Store the topline after updating scroll binding. Add a test. (Lech Lorens)
author Bram Moolenaar <bram@vim.org>
date Tue, 09 Jul 2013 13:44:59 +0200
parents
children fc6f4a653265
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
5157
7a6ce0c426fe updated for version 7.4a.005
Bram Moolenaar <bram@vim.org>
parents:
diff changeset
1 " We don't want the status line to cause problems:
7a6ce0c426fe updated for version 7.4a.005
Bram Moolenaar <bram@vim.org>
parents:
diff changeset
2 set laststatus=0
7a6ce0c426fe updated for version 7.4a.005
Bram Moolenaar <bram@vim.org>
parents:
diff changeset
3 redraw!
7a6ce0c426fe updated for version 7.4a.005
Bram Moolenaar <bram@vim.org>
parents:
diff changeset
4 let g:totalLines = &lines * 20
7a6ce0c426fe updated for version 7.4a.005
Bram Moolenaar <bram@vim.org>
parents:
diff changeset
5 let middle = g:totalLines / 2
7a6ce0c426fe updated for version 7.4a.005
Bram Moolenaar <bram@vim.org>
parents:
diff changeset
6 wincmd n
7a6ce0c426fe updated for version 7.4a.005
Bram Moolenaar <bram@vim.org>
parents:
diff changeset
7 wincmd o
7a6ce0c426fe updated for version 7.4a.005
Bram Moolenaar <bram@vim.org>
parents:
diff changeset
8 for i in range(1, g:totalLines)
7a6ce0c426fe updated for version 7.4a.005
Bram Moolenaar <bram@vim.org>
parents:
diff changeset
9 call setline(i, 'LINE ' . i)
7a6ce0c426fe updated for version 7.4a.005
Bram Moolenaar <bram@vim.org>
parents:
diff changeset
10 endfor
7a6ce0c426fe updated for version 7.4a.005
Bram Moolenaar <bram@vim.org>
parents:
diff changeset
11
7a6ce0c426fe updated for version 7.4a.005
Bram Moolenaar <bram@vim.org>
parents:
diff changeset
12 exe string(middle)
7a6ce0c426fe updated for version 7.4a.005
Bram Moolenaar <bram@vim.org>
parents:
diff changeset
13 normal zt
7a6ce0c426fe updated for version 7.4a.005
Bram Moolenaar <bram@vim.org>
parents:
diff changeset
14 normal M
7a6ce0c426fe updated for version 7.4a.005
Bram Moolenaar <bram@vim.org>
parents:
diff changeset
15
7a6ce0c426fe updated for version 7.4a.005
Bram Moolenaar <bram@vim.org>
parents:
diff changeset
16 aboveleft vert new
7a6ce0c426fe updated for version 7.4a.005
Bram Moolenaar <bram@vim.org>
parents:
diff changeset
17 for i in range(1, g:totalLines)
7a6ce0c426fe updated for version 7.4a.005
Bram Moolenaar <bram@vim.org>
parents:
diff changeset
18 call setline(i, 'line ' . i)
7a6ce0c426fe updated for version 7.4a.005
Bram Moolenaar <bram@vim.org>
parents:
diff changeset
19 endfor
7a6ce0c426fe updated for version 7.4a.005
Bram Moolenaar <bram@vim.org>
parents:
diff changeset
20 exe string(middle)
7a6ce0c426fe updated for version 7.4a.005
Bram Moolenaar <bram@vim.org>
parents:
diff changeset
21 normal zt
7a6ce0c426fe updated for version 7.4a.005
Bram Moolenaar <bram@vim.org>
parents:
diff changeset
22 normal M
7a6ce0c426fe updated for version 7.4a.005
Bram Moolenaar <bram@vim.org>
parents:
diff changeset
23 setl scb
7a6ce0c426fe updated for version 7.4a.005
Bram Moolenaar <bram@vim.org>
parents:
diff changeset
24
7a6ce0c426fe updated for version 7.4a.005
Bram Moolenaar <bram@vim.org>
parents:
diff changeset
25 wincmd p
7a6ce0c426fe updated for version 7.4a.005
Bram Moolenaar <bram@vim.org>
parents:
diff changeset
26
7a6ce0c426fe updated for version 7.4a.005
Bram Moolenaar <bram@vim.org>
parents:
diff changeset
27 call feedkeys(":setl scb\n\<C-w>\<C-w>", 't')