From: Nick Roberts <nickrob@snap.net.nz>
Cc: emacs-devel@gnu.org
Subject: Re: Display feature request: gud-overlay-arrow
Date: Tue, 21 Mar 2006 15:55:53 +1200 [thread overview]
Message-ID: <17439.31049.393782.938907@kahikatea.snap.net.nz> (raw)
In-Reply-To: <m3lkv4k7iq.fsf@kfs-l.imdomain.dk>
> Can't you do that via the fringe-indicator-alist variable ?
Yes.
> I guess it would be easier to do if we had a "post-switch-buffer-hook" that
> is called (after post-command-hook) whenever a new buffer is selected
> in the command loop.
No, the variable fringe-indicator-alist works fine (for my purpose anyway),
I just wasn't familiar with it.
Is it OK to commit the patch below? It includes some minor corrections
to the doco.
--
Nick http://www.inet.net.nz/~nickrob
2006-03-21 Nick Roberts <nickrob@snap.net.nz>
* fringe.c (short hollow_right_triangle_bits) New bitmap.
(standard_bitmaps): Add it to the list.
2006-03-21 Nick Roberts <nickrob@snap.net.nz>
* fringe.el: Add hollow-right-triangle to the list of standard
bitmaps.
2006-03-21 Nick Roberts <nickrob@snap.net.nz>
* display.texi (Fringe Indicators): Add hollow-right-triangle to
the list of standard bitmaps. Correct typos.
*** fringe.c 16 Mar 2006 09:42:25 +1300 1.40
--- fringe.c 21 Mar 2006 15:43:44 +1200
*************** static unsigned short left_triangle_bits
*** 242,247 ****
--- 242,261 ----
static unsigned short right_triangle_bits[] = {
0xc0, 0xf0, 0xf8, 0xfc, 0xfc, 0xf8, 0xf0, 0xc0};
+ /* Hollow triangular arrow. */
+ /*
+ xxx.....
+ x..x....
+ x...x...
+ x....x..
+ x....x..
+ x...x...
+ x..x....
+ xxx.....
+ */
+ static unsigned short hollow_right_triangle_bits[] = {
+ 0xe0, 0x90, 0x88, 0x84, 0x84, 0x88, 0x90, 0xe0};
+
/* First line bitmap. An top-left angle. */
/*
xxxxxx..
*************** static unsigned short empty_line_bits[]
*** 451,478 ****
struct fringe_bitmap standard_bitmaps[] =
{
{ NULL, 0, 0, 0, 0, 0 }, /* NO_FRINGE_BITMAP */
! { FRBITS (question_mark_bits), 8, 0, ALIGN_BITMAP_CENTER, 0 },
! { FRBITS (left_arrow_bits), 8, 0, ALIGN_BITMAP_CENTER, 0 },
! { FRBITS (right_arrow_bits), 8, 0, ALIGN_BITMAP_CENTER, 0 },
! { FRBITS (up_arrow_bits), 8, 0, ALIGN_BITMAP_TOP, 0 },
! { FRBITS (down_arrow_bits), 8, 0, ALIGN_BITMAP_BOTTOM, 0 },
! { FRBITS (left_curly_arrow_bits), 8, 0, ALIGN_BITMAP_CENTER, 0 },
! { FRBITS (right_curly_arrow_bits), 8, 0, ALIGN_BITMAP_CENTER, 0 },
! { FRBITS (left_triangle_bits), 8, 0, ALIGN_BITMAP_CENTER, 0 },
! { FRBITS (right_triangle_bits), 8, 0, ALIGN_BITMAP_CENTER, 0 },
! { FRBITS (top_left_angle_bits), 8, 0, ALIGN_BITMAP_TOP, 0 },
! { FRBITS (top_right_angle_bits), 8, 0, ALIGN_BITMAP_TOP, 0 },
! { FRBITS (bottom_left_angle_bits), 8, 0, ALIGN_BITMAP_BOTTOM, 0 },
! { FRBITS (bottom_right_angle_bits), 8, 0, ALIGN_BITMAP_BOTTOM, 0 },
! { FRBITS (left_bracket_bits), 8, 0, ALIGN_BITMAP_CENTER, 0 },
! { FRBITS (right_bracket_bits), 8, 0, ALIGN_BITMAP_CENTER, 0 },
! { FRBITS (filled_rectangle_bits), 8, 0, ALIGN_BITMAP_CENTER, 0 },
! { FRBITS (hollow_rectangle_bits), 8, 0, ALIGN_BITMAP_CENTER, 0 },
! { FRBITS (filled_square_bits), 8, 0, ALIGN_BITMAP_CENTER, 0 },
! { FRBITS (hollow_square_bits), 8, 0, ALIGN_BITMAP_CENTER, 0 },
! { FRBITS (vertical_bar_bits), 8, 0, ALIGN_BITMAP_CENTER, 0 },
! { FRBITS (horizontal_bar_bits), 8, 0, ALIGN_BITMAP_BOTTOM, 0 },
! { FRBITS (empty_line_bits), 8, 3, ALIGN_BITMAP_TOP, 0 },
};
#define NO_FRINGE_BITMAP 0
--- 465,493 ----
struct fringe_bitmap standard_bitmaps[] =
{
{ NULL, 0, 0, 0, 0, 0 }, /* NO_FRINGE_BITMAP */
! { FRBITS (question_mark_bits), 8, 0, ALIGN_BITMAP_CENTER, 0 },
! { FRBITS (left_arrow_bits), 8, 0, ALIGN_BITMAP_CENTER, 0 },
! { FRBITS (right_arrow_bits), 8, 0, ALIGN_BITMAP_CENTER, 0 },
! { FRBITS (up_arrow_bits), 8, 0, ALIGN_BITMAP_TOP, 0 },
! { FRBITS (down_arrow_bits), 8, 0, ALIGN_BITMAP_BOTTOM, 0 },
! { FRBITS (left_curly_arrow_bits), 8, 0, ALIGN_BITMAP_CENTER, 0 },
! { FRBITS (right_curly_arrow_bits), 8, 0, ALIGN_BITMAP_CENTER, 0 },
! { FRBITS (left_triangle_bits), 8, 0, ALIGN_BITMAP_CENTER, 0 },
! { FRBITS (right_triangle_bits), 8, 0, ALIGN_BITMAP_CENTER, 0 },
! { FRBITS (hollow_right_triangle_bits), 8, 0, ALIGN_BITMAP_CENTER, 0 },
! { FRBITS (top_left_angle_bits), 8, 0, ALIGN_BITMAP_TOP, 0 },
! { FRBITS (top_right_angle_bits), 8, 0, ALIGN_BITMAP_TOP, 0 },
! { FRBITS (bottom_left_angle_bits), 8, 0, ALIGN_BITMAP_BOTTOM, 0 },
! { FRBITS (bottom_right_angle_bits), 8, 0, ALIGN_BITMAP_BOTTOM, 0 },
! { FRBITS (left_bracket_bits), 8, 0, ALIGN_BITMAP_CENTER, 0 },
! { FRBITS (right_bracket_bits), 8, 0, ALIGN_BITMAP_CENTER, 0 },
! { FRBITS (filled_rectangle_bits), 8, 0, ALIGN_BITMAP_CENTER, 0 },
! { FRBITS (hollow_rectangle_bits), 8, 0, ALIGN_BITMAP_CENTER, 0 },
! { FRBITS (filled_square_bits), 8, 0, ALIGN_BITMAP_CENTER, 0 },
! { FRBITS (hollow_square_bits), 8, 0, ALIGN_BITMAP_CENTER, 0 },
! { FRBITS (vertical_bar_bits), 8, 0, ALIGN_BITMAP_CENTER, 0 },
! { FRBITS (horizontal_bar_bits), 8, 0, ALIGN_BITMAP_BOTTOM, 0 },
! { FRBITS (empty_line_bits), 8, 3, ALIGN_BITMAP_TOP, 0 },
};
#define NO_FRINGE_BITMAP 0
*** fringe.el 22 Feb 2006 14:42:39 +1300 1.27
--- fringe.el 21 Mar 2006 15:34:07 +1200
***************
*** 47,53 ****
(let ((bitmaps '(question-mark
left-arrow right-arrow up-arrow down-arrow
left-curly-arrow right-curly-arrow
! left-triangle right-triangle
top-left-angle top-right-angle
bottom-left-angle bottom-right-angle
left-bracket right-bracket
--- 47,53 ----
(let ((bitmaps '(question-mark
left-arrow right-arrow up-arrow down-arrow
left-curly-arrow right-curly-arrow
! left-triangle right-triangle hollow-right-triangle
top-left-angle top-right-angle
bottom-left-angle bottom-right-angle
left-bracket right-bracket
*** display.texi 17 Mar 2006 11:37:48 +1300 1.211
--- display.texi 21 Mar 2006 15:27:53 +1200
*************** used in both left and right fringes.
*** 2876,2887 ****
When @code{fringe-indicator-alist} has a buffer-local value, and there
is no bitmap defined for a logical indicator, or the bitmap is
@code{t}, the corresponding value from the (non-local)
! @code{default-fringes-indicator-alist} is used.
To completely hide a specific indicator, set the bitmap to @code{nil}.
@end defvar
! @defvar default-fringes-indicator-alist
The value of this variable is the default value for
@code{fringe-indicator-alist} in buffers that do not override it.
@end defvar
--- 2876,2887 ----
When @code{fringe-indicator-alist} has a buffer-local value, and there
is no bitmap defined for a logical indicator, or the bitmap is
@code{t}, the corresponding value from the (non-local)
! @code{default-fringe-indicator-alist} is used.
To completely hide a specific indicator, set the bitmap to @code{nil}.
@end defvar
! @defvar default-fringe-indicator-alist
The value of this variable is the default value for
@code{fringe-indicator-alist} in buffers that do not override it.
@end defvar
*************** The value of this variable is the defaul
*** 2890,2897 ****
@item Standard fringe bitmaps for indicators:
@code{left-arrow}, @code{right-arrow}, @code{up-arrow}, @code{down-arrow},
@code{left-curly-arrow}, @code{right-curly-arrow},
! @code{left-triangle}, @code{right-triangle},
! @code{top-left-angle}, @code{ top-right-angle},
@code{bottom-left-angle}, @code{bottom-right-angle},
@code{left-bracket}, @code{right-bracket},
@code{filled-rectangle}, @code{hollow-rectangle},
--- 2890,2897 ----
@item Standard fringe bitmaps for indicators:
@code{left-arrow}, @code{right-arrow}, @code{up-arrow}, @code{down-arrow},
@code{left-curly-arrow}, @code{right-curly-arrow},
! @code{left-triangle}, @code{right-triangle}, @code{hollow-right-triangle},
! @code{top-left-angle}, @code{top-right-angle},
@code{bottom-left-angle}, @code{bottom-right-angle},
@code{left-bracket}, @code{right-bracket},
@code{filled-rectangle}, @code{hollow-rectangle},
next prev parent reply other threads:[~2006-03-21 3:55 UTC|newest]
Thread overview: 23+ messages / expand[flat|nested] mbox.gz Atom feed top
2006-03-20 22:59 Display feature request: gud-overlay-arrow Nick Roberts
2006-03-20 23:42 ` Kim F. Storm
2006-03-21 3:55 ` Nick Roberts [this message]
2006-03-21 9:27 ` Kim F. Storm
2006-03-21 10:35 ` Nick Roberts
2006-03-21 13:43 ` Kim F. Storm
2006-03-22 3:20 ` Nick Roberts
2006-03-22 20:43 ` Kim F. Storm
2006-03-23 5:15 ` John S. Yates, Jr.
2006-03-23 5:04 ` Miles Bader
2006-03-23 5:51 ` Nick Roberts
2006-03-23 6:26 ` Miles Bader
2006-03-23 21:28 ` Nick Roberts
2006-03-23 8:59 ` Nick Roberts
2006-03-23 10:23 ` Kim F. Storm
2006-03-23 21:59 ` Nick Roberts
2006-03-21 19:26 ` Richard Stallman
2006-03-21 19:40 ` Masatake YAMATO
2006-03-21 22:01 ` Stefan Monnier
2006-03-21 21:58 ` Kim F. Storm
2006-03-22 13:44 ` Richard Stallman
2006-03-22 17:50 ` Kim F. Storm
2006-03-23 19:47 ` Richard Stallman
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=17439.31049.393782.938907@kahikatea.snap.net.nz \
--to=nickrob@snap.net.nz \
--cc=emacs-devel@gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.