forked from KolibriOS/kolibrios
Tinypad - fix r.4487 for replace mode.
git-svn-id: svn://kolibrios.org@4490 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
parent
30559d9cdb
commit
498bfb6f7a
@ -97,6 +97,7 @@ bot_mode db ?
|
||||
bot_mode2 db ?
|
||||
|
||||
popup_valid_text db ?
|
||||
replace_mode db ?
|
||||
|
||||
align 4
|
||||
|
||||
|
@ -675,7 +675,9 @@ botdlg.button:
|
||||
push [cur_editor.SelStart.X]
|
||||
mov ebp,cur_editor
|
||||
call init_sel_vars
|
||||
mov [replace_mode],1
|
||||
call key.ctrl_v
|
||||
mov [replace_mode],0
|
||||
pop [cur_editor.SelStart.X]
|
||||
|
||||
stdcall mem.Free,[copy_buf]
|
||||
|
@ -584,8 +584,10 @@ endp
|
||||
|
||||
;-----------------------------------------------------------------------------
|
||||
proc key.ctrl_v
|
||||
cmp [replace_mode],0
|
||||
jne @f
|
||||
call get_from_clipboard
|
||||
|
||||
@@:
|
||||
cmp [copy_size],0
|
||||
je .exit
|
||||
|
||||
@ -691,6 +693,9 @@ proc key.ctrl_v
|
||||
mov [cur_editor.Modified],1
|
||||
|
||||
.exit:
|
||||
cmp [replace_mode],0
|
||||
jne .exit_1
|
||||
|
||||
cmp [copy_size],0
|
||||
je .exit_1
|
||||
; remove unnecessary memory area
|
||||
|
Loading…
Reference in New Issue
Block a user