Subversion Repositories SvarDOS

Rev

Rev 1352 | Rev 1354 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1352 Rev 1353
Line 220... Line 220...
220 
  }
 220 
  }
221 
 
 221 
 
222 
  /* eol type */
 222 
  /* eol type */
223 
  {
 223 
  {
224 
    const char *eoltype = "CRLF";
 224 
    const char *eoltype = "CRLF";
225 
    if (db->lfonly) eoltype = "LF";
 225 
    if (db->lfonly) eoltype += 2;
226 
    mdr_cout_str(screenh - 1, helpcol - 6, eoltype, SCHEME_STBAR1, 5);
 226 
    mdr_cout_str(screenh - 1, helpcol - 6, eoltype, SCHEME_STBAR1, 5);
227 
  }
 227 
  }
228 
 
 228 
 
229 
  mdr_cout_str(screenh - 1, helpcol, s, SCHEME_STBAR2, 40);
 229 
  mdr_cout_str(screenh - 1, helpcol, s, SCHEME_STBAR2, 40);
230 
}
 230 
}
Line 939... Line 939...
939 
 
 939 
 
940 
    } else if (k == 0x144) { /* F10 */
 940 
    } else if (k == 0x144) { /* F10 */
941 
      db->modflag = '*';
 941 
      db->modflag = '*';
942 
      db->lfonly ^= 1;
 942 
      db->lfonly ^= 1;
943 
      uidirty.statusbar = 1;
 943 
      uidirty.statusbar = 1;
- 
 
 944 
      uidirty.from = 0;
- 
 
 945 
      uidirty.to = 0;
944 
 
 946 
 
945 
    } else if (k == 0x174) { /* CTRL+ArrRight - jump to next word */
 947 
    } else if (k == 0x174) { /* CTRL+ArrRight - jump to next word */
946 
      /* if currently cursor is on a non-space, then fast-forward to nearest space or EOL */
 948 
      /* if currently cursor is on a non-space, then fast-forward to nearest space or EOL */
947 
      for (;;) {
 949 
      for (;;) {
948 
        if (db->xoffset + db->cursorposx == db->cursor->len) break;
 950 
        if (db->xoffset + db->cursorposx == db->cursor->len) break;