remove .txt extension from button caption

fixed issue 21 git-svn-id: svn://kolibrios.org@4717 a494cfbc-eb01-0410-851d-a64ba20cac60
2014-03-30 00:18:37 +00:00 · 2014-03-30 00:18:37 +00:00 · 6fafe38cf6
commit 6fafe38cf6
parent 2b2b2306cd
1 changed files with 2 additions and 1 deletions
--- 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