rfivet
/
uemacs
mirror of https://github.com/rfivet/uemacs.git
1
0
Fork 0
Code Releases Activity

buffer-position reports character under cursor according to type (either 0xXX or \uXXXX).

This commit is contained in:
Renaud 2015-02-08 14:47:56 +08:00
parent bdbd2d5437
commit 356a003194
1 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
random.c
View File

@ -74,6 +74,7 @@ int showcpos(int f, int n)
long predchars; /* # chars preceding point */
int predlines; /* # lines preceding point */
unicode_t curchar ; /* character under cursor */
unsigned bytes ; /* length of unicode sequence */
int ratio;
int col;
int savepos; /* temp save for current offset */
@ -88,6 +89,7 @@ int showcpos(int f, int n)
predchars = 0;
predlines = 0;
curchar = 0;
bytes = 1 ;
while (lp != curbp->b_linep) {
/* if we are on the current line, record it */
if (lp == curwp->w_dotp) {
@ -99,7 +101,7 @@ int showcpos(int f, int n)
if( (curwp->w_doto) == len)
curchar = '\n';
else
(void) utf8_to_unicode( lp->l_text, curwp->w_doto, len, &curchar) ;
bytes = utf8_to_unicode( lp->l_text, curwp->w_doto, len, &curchar) ;
}
/* on to the next line */
++numlines;
@ -128,9 +130,9 @@ int showcpos(int f, int n)
ratio = (100L * predchars) / numchars;
/* summarize and report the info */
mlwrite("Line %d/%d Col %d/%d Char %D/%D (%d%%) char = 0x%x",
mlwrite("Line %d/%d Col %d/%d Char %D/%D (%d%%) char = %s%x",
predlines + 1, numlines + 1, col, ecol,
predchars, numchars, ratio, curchar);
predchars, numchars, ratio, (bytes > 1) ? "\\u" : "0x", curchar);
return TRUE;
}