mirror of
				https://github.com/vim/vim.git
				synced 2025-10-31 09:57:14 -04:00 
			
		
		
		
	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".
			
			
This commit is contained in:
		| @@ -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 | |||||||
| :				" 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 | |||||||
| :				" 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[]) = | |||||||
|  |  | ||||||
| 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, | ||||||
| /**/ | /**/ | ||||||
|   | |||||||
		Reference in New Issue
	
	Block a user