HTMLv another few fixes, one for lev

git-svn-id: svn://kolibrios.org@2419 a494cfbc-eb01-0410-851d-a64ba20cac60

programs/network/htmlv/browser/History.txt

@@ -1,4 +1,4 @@
-29.02.12 -- v0.76 -- 11.x
+29.02.12 -- v0.76 -- 11.3
 - исправлена работа кнопки "Назад";
 - в историю посещённых страниц не может быть добавлено 2 одинаковых адреса подряд;
 - исправлено исчезание заголовка страниц;

programs/network/htmlv/browser/TWB.h

@@ -6,8 +6,6 @@
 
 //èç õòòï-ëîàä â ðåàäõòìë
 
-//BrowserHistory.AddUrl();  -> проверка не = ли новый адрес старому и добавить поумолчанию везде
-
 int	downloader_id;
 
 dword j,
@@ -75,8 +73,6 @@ void TWebBrowser::Scan(dword id) {
 		
 		GetNewUrl();
 
-		BrowserHistory.AddUrl(); 
-		
 		if (!strcmp(get_URL_part(5),"http:"))) HttpLoad();
 		//Lee 21.02 }
 		
@@ -238,6 +234,8 @@ void TWebBrowser::ShowPage(dword adress) {
 	edit1.size = edit1.pos = strlen(#editURL);
 	edit_box_draw stdcall(#edit1); //ðèñóåì ñòðîêó àäðåñà
 	
+	BrowserHistory.AddUrl();
+	
 	//LETS_LOAD
 	ReadHtml();
 

programs/network/htmlv/browser/include/history.h

@@ -15,6 +15,7 @@ void UrlsHistory::GoBack()
 	j = find_symbol(#UrlHistory, '|'); //предыдущая страница -> она нам и нужна
 	copystr(#UrlHistory + j, #URL);
 	copystr(#URL, #editURL);
+	if (!strcmp(get_URL_part(5),"http:"))) HttpLoad();
 	WB1.ShowPage(#URL);
 }