[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/faces.el
From: |
Kim F . Storm |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/faces.el |
Date: |
Thu, 02 Dec 2004 05:50:23 -0500 |
Index: emacs/lisp/faces.el
diff -c emacs/lisp/faces.el:1.291 emacs/lisp/faces.el:1.292
*** emacs/lisp/faces.el:1.291 Wed Dec 1 18:29:20 2004
--- emacs/lisp/faces.el Thu Dec 2 10:43:56 2004
***************
*** 2022,2034 ****
:group 'basic-faces)
! (defface glyph
! '((t
! :inherit secondary-selection))
"Basic face for displaying \\ and ^ in multichar glyphs.
It is also used for ... in ellipses."
:group 'basic-faces)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
--- 2022,2049 ----
:group 'basic-faces)
! ;; Make escape characters stand out in display
!
! (defface escape-glyph
! '((t :inherit secondary-selection))
"Basic face for displaying \\ and ^ in multichar glyphs.
It is also used for ... in ellipses."
:group 'basic-faces)
+ (or standard-display-table
+ ;; avoid using autoloaded make-display-table here
+ (setq standard-display-table (make-char-table 'display-table nil)))
+
+ (let* ((face (lsh (face-id 'escape-glyph) 19))
+ (backslash (+ face ?\\))
+ (dot (+ face ?.)))
+ (set-char-table-extra-slot standard-display-table 2 backslash)
+ (aset standard-display-table 2208 (vector backslash ?\s))
+ (aset standard-display-table 2221 (vector backslash ?-))
+ (set-char-table-extra-slot standard-display-table 3 (+ face ?^))
+ (set-char-table-extra-slot standard-display-table 4 (vector dot dot dot)))
+
+
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
- [Emacs-diffs] Changes to emacs/lisp/faces.el, Daniel Pfeiffer, 2004/12/01
- [Emacs-diffs] Changes to emacs/lisp/faces.el,
Kim F . Storm <=
- [Emacs-diffs] Changes to emacs/lisp/faces.el, Kim F . Storm, 2004/12/02
- [Emacs-diffs] Changes to emacs/lisp/faces.el, Richard M . Stallman, 2004/12/08
- [Emacs-diffs] Changes to emacs/lisp/faces.el, Richard M . Stallman, 2004/12/13
- [Emacs-diffs] Changes to emacs/lisp/faces.el, Richard M . Stallman, 2004/12/21
- [Emacs-diffs] Changes to emacs/lisp/faces.el, Dan Nicolaescu, 2004/12/23
- [Emacs-diffs] Changes to emacs/lisp/faces.el, Richard M . Stallman, 2004/12/31