Changeset f2e36b5 for editwin.c

Timestamp:

Aug 4, 2002, 6:12:28 PM (22 years ago)

Author:

Erik Nygren <nygren@mit.edu>

Branches:

master, barnowl_perlaim, debian, owl, release-1.10, release-1.4, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9

Children:

8509c08

Parents:

aa2f33b3

Message:

* Page-down will not skip past the last message if its truncated.
* Added C-t binding for transposing characters.  (from jdaniel)

File:

• editwin.c (modified) (1 diff)

editwin.c

@@ -368 +368 @@
 }
 
+void owl_editwin_transpose_chars(owl_editwin *e) {
+  /* Swap the character at point with the character at point-1 and
+   * advance the pointer.  If point is at beginning of buffer do
+   * nothing.  If point is after the last character swap point-1 with
+   * point-2.  (Behaves as observed in tcsh and emacs).  
+   */
+
+  int z;
+  char tmp;
+
+  if (e->bufflen==0) return;
+  
+  /* get the cursor point */
+  z=_owl_editwin_get_index_from_xy(e);
+
+  if (z==e->bufflen) {
+    /* point is after last character */
+    z--;
+  }  
+
+  if (z-1 < e->lock) {
+    /* point is at beginning of buffer, do nothing */
+    return;
+  }
+
+  tmp=e->buff[z];
+  e->buff[z]=e->buff[z-1];
+  e->buff[z-1]=tmp;
+  owl_editwin_key_right(e);
+}
+
 void owl_editwin_insert_string(owl_editwin *e, char *string) {
   /* insert 'string' at the current point, later text is shifted