Add a new bitmap exclamation-mark

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 2915af65d152aff17c3a6e38e72ddbb3ebd44bc7..e2964ddb1b569f14d35a061038d2871e3ab05069 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2012-07-14  Leo Liu  <sdl.web@gmail.com>
+
+       * fringe.el: New bitmap exclamation-mark.
+
 2012-07-14  Jan Djärv  <jan.h.d@swipnet.se>
 
        * progmodes/cc-cmds.el (c-defun-name): Recognize Objective-C methods

diff --git a/lisp/fringe.el b/lisp/fringe.el
index 0c7e7eb194c29df11ca63ebe54224846bd482100..329370b5fe5572add773e425e3417e54ec7a8f7b 100644 (file)
--- a/lisp/fringe.el
+++ b/lisp/fringe.el
@@ -43,7 +43,7 @@
 ;; Define the built-in fringe bitmaps and setup default mappings
 
 (when (boundp 'fringe-bitmaps)
-  (let ((bitmaps '(question-mark
+  (let ((bitmaps '(question-mark exclamation-mark
                   left-arrow right-arrow up-arrow down-arrow
                   left-curly-arrow right-curly-arrow
                   left-triangle right-triangle

diff --git a/src/ChangeLog b/src/ChangeLog
index 29ec8ffb6d2849f407dd8fed3e3599a66b243935..eca3f526bc1c16afd5213652d293290832c6de9a 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2012-07-14  Leo Liu  <sdl.web@gmail.com>
+
+       * fringe.c: Add a new bitmap exclamation-mark.
+
 2012-07-14  Eli Zaretskii  <eliz@gnu.org>
 
        * gmalloc.c (GMALLOC_INHIBIT_VALLOC): Don't reference.

diff --git a/src/fringe.c b/src/fringe.c
index 4ab9c770326a98fcbc9fa0ffb442be5786d44fef..8de14ef45444adb5a5879cce5d31af0ffb434f67 100644 (file)
--- a/src/fringe.c
+++ b/src/fringe.c
@@ -107,6 +107,22 @@ struct fringe_bitmap
 static unsigned short question_mark_bits[] = {
   0x3c, 0x7e, 0x7e, 0x0c, 0x18, 0x18, 0x00, 0x18, 0x18};
 
+/* A exclamation mark.  */
+/*
+  ...XX...
+  ...XX...
+  ...XX...
+  ...XX...
+  ...XX...
+  ...XX...
+  ...XX...
+  ........
+  ...XX...
+  ...XX...
+*/
+static unsigned short exclamation_mark_bits[] = {
+  0x18, 0x18, 0x18, 0x18, 0x18, 0x18, 0x18, 0x18, 0x00, 0x18};
+
 /* An arrow like this: `<-'.  */
 /*
   ...xx...
@@ -432,6 +448,7 @@ static 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 (exclamation_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 },