* fix casing of "VAr", no code changes · 893cf511bc - Gogs

Преглед на файлове

* fix casing of "VAr", no code changes

git-svn-id: trunk@48862 -

svenbarth преди 4 години

родител

8c38953440

ревизия

893cf511bc

променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда

Разделен изглед Покажи статистика за разликите

						
							+ 1
							
							- 1
						
rtl/objpas/sysutils/fina.inc
							 
								Целия файл
							
				@@ -381,7 +381,7 @@ end;
			
				 Procedure DoDirSeparators (Var FileName : PathStr); {$ifdef FPC_HAS_CPSTRING}rtlproc;{$endif}
			
				-VAr I : longint;
			
				+Var I : longint;
			
				 begin
			
				   For I:=1 to Length(FileName) do