From 0698e16a6b154f227dcb4ab135b273af1fa0f5f9 Mon Sep 17 00:00:00 2001
From: Matthias Melcher <git@matthiasm.com>
Date: Fri, 1 Feb 2019 23:59:20 +0100
Subject: Fixed Delete key in Fl_Input deleting entire widgets in Fluid (STR
 #2841).

---
 src/Fl_Input.cxx | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'src')

diff --git a/src/Fl_Input.cxx b/src/Fl_Input.cxx
index d1f76796e..a6a7b53b8 100644
--- a/src/Fl_Input.cxx
+++ b/src/Fl_Input.cxx
@@ -177,8 +177,9 @@ int Fl_Input::kf_delete_eol() {
 
 int Fl_Input::kf_delete_char_right() {
   if (readonly()) { fl_beep(); return 1; }
-  if (mark() != position()) return cut();
-  else return cut(1);
+  if (mark() != position()) cut();
+  else cut(1);
+  return 1;
 }
 
 int Fl_Input::kf_delete_char_left() {
-- 
cgit v1.2.3