diff options
| author | Kim F. Storm <storm@cua.dk> | 2004-02-08 23:33:16 +0000 |
|---|---|---|
| committer | Kim F. Storm <storm@cua.dk> | 2004-02-08 23:33:16 +0000 |
| commit | c3c6c23cc6fe72083c841b2e296a6dc4fd69f7b4 (patch) | |
| tree | 7513063e675d28bf70d6a8542908a759e692d642 /lisp/fringe.el | |
| parent | 82722af35556720fbd6a1d58246a06d977ea0050 (diff) | |
| download | emacs-c3c6c23cc6fe72083c841b2e296a6dc4fd69f7b4.tar.gz | |
(no-fringe-bitmap, undef-fringe-bitmap)
(left-truncation-fringe-bitmap, right-truncation-fringe-bitmap)
(up-arrow-fringe-bitmap, down-arrow-fringe-bitmap)
(continued-line-fringe-bitmap, continuation-line-fringe-bitmap)
(overlay-arrow-fringe-bitmap, top-left-angle-fringe-bitmap)
(top-right-angle-fringe-bitmap, bottom-left-angle-fringe-bitmap)
(bottom-right-angle-fringe-bitmap, left-bracket-fringe-bitmap)
(right-bracket-fringe-bitmap, filled-box-cursor-fringe-bitmap)
(hollow-box-cursor-fringe-bitmap, hollow-square-fringe-bitmap)
(bar-cursor-fringe-bitmap, hbar-cursor-fringe-bitmap)
(empty-line-fringe-bitmap): Define standard fringe bitmaps id's.
Diffstat (limited to 'lisp/fringe.el')
| -rw-r--r-- | lisp/fringe.el | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/lisp/fringe.el b/lisp/fringe.el index 16a21752b58..ab7709332f5 100644 --- a/lisp/fringe.el +++ b/lisp/fringe.el @@ -35,6 +35,33 @@ ;;; Code: +;; Standard fringe bitmaps + +(defconst no-fringe-bitmap 0) +(defconst undef-fringe-bitmap 1) +(defconst left-truncation-fringe-bitmap 2) +(defconst right-truncation-fringe-bitmap 3) +(defconst up-arrow-fringe-bitmap 4) +(defconst down-arrow-fringe-bitmap 5) +(defconst continued-line-fringe-bitmap 6) +(defconst continuation-line-fringe-bitmap 7) +(defconst overlay-arrow-fringe-bitmap 8) +(defconst top-left-angle-fringe-bitmap 9) +(defconst top-right-angle-fringe-bitmap 10) +(defconst bottom-left-angle-fringe-bitmap 11) +(defconst bottom-right-angle-fringe-bitmap 12) +(defconst left-bracket-fringe-bitmap 13) +(defconst right-bracket-fringe-bitmap 14) +(defconst filled-box-cursor-fringe-bitmap 15) +(defconst hollow-box-cursor-fringe-bitmap 16) +(defconst hollow-square-fringe-bitmap 17) +(defconst bar-cursor-fringe-bitmap 18) +(defconst hbar-cursor-fringe-bitmap 19) +(defconst empty-line-fringe-bitmap 20) + + +;; Control presence of fringes + (defvar fringe-mode) (defun set-fringe-mode-1 (ignore value) |