diff --git a/programs/system/docpack/trunk/docpack.asm b/programs/system/docpack/trunk/docpack.asm
index f34f87f4b4..b50b1924aa 100755
--- a/programs/system/docpack/trunk/docpack.asm
+++ b/programs/system/docpack/trunk/docpack.asm
@@ -126,7 +126,8 @@ red:
   sub esi, 4 ;remove .txt extension
   mcall ,,[sc.work_button_text]
   pop   ecx
-  add   edx,esi
+  add   esi, 4
+  add   edx, esi
   add   ebx,16
   loop  .list
   mcall 12,2