Eolite 1.21: History bug fixed.

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

programs/fs/Eolite/trunk/History.txt

@@ -1,3 +1,7 @@
+05.04.12 -- v1.2 --16,5 Кб
+- заработала кнопка "Вперёд", кошерный код работы с историей;
+- парочка багфиксов в определении и выводе списка устройств.
+
 05.04.12 -- v1.1 --16,2 Кб
 - отображение списка дисков, а не устройств в панели слева;
 - уменьшен размер программы и потребляемой памяти;

programs/fs/Eolite/trunk/include/history.h

@@ -1,6 +1,7 @@
 //06.04.2012
 
-path_string history_list[40];
+#define MAX_HISTORY_NUM 40
+path_string history_list[MAX_HISTORY_NUM];
 int history_num;
 int history_current;
 
@@ -19,17 +20,18 @@ dword GetCurrentFolder()
 
 void HistoryPath(byte action)
 {
-	/*WriteDebug("");
-	WriteDebug(IntToStr(history_current));
-	for (i=0; i<history_num; i++;)
-	{
-		WriteDebug(#history_list[i].Item);
-		WriteDebug(IntToStr(history_num));
-	}*/
-	
 	if (action==add_new_path)
 	{
 		if (history_num>0) && (strcmp(#path,#history_list[history_current].Item)==0) return;
+			
+		if (history_current>=MAX_HISTORY_NUM-1)
+		{
+			history_current/=2;
+			for (i=0; i<history_current; i++;)
+			{
+				copystr(#history_list[MAX_HISTORY_NUM-i].Item, #history_list[i].Item);
+			}	
+		}
 		history_current++;
 		copystr(#path,#history_list[history_current].Item);
 		history_num=history_current;
@@ -38,8 +40,6 @@ void HistoryPath(byte action)
 	if (action==go_back)
 	{
 		if (history_current<=2) return;
-		WriteDebug("");
-		WriteDebug("Fuck!");
 		history_current--;
 		copystr(#history_list[history_current].Item,#path);
 	}