suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

DEL forward deletes

Browse Source 
svn: r1490
This commit is contained in:
Matthew Flatt 2005-12-02 15:58:38 +00:00
parent 2526db5610
commit 1a8c0a351d
1 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
src/mred/wxme/wx_media.cxx
View File

@ -623,9 +623,16 @@ void wxMediaEdit::OnDefaultChar(wxKeyEvent *event)
switch(code) { switch(code) {
case WXK_BACK: case WXK_BACK:
case WXK_DELETE:
Delete(); Delete();
return; return;
case WXK_DELETE:
if (startpos == endpos) {
if (endpos < len) {
Delete(endpos, endpos + 1);
}
} else
Delete();
return;
case WXK_RIGHT: case WXK_RIGHT:
case WXK_LEFT: case WXK_LEFT:
case WXK_UP: case WXK_UP: