aboutsummaryrefslogtreecommitdiffstats
path: root/Game
diff options
context:
space:
mode:
Diffstat (limited to 'Game')
-rw-r--r--Game/Code/Screens/UScreenEditSub.pas7
1 files changed, 5 insertions, 2 deletions
diff --git a/Game/Code/Screens/UScreenEditSub.pas b/Game/Code/Screens/UScreenEditSub.pas
index d7c2859a..43720c8d 100644
--- a/Game/Code/Screens/UScreenEditSub.pas
+++ b/Game/Code/Screens/UScreenEditSub.pas
@@ -1168,8 +1168,11 @@ begin
SDLK_BACKSPACE:
begin
strBPM := Text[TextBPM].Text;
- Delete(strBPM, Length(strBPM)-1, 2);
- Text[TextBPM].Text := strBPM + '|';
+ if Length(strBPM)>1 then
+ begin
+ Delete(strBPM, Length(strBPM)-1, 2);
+ Text[TextBPM].Text := strBPM + '|';
+ end;
end;
end;
end;