summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorJim Blandy <jimb@redhat.com>1994-09-19 17:28:37 +0000
committerJim Blandy <jimb@redhat.com>1994-09-19 17:28:37 +0000
commita45e35e17336f766e1ef2fe79a95e703d5d184b3 (patch)
tree9be051267b2e44c310196b5fdb845776fe4dc02d /src
parente39322d99f0b85a4325d7004e37d4d0723684c55 (diff)
downloademacs-a45e35e17336f766e1ef2fe79a95e703d5d184b3.tar.gz
Add a new element to display tables controlling side-by-side
window borders. * buffer.c (syms_of_buffer): Update doc string for `buffer-display-table'. * disptab.h (DISP_TABLE_SIZE): Bump to 262. (DISP_BORDER_GLYPH): New accessor macro. * xdisp.c (display_text_line): Consult the display table when building side-by-side window borders.
Diffstat (limited to 'src')
-rw-r--r--src/buffer.c6
-rw-r--r--src/disptab.h3
-rw-r--r--src/xdisp.c5
3 files changed, 10 insertions, 4 deletions
diff --git a/src/buffer.c b/src/buffer.c
index e132f77da93..4239851b226 100644
--- a/src/buffer.c
+++ b/src/buffer.c
@@ -2776,7 +2776,7 @@ The display table is a vector created with `make-display-table'.\n\
The first 256 elements control how to display each possible text character.\n\
Each value should be a vector of characters or nil;\n\
nil means display the character in the default fashion.\n\
-The remaining five elements control the display of\n\
+The remaining six elements control the display of\n\
the end of a truncated screen line (element 256, a single character);\n\
the end of a continued line (element 257, a single character);\n\
the escape character used to display character codes in octal\n\
@@ -2784,7 +2784,9 @@ The remaining five elements control the display of\n\
the character used as an arrow for control characters (element 259,\n\
a single character);\n\
the decoration indicating the presence of invisible lines (element 260,\n\
- a vector of characters).\n\
+ a vector of characters);\n\
+ the character used to draw the border between side-by-side windows\n\
+ (element 261, a single character).;\n\
If this variable is nil, the value of `standard-display-table' is used.\n\
Each window can have its own, overriding display table.");
#endif
diff --git a/src/disptab.h b/src/disptab.h
index 235f6bf24fb..d22e52034c4 100644
--- a/src/disptab.h
+++ b/src/disptab.h
@@ -19,12 +19,13 @@ the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */
/* Access the slots of a display-table, according to their purpose. */
-#define DISP_TABLE_SIZE 261
+#define DISP_TABLE_SIZE 262
#define DISP_TRUNC_GLYPH(dp) ((dp)->contents[256])
#define DISP_CONTINUE_GLYPH(dp) ((dp)->contents[257])
#define DISP_ESCAPE_GLYPH(dp) ((dp)->contents[258])
#define DISP_CTRL_GLYPH(dp) ((dp)->contents[259])
#define DISP_INVIS_VECTOR(dp) ((dp)->contents[260])
+#define DISP_BORDER_GLYPH(dp) ((dp)->contents[261])
#define DISP_CHAR_VECTOR(dp, c) ((dp)->contents[c])
extern struct Lisp_Vector *window_display_table ();
diff --git a/src/xdisp.c b/src/xdisp.c
index 6f22c38f4d1..1ce0c58ae0d 100644
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -2504,7 +2504,10 @@ display_text_line (w, start, vpos, hpos, taboffset)
them when the scroll bar windows are flickering around to be
reconfigured. */
*p1++ = (FRAME_HAS_VERTICAL_SCROLL_BARS (f)
- ? ' ' : '|');
+ ? ' '
+ : (dp && INTEGERP (DISP_BORDER_GLYPH (dp))
+ ? DISP_BORDER_GLYPH (dp)
+ : '|'));
}
desired_glyphs->used[vpos] = max (desired_glyphs->used[vpos],
p1 - desired_glyphs->glyphs[vpos]);