Skip to content
Snippets Groups Projects
Commit 707060e2 authored by Bram Moolenaar's avatar Bram Moolenaar
Browse files

updated for version 7.3.818

Problem:    When test 40 fails because of a bad build it may leave files
            behind that cause it to fail later.
Solution:   Let the file names start with "X".
parent caca92be
No related branches found
No related tags found
No related merge requests found
...@@ -3,18 +3,18 @@ Test for "*Cmd" autocommands ...@@ -3,18 +3,18 @@ Test for "*Cmd" autocommands
STARTTEST STARTTEST
:so small.vim :so small.vim
:/^start/,$w! Xxx " write lines below to Xxx :/^start/,$w! Xxx " write lines below to Xxx
:au BufReadCmd testA 0r Xxx|$del :au BufReadCmd XtestA 0r Xxx|$del
:e testA " will read text of Xxd instead :e XtestA " will read text of Xxd instead
:au BufWriteCmd testA call append(line("$"), "write") :au BufWriteCmd XtestA call append(line("$"), "write")
:w " will append a line to the file :w " will append a line to the file
:r testA " should not read anything :r XtestA " should not read anything
: " now we have: : " now we have:
: " 1 start of Xxx : " 1 start of Xxx
: " 2 test40 : " 2 test40
: " 3 end of Xxx : " 3 end of Xxx
: " 4 write : " 4 write
:au FileReadCmd testB '[r Xxx :au FileReadCmd XtestB '[r Xxx
:2r testB " will read Xxx below line 2 instead :2r XtestB " will read Xxx below line 2 instead
: " 1 start of Xxx : " 1 start of Xxx
: " 2 test40 : " 2 test40
: " 3 start of Xxx : " 3 start of Xxx
...@@ -22,10 +22,10 @@ STARTTEST ...@@ -22,10 +22,10 @@ STARTTEST
: " 5 end of Xxx : " 5 end of Xxx
: " 6 end of Xxx : " 6 end of Xxx
: " 7 write : " 7 write
:au FileWriteCmd testC '[,']copy $ :au FileWriteCmd XtestC '[,']copy $
4GA1 4GA1
:4,5w testC " will copy lines 4 and 5 to the end :4,5w XtestC " will copy lines 4 and 5 to the end
:r testC " should not read anything :r XtestC " should not read anything
: " 1 start of Xxx : " 1 start of Xxx
: " 2 test40 : " 2 test40
: " 3 start of Xxx : " 3 start of Xxx
...@@ -35,14 +35,14 @@ STARTTEST ...@@ -35,14 +35,14 @@ STARTTEST
: " 7 write : " 7 write
: " 8 test401 : " 8 test401
: " 9 end of Xxx : " 9 end of Xxx
:au FILEAppendCmd testD '[,']w! test.out :au FILEAppendCmd XtestD '[,']w! test.out
:w >>testD " will write all lines to test.out :w >>XtestD " will write all lines to test.out
:$r testD " should not read anything :$r XtestD " should not read anything
:$w >>test.out " append "end of Xxx" to test.out :$w >>test.out " append "end of Xxx" to test.out
:au BufReadCmd testE 0r test.out|$del :au BufReadCmd XtestE 0r test.out|$del
:sp testE " split window with test.out :sp XtestE " split window with test.out
5Goasdf:" 5Goasdf:"
:au BufWriteCmd testE w! test.out :au BufWriteCmd XtestE w! test.out
:wall " will write other window to test.out :wall " will write other window to test.out
: " 1 start of Xxx : " 1 start of Xxx
: " 2 test40 : " 2 test40
......
...@@ -725,6 +725,8 @@ static char *(features[]) = ...@@ -725,6 +725,8 @@ static char *(features[]) =
static int included_patches[] = static int included_patches[] =
{ /* Add new patch number below this line */ { /* Add new patch number below this line */
/**/
818,
/**/ /**/
817, 817,
/**/ /**/
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment