[Qemacs-commit] qemacs extras.c

[Charlie Gordon]

CVSROOT:        /sources/qemacs
Module name:    qemacs
Changes by:     Charlie Gordon <chqrlie>        17/02/25 14:38:39

Modified files:
        .              : extras.c 

Log message:
        extras: fix backward-level at end of comment

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/qemacs/extras.c?cvsroot=qemacs&r1=1.52&r2=1.53

Patches:
Index: extras.c
===================================================================
RCS file: /sources/qemacs/qemacs/extras.c,v
retrieving revision 1.52
retrieving revision 1.53
diff -u -b -r1.52 -r1.53
--- extras.c    31 Jan 2017 21:38:02 -0000      1.52
+++ extras.c    25 Feb 2017 19:38:38 -0000      1.53
@@ -454,6 +454,10 @@
         /* XXX: should only query the syntax colorizer */
         len = s->get_colorized_line(s, buf, countof(buf), offset1, &offset1, 
line_num);
         if (len < countof(buf) - 2) {
+            if (pos > 0
+            &&  ((c = buf[pos - 1] & CHAR_MASK) == ']' || c == '}' || c == 
')')) {
+                style0 = buf[pos - 1] >> STYLE_SHIFT;
+            } else
             if (pos < len) {
                 style0 = buf[pos] >> STYLE_SHIFT;
             }