Changeset 3498 in kBuild

Timestamp:

Apr 28, 2021 11:51:49 AM (4 years ago)

Author:

bird

Message:

SlickEdit/kkeys.e: Fix right-word deletion (kkeys_delete_right).

File:

• trunk/SlickEdit/kkeys.e (modified) (1 diff)

trunk/SlickEdit/kkeys.e ¶

@@ -157 +157 @@
    if (ch != ' ' && ch != "\t" && ch != "\r" && ch != "\n")
    {
-      /* Delete word and any trailing spaces, but stop at new line. */
-      delete_word();
-
-      ch = get_text();
-      if (ch == ' ' || ch == "\t" || ch == "\r" || ch == "\n")
+      /* Delete word and any trailing spaces, but stop at new line.
+         (Don't use delete_word here!) */
+      if (search('(:v|?)[ \t]@','r+') == 0)
       {
-         if (search('[ \t]#','r+') == 0)
-         {
-            _nrseek(match_length('s'));
-            _delete_text(match_length());
-         }
+         _nrseek(match_length('s'));
+         _delete_text(match_length());
       }
    }