WebSVN – SvarDOS – Diff – /sved/trunk/sved.c

 static void ui_basic(const struct file *db, unsigned short slotnum) {
   const char *s = svarlang_strid(0); /* ESC=MENU */
   unsigned short helpcol = screenw - strlen(s);
+  unsigned short maxfnlen = helpcol - 14;
   /* slot number */
+  {
     char slot[4] = "#00";
     slotnum++;
   /* fill rest of status bar with background */
   mdr_cout_char_rep(screenh - 1, 3, ' ', SCHEME_STBAR1, screenw - 1);
   /* filename and modflag */
+  {
-    const char *fn = db->fname;
+    const char *fn;
     unsigned short x;
+    if (db->fname[0] == 0) {
-    if (*fn == 0) fn = svarlang_str(0, 1);
+      fn = svarlang_str(0, 1); /* "UNTITLED" */
+    } else {
+      /* display filename up to maxfnlen chars */
+      fn = db->fname;
+      x = strlen(fn);
+      if (x > maxfnlen) fn += x - maxfnlen;
+    }
-    x = mdr_cout_str(screenh - 1, 4, fn, SCHEME_STBAR1, screenw);
+    x = mdr_cout_str(screenh - 1, 4, fn, SCHEME_STBAR1, maxfnlen);
     if (db->modflag) mdr_cout_char(screenh - 1, 5 + x, '!', SCHEME_STBAR2);
+  }
   /* eol type */
+  {
     } else if (k == 0x14F) { /* end */
        cursor_eol(db);
     } else if (k == 0x1B) { /* ESC */
       int quitnow = 0;
-      char fname[25];
+      char fname[64];
       int saveflag = 0;
       enum MENU_ACTION ui_action;
       /* collect the exact menu action and clear the screen */
       ui_action = ui_menu();

Subversion Repositories SvarDOS