annotate lisp/whitespace.el @ 109418:6e96aca307a4

Merge from mainline.
author Katsumi Yamaoka <yamaoka@jpl.org>
date Sun, 27 Jun 2010 22:48:36 +0000
parents 904ccd8f2acb
children 3ea5c230ba38
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1 ;;; whitespace.el --- minor mode to visualize TAB, (HARD) SPACE, NEWLINE
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2
106815
1d1d5d9bd884 Add 2010 to copyright years.
Glenn Morris <rgm@gnu.org>
parents: 106527
diff changeset
3 ;; Copyright (C) 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
4 ;; Free Software Foundation, Inc.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
5
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
6 ;; Author: Vinicius Jose Latorre <viniciusjl@ig.com.br>
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
7 ;; Maintainer: Vinicius Jose Latorre <viniciusjl@ig.com.br>
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
8 ;; Keywords: data, wp
106527
3d526a040a6b Asure buffer-display-table is unique when two or more windows are visible.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 106526
diff changeset
9 ;; Version: 12.1
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
10 ;; X-URL: http://www.emacswiki.org/cgi-bin/wiki/ViniciusJoseLatorre
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
11
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
12 ;; This file is part of GNU Emacs.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
13
94678
ee5932bf781d Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 94440
diff changeset
14 ;; GNU Emacs is free software: you can redistribute it and/or modify
ee5932bf781d Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 94440
diff changeset
15 ;; it under the terms of the GNU General Public License as published by
ee5932bf781d Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 94440
diff changeset
16 ;; the Free Software Foundation, either version 3 of the License, or
ee5932bf781d Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 94440
diff changeset
17 ;; (at your option) any later version.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
18
94678
ee5932bf781d Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 94440
diff changeset
19 ;; GNU Emacs is distributed in the hope that it will be useful,
ee5932bf781d Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 94440
diff changeset
20 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
ee5932bf781d Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 94440
diff changeset
21 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
ee5932bf781d Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 94440
diff changeset
22 ;; GNU General Public License for more details.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
23
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
24 ;; You should have received a copy of the GNU General Public License
94678
ee5932bf781d Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 94440
diff changeset
25 ;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
26
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
27 ;;; Commentary:
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
28
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
29 ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
30 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
31 ;; Introduction
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
32 ;; ------------
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
33 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
34 ;; This package is a minor mode to visualize blanks (TAB, (HARD) SPACE
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
35 ;; and NEWLINE).
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
36 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
37 ;; whitespace uses two ways to visualize blanks: faces and display
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
38 ;; table.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
39 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
40 ;; * Faces are used to highlight the background with a color.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
41 ;; whitespace uses font-lock to highlight blank characters.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
42 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
43 ;; * Display table changes the way a character is displayed, that is,
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
44 ;; it provides a visual mark for characters, for example, at the end
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
45 ;; of line (?\xB6), at SPACEs (?\xB7) and at TABs (?\xBB).
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
46 ;;
94374
bb784189a8b3 Doc fix.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94373
diff changeset
47 ;; The `whitespace-style' variable selects which way blanks are
bb784189a8b3 Doc fix.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94373
diff changeset
48 ;; visualized.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
49 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
50 ;; Note that when whitespace is turned on, whitespace saves the
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
51 ;; font-lock state, that is, if font-lock is on or off. And
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
52 ;; whitespace restores the font-lock state when it is turned off. So,
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
53 ;; if whitespace is turned on and font-lock is off, whitespace also
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
54 ;; turns on the font-lock to highlight blanks, but the font-lock will
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
55 ;; be turned off when whitespace is turned off. Thus, turn on
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
56 ;; font-lock before whitespace is on, if you want that font-lock
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
57 ;; continues on after whitespace is turned off.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
58 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
59 ;; When whitespace is on, it takes care of highlighting some special
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
60 ;; characters over the default mechanism of `nobreak-char-display'
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
61 ;; (which see) and `show-trailing-whitespace' (which see).
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
62 ;;
105447
257c9f6d8be8 Fix doc.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 105244
diff changeset
63 ;; The trailing spaces are not highlighted while point is at end of line.
257c9f6d8be8 Fix doc.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 105244
diff changeset
64 ;; Also the spaces at beginning of buffer are not highlighted while point is at
257c9f6d8be8 Fix doc.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 105244
diff changeset
65 ;; beginning of buffer; and the spaces at end of buffer are not highlighted
257c9f6d8be8 Fix doc.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 105244
diff changeset
66 ;; while point is at end of buffer.
257c9f6d8be8 Fix doc.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 105244
diff changeset
67 ;;
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
68 ;; There are two ways of using whitespace: local and global.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
69 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
70 ;; * Local whitespace affects only the current buffer.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
71 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
72 ;; * Global whitespace affects all current and future buffers. That
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
73 ;; is, if you turn on global whitespace and then create a new
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
74 ;; buffer, the new buffer will also have whitespace on. The
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
75 ;; `whitespace-global-modes' variable controls which major-mode will
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
76 ;; be automagically turned on.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
77 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
78 ;; You can mix the local and global usage without any conflict. But
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
79 ;; local whitespace has priority over global whitespace. Whitespace
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
80 ;; mode is active in a buffer if you have enabled it in that buffer or
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
81 ;; if you have enabled it globally.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
82 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
83 ;; When global and local whitespace are on:
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
84 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
85 ;; * if local whitespace is turned off, whitespace is turned off for
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
86 ;; the current buffer only.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
87 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
88 ;; * if global whitespace is turned off, whitespace continues on only
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
89 ;; in the buffers in which local whitespace is on.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
90 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
91 ;; To use whitespace, insert in your ~/.emacs:
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
92 ;;
106526
9a6c9ef9321f Doc fix.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 105994
diff changeset
93 ;; (require 'whitespace)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
94 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
95 ;; Or autoload at least one of the commands`whitespace-mode',
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
96 ;; `whitespace-toggle-options', `global-whitespace-mode' or
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
97 ;; `global-whitespace-toggle-options'. For example:
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
98 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
99 ;; (autoload 'whitespace-mode "whitespace"
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
100 ;; "Toggle whitespace visualization." t)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
101 ;; (autoload 'whitespace-toggle-options "whitespace"
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
102 ;; "Toggle local `whitespace-mode' options." t)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
103 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
104 ;; whitespace was inspired by:
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
105 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
106 ;; whitespace.el Rajesh Vaidheeswarran <rv@gnu.org>
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
107 ;; Warn about and clean bogus whitespaces in the file
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
108 ;; (inspired the idea to warn and clean some blanks)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
109 ;; This was the original `whitespace.el' which was replaced by
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
110 ;; `blank-mode.el'. And later `blank-mode.el' was renamed to
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
111 ;; `whitespace.el'.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
112 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
113 ;; show-whitespace-mode.el Aurelien Tisne <aurelien.tisne@free.fr>
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
114 ;; Simple mode to highlight whitespaces
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
115 ;; (inspired the idea to use font-lock)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
116 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
117 ;; whitespace-mode.el Lawrence Mitchell <wence@gmx.li>
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
118 ;; Major mode for editing Whitespace
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
119 ;; (inspired the idea to use display table)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
120 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
121 ;; visws.el Miles Bader <miles@gnu.org>
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
122 ;; Make whitespace visible
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
123 ;; (handle display table, his code was modified, but the main
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
124 ;; idea was kept)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
125 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
126 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
127 ;; Using whitespace
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
128 ;; ----------------
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
129 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
130 ;; There is no problem if you mix local and global minor mode usage.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
131 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
132 ;; * LOCAL whitespace:
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
133 ;; + To toggle whitespace options locally, type:
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
134 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
135 ;; M-x whitespace-toggle-options RET
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
136 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
137 ;; + To activate whitespace locally, type:
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
138 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
139 ;; C-u 1 M-x whitespace-mode RET
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
140 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
141 ;; + To deactivate whitespace locally, type:
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
142 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
143 ;; C-u 0 M-x whitespace-mode RET
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
144 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
145 ;; + To toggle whitespace locally, type:
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
146 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
147 ;; M-x whitespace-mode RET
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
148 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
149 ;; * GLOBAL whitespace:
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
150 ;; + To toggle whitespace options globally, type:
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
151 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
152 ;; M-x global-whitespace-toggle-options RET
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
153 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
154 ;; + To activate whitespace globally, type:
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
155 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
156 ;; C-u 1 M-x global-whitespace-mode RET
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
157 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
158 ;; + To deactivate whitespace globally, type:
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
159 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
160 ;; C-u 0 M-x global-whitespace-mode RET
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
161 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
162 ;; + To toggle whitespace globally, type:
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
163 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
164 ;; M-x global-whitespace-mode RET
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
165 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
166 ;; There are also the following useful commands:
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
167 ;;
96968
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
168 ;; `whitespace-newline-mode'
97311
2be7f5365285 Improve docstring.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97074
diff changeset
169 ;; Toggle NEWLINE minor mode visualization ("nl" on modeline).
96968
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
170 ;;
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
171 ;; `global-whitespace-newline-mode'
97311
2be7f5365285 Improve docstring.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97074
diff changeset
172 ;; Toggle NEWLINE global minor mode visualization ("NL" on modeline).
96968
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
173 ;;
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
174 ;; `whitespace-report'
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
175 ;; Report some blank problems in buffer.
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
176 ;;
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
177 ;; `whitespace-report-region'
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
178 ;; Report some blank problems in a region.
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
179 ;;
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
180 ;; `whitespace-cleanup'
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
181 ;; Cleanup some blank problems in all buffer or at region.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
182 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
183 ;; `whitespace-cleanup-region'
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
184 ;; Cleanup some blank problems at region.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
185 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
186 ;; The problems, which are cleaned up, are:
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
187 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
188 ;; 1. empty lines at beginning of buffer.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
189 ;; 2. empty lines at end of buffer.
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
190 ;; If `whitespace-style' includes the value `empty', remove all
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
191 ;; empty lines at beginning and/or end of buffer.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
192 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
193 ;; 3. 8 or more SPACEs at beginning of line.
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
194 ;; If `whitespace-style' includes the value `indentation':
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
195 ;; replace 8 or more SPACEs at beginning of line by TABs, if
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
196 ;; `indent-tabs-mode' is non-nil; otherwise, replace TABs by
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
197 ;; SPACEs.
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
198 ;; If `whitespace-style' includes the value `indentation::tab',
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
199 ;; replace 8 or more SPACEs at beginning of line by TABs.
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
200 ;; If `whitespace-style' includes the value `indentation::space',
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
201 ;; replace TABs by SPACEs.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
202 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
203 ;; 4. SPACEs before TAB.
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
204 ;; If `whitespace-style' includes the value `space-before-tab':
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
205 ;; replace SPACEs by TABs, if `indent-tabs-mode' is non-nil;
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
206 ;; otherwise, replace TABs by SPACEs.
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
207 ;; If `whitespace-style' includes the value
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
208 ;; `space-before-tab::tab', replace SPACEs by TABs.
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
209 ;; If `whitespace-style' includes the value
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
210 ;; `space-before-tab::space', replace TABs by SPACEs.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
211 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
212 ;; 5. SPACEs or TABs at end of line.
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
213 ;; If `whitespace-style' includes the value `trailing', remove all
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
214 ;; SPACEs or TABs at end of line.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
215 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
216 ;; 6. 8 or more SPACEs after TAB.
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
217 ;; If `whitespace-style' includes the value `space-after-tab':
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
218 ;; replace SPACEs by TABs, if `indent-tabs-mode' is non-nil;
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
219 ;; otherwise, replace TABs by SPACEs.
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
220 ;; If `whitespace-style' includes the value `space-after-tab::tab',
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
221 ;; replace SPACEs by TABs.
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
222 ;; If `whitespace-style' includes the value
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
223 ;; `space-after-tab::space', replace TABs by SPACEs.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
224 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
225 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
226 ;; Hooks
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
227 ;; -----
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
228 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
229 ;; whitespace has the following hook variables:
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
230 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
231 ;; `whitespace-mode-hook'
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
232 ;; It is evaluated always when whitespace is turned on locally.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
233 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
234 ;; `global-whitespace-mode-hook'
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
235 ;; It is evaluated always when whitespace is turned on globally.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
236 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
237 ;; `whitespace-load-hook'
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
238 ;; It is evaluated after whitespace package is loaded.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
239 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
240 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
241 ;; Options
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
242 ;; -------
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
243 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
244 ;; Below it's shown a brief description of whitespace options, please,
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
245 ;; see the options declaration in the code for a long documentation.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
246 ;;
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
247 ;; `whitespace-style' Specify which kind of blank is
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
248 ;; visualized.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
249 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
250 ;; `whitespace-space' Face used to visualize SPACE.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
251 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
252 ;; `whitespace-hspace' Face used to visualize HARD SPACE.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
253 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
254 ;; `whitespace-tab' Face used to visualize TAB.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
255 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
256 ;; `whitespace-newline' Face used to visualize NEWLINE char
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
257 ;; mapping.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
258 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
259 ;; `whitespace-trailing' Face used to visualize trailing
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
260 ;; blanks.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
261 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
262 ;; `whitespace-line' Face used to visualize "long" lines.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
263 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
264 ;; `whitespace-space-before-tab' Face used to visualize SPACEs
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
265 ;; before TAB.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
266 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
267 ;; `whitespace-indentation' Face used to visualize 8 or more
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
268 ;; SPACEs at beginning of line.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
269 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
270 ;; `whitespace-empty' Face used to visualize empty lines at
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
271 ;; beginning and/or end of buffer.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
272 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
273 ;; `whitespace-space-after-tab' Face used to visualize 8 or more
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
274 ;; SPACEs after TAB.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
275 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
276 ;; `whitespace-space-regexp' Specify SPACE characters regexp.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
277 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
278 ;; `whitespace-hspace-regexp' Specify HARD SPACE characters regexp.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
279 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
280 ;; `whitespace-tab-regexp' Specify TAB characters regexp.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
281 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
282 ;; `whitespace-trailing-regexp' Specify trailing characters regexp.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
283 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
284 ;; `whitespace-space-before-tab-regexp' Specify SPACEs before TAB
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
285 ;; regexp.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
286 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
287 ;; `whitespace-indentation-regexp' Specify regexp for 8 or more
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
288 ;; SPACEs at beginning of line.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
289 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
290 ;; `whitespace-empty-at-bob-regexp' Specify regexp for empty lines
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
291 ;; at beginning of buffer.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
292 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
293 ;; `whitespace-empty-at-eob-regexp' Specify regexp for empty lines
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
294 ;; at end of buffer.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
295 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
296 ;; `whitespace-space-after-tab-regexp' Specify regexp for 8 or more
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
297 ;; SPACEs after TAB.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
298 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
299 ;; `whitespace-line-column' Specify column beyond which the line
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
300 ;; is highlighted.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
301 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
302 ;; `whitespace-display-mappings' Specify an alist of mappings
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
303 ;; for displaying characters.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
304 ;;
91377
510381911395 Use find-file-hook instead of find-file-hooks.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 88118
diff changeset
305 ;; `whitespace-global-modes' Modes for which global
510381911395 Use find-file-hook instead of find-file-hooks.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 88118
diff changeset
306 ;; `whitespace-mode' is automagically
510381911395 Use find-file-hook instead of find-file-hooks.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 88118
diff changeset
307 ;; turned on.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
308 ;;
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
309 ;; `whitespace-action' Specify which action is taken when a
98454
431a14612b87 Eliminate whitespace-kill-buffer-hook functionality.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 98009
diff changeset
310 ;; buffer is visited or written.
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
311 ;;
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
312 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
313 ;; Acknowledgements
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
314 ;; ----------------
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
315 ;;
97074
8b6a3348313d Doc fix.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97073
diff changeset
316 ;; Thanks to David Reitter <david.reitter@gmail.com> for suggesting a
8b6a3348313d Doc fix.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97073
diff changeset
317 ;; `whitespace-newline' initialization with low contrast relative to
8b6a3348313d Doc fix.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97073
diff changeset
318 ;; the background color.
8b6a3348313d Doc fix.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97073
diff changeset
319 ;;
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
320 ;; Thanks to Stephen Deasey <sdeasey@gmail.com> for the
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
321 ;; `indent-tabs-mode' usage suggestion.
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
322 ;;
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
323 ;; Thanks to Eric Cooper <ecc@cmu.edu> for the suggestion to have hook
98454
431a14612b87 Eliminate whitespace-kill-buffer-hook functionality.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 98009
diff changeset
324 ;; actions when buffer is written as the original whitespace package
431a14612b87 Eliminate whitespace-kill-buffer-hook functionality.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 98009
diff changeset
325 ;; had.
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
326 ;;
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
327 ;; Thanks to nschum (EmacsWiki) for the idea about highlight "long"
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
328 ;; lines tail. See EightyColumnRule (EmacsWiki).
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
329 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
330 ;; Thanks to Juri Linkov <juri@jurta.org> for suggesting:
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
331 ;; * `define-minor-mode'.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
332 ;; * `global-whitespace-*' name for global commands.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
333 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
334 ;; Thanks to Robert J. Chassell <bob@gnu.org> for doc fix and testing.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
335 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
336 ;; Thanks to Drew Adams <drew.adams@oracle.com> for toggle commands
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
337 ;; suggestion.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
338 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
339 ;; Thanks to Antti Kaihola <antti.kaihola@linux-aktivaattori.org> for
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
340 ;; helping to fix `find-file-hooks' reference.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
341 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
342 ;; Thanks to Andreas Roehler <andreas.roehler@easy-emacs.de> for
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
343 ;; indicating defface byte-compilation warnings.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
344 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
345 ;; Thanks to TimOCallaghan (EmacsWiki) for the idea about highlight
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
346 ;; "long" lines. See EightyColumnRule (EmacsWiki).
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
347 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
348 ;; Thanks to Yanghui Bian <yanghuibian@gmail.com> for indicating a new
97311
2be7f5365285 Improve docstring.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97074
diff changeset
349 ;; NEWLINE character mapping.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
350 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
351 ;; Thanks to Pete Forman <pete.forman@westgeo.com> for indicating
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
352 ;; whitespace-mode.el on XEmacs.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
353 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
354 ;; Thanks to Miles Bader <miles@gnu.org> for handling display table via
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
355 ;; visws.el (his code was modified, but the main idea was kept).
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
356 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
357 ;; Thanks to:
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
358 ;; Rajesh Vaidheeswarran <rv@gnu.org> (original) whitespace.el
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
359 ;; Aurelien Tisne <aurelien.tisne@free.fr> show-whitespace-mode.el
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
360 ;; Lawrence Mitchell <wence@gmx.li> whitespace-mode.el
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
361 ;; Miles Bader <miles@gnu.org> visws.el
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
362 ;; And to all people who contributed with them.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
363 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
364 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
365 ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
366
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
367 ;;; code:
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
368
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
369
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
370 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
371 ;;;; User Variables:
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
372
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
373
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
374 ;;; Interface to the command system
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
375
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
376
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
377 (defgroup whitespace nil
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
378 "Visualize blanks (TAB, (HARD) SPACE and NEWLINE)."
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
379 :link '(emacs-library-link :tag "Source Lisp File" "whitespace.el")
88118
959dc75df82e (whitespace): Set :version tag to 23.1.
Juanma Barranquero <lekktu@gmail.com>
parents: 88115
diff changeset
380 :version "23.1"
107378
904ccd8f2acb Reorganize Custom groups.
Chong Yidong <cyd@stupidchicken.com>
parents: 106895
diff changeset
381 :group 'convenience)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
382
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
383
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
384 (defcustom whitespace-style
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
385 '(tabs spaces trailing lines space-before-tab newline
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
386 indentation empty space-after-tab
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
387 space-mark tab-mark newline-mark)
100171
d42aff5ca541 * align.el:
Lute Kamstra <lute@gnu.org>
parents: 98826
diff changeset
388 "Specify which kind of blank is visualized.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
389
88118
959dc75df82e (whitespace): Set :version tag to 23.1.
Juanma Barranquero <lekktu@gmail.com>
parents: 88115
diff changeset
390 It's a list containing some or all of the following values:
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
391
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
392 trailing trailing blanks are visualized via faces.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
393
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
394 tabs TABs are visualized via faces.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
395
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
396 spaces SPACEs and HARD SPACEs are visualized via
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
397 faces.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
398
106895
181539c8b6a4 Fix typos in docstrings, error messages, etc.
Juanma Barranquero <lekktu@gmail.com>
parents: 106815
diff changeset
399 lines lines which have columns beyond
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
400 `whitespace-line-column' are highlighted via
106895
181539c8b6a4 Fix typos in docstrings, error messages, etc.
Juanma Barranquero <lekktu@gmail.com>
parents: 106815
diff changeset
401 faces.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
402 Whole line is highlighted.
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
403 It has precedence over `lines-tail' (see
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
404 below).
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
405
106895
181539c8b6a4 Fix typos in docstrings, error messages, etc.
Juanma Barranquero <lekktu@gmail.com>
parents: 106815
diff changeset
406 lines-tail lines which have columns beyond
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
407 `whitespace-line-column' are highlighted via
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
408 faces.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
409 But only the part of line which goes
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
410 beyond `whitespace-line-column' column.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
411 It has effect only if `lines' (see above)
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
412 is not present in `whitespace-style'.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
413
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
414 newline NEWLINEs are visualized via faces.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
415
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
416 empty empty lines at beginning and/or end of buffer
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
417 are visualized via faces.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
418
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
419 indentation::tab 8 or more SPACEs at beginning of line are
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
420 visualized via faces.
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
421
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
422 indentation::space TABs at beginning of line are visualized via
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
423 faces.
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
424
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
425 indentation 8 or more SPACEs at beginning of line are
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
426 visualized, if `indent-tabs-mode' (which see)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
427 is non-nil; otherwise, TABs at beginning of
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
428 line are visualized via faces.
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
429
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
430 space-after-tab::tab 8 or more SPACEs after a TAB are
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
431 visualized via faces.
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
432
104301
316b10a4c19e * whitespace.el (whitespace-style): Doc fix (Bug#3661).
Chong Yidong <cyd@stupidchicken.com>
parents: 100908
diff changeset
433 space-after-tab::space TABs are visualized when 8 or more
316b10a4c19e * whitespace.el (whitespace-style): Doc fix (Bug#3661).
Chong Yidong <cyd@stupidchicken.com>
parents: 100908
diff changeset
434 SPACEs occur after a TAB, via faces.
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
435
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
436 space-after-tab 8 or more SPACEs after a TAB are
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
437 visualized, if `indent-tabs-mode'
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
438 (which see) is non-nil; otherwise,
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
439 the TABs are visualized via faces.
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
440
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
441 space-before-tab::tab SPACEs before TAB are visualized via
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
442 faces.
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
443
104301
316b10a4c19e * whitespace.el (whitespace-style): Doc fix (Bug#3661).
Chong Yidong <cyd@stupidchicken.com>
parents: 100908
diff changeset
444 space-before-tab::space TABs are visualized when SPACEs occur
316b10a4c19e * whitespace.el (whitespace-style): Doc fix (Bug#3661).
Chong Yidong <cyd@stupidchicken.com>
parents: 100908
diff changeset
445 before TAB, via faces.
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
446
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
447 space-before-tab SPACEs before TAB are visualized, if
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
448 `indent-tabs-mode' (which see) is
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
449 non-nil; otherwise, the TABs are
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
450 visualized via faces.
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
451
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
452 space-mark SPACEs and HARD SPACEs are visualized via
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
453 display table.
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
454
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
455 tab-mark TABs are visualized via display table.
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
456
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
457 newline-mark NEWLINEs are visualized via display table.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
458
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
459 Any other value is ignored.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
460
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
461 If nil, don't visualize TABs, (HARD) SPACEs and NEWLINEs via faces and
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
462 via display table.
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
463
106895
181539c8b6a4 Fix typos in docstrings, error messages, etc.
Juanma Barranquero <lekktu@gmail.com>
parents: 106815
diff changeset
464 There is an evaluation order for some values, if they are
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
465 included in `whitespace-style' list. For example, if
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
466 indentation, indentation::tab and/or indentation::space are
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
467 included in `whitespace-style' list. The evaluation order for
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
468 these values is:
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
469
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
470 * For indentation:
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
471 1. indentation
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
472 2. indentation::tab
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
473 3. indentation::space
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
474
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
475 * For SPACEs after TABs:
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
476 1. space-after-tab
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
477 2. space-after-tab::tab
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
478 3. space-after-tab::space
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
479
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
480 * For SPACEs before TABs:
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
481 1. space-before-tab
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
482 2. space-before-tab::tab
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
483 3. space-before-tab::space
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
484
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
485 So, for example, if indentation and indentation::space are
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
486 included in `whitespace-style' list, the indentation value is
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
487 evaluated instead of indentation::space value.
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
488
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
489 See also `whitespace-display-mappings' for documentation."
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
490 :type '(repeat :tag "Kind of Blank"
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
491 (choice :tag "Kind of Blank Face"
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
492 (const :tag "(Face) Trailing TABs, SPACEs and HARD SPACEs"
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
493 trailing)
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
494 (const :tag "(Face) SPACEs and HARD SPACEs"
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
495 spaces)
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
496 (const :tag "(Face) TABs" tabs)
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
497 (const :tag "(Face) Lines" lines)
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
498 (const :tag "(Face) SPACEs before TAB"
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
499 space-before-tab)
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
500 (const :tag "(Face) NEWLINEs" newline)
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
501 (const :tag "(Face) Indentation SPACEs"
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
502 indentation)
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
503 (const :tag "(Face) Empty Lines At BOB And/Or EOB"
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
504 empty)
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
505 (const :tag "(Face) SPACEs after TAB"
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
506 space-after-tab)
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
507 (const :tag "(Mark) SPACEs and HARD SPACEs"
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
508 space-mark)
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
509 (const :tag "(Mark) TABs" tab-mark)
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
510 (const :tag "(Mark) NEWLINEs" newline-mark)))
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
511 :group 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
512
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
513
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
514 (defcustom whitespace-space 'whitespace-space
100171
d42aff5ca541 * align.el:
Lute Kamstra <lute@gnu.org>
parents: 98826
diff changeset
515 "Symbol face used to visualize SPACE.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
516
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
517 Used when `whitespace-style' includes the value `spaces'."
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
518 :type 'face
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
519 :group 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
520
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
521
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
522 (defface whitespace-space
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
523 '((((class color) (background dark))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
524 (:background "grey20" :foreground "aquamarine3"))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
525 (((class color) (background light))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
526 (:background "LightYellow" :foreground "aquamarine3"))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
527 (t (:inverse-video t)))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
528 "Face used to visualize SPACE."
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
529 :group 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
530
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
531
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
532 (defcustom whitespace-hspace 'whitespace-hspace
100171
d42aff5ca541 * align.el:
Lute Kamstra <lute@gnu.org>
parents: 98826
diff changeset
533 "Symbol face used to visualize HARD SPACE.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
534
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
535 Used when `whitespace-style' includes the value `spaces'."
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
536 :type 'face
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
537 :group 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
538
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
539
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
540 (defface whitespace-hspace ; 'nobreak-space
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
541 '((((class color) (background dark))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
542 (:background "grey24" :foreground "aquamarine3"))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
543 (((class color) (background light))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
544 (:background "LemonChiffon3" :foreground "aquamarine3"))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
545 (t (:inverse-video t)))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
546 "Face used to visualize HARD SPACE."
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
547 :group 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
548
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
549
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
550 (defcustom whitespace-tab 'whitespace-tab
100171
d42aff5ca541 * align.el:
Lute Kamstra <lute@gnu.org>
parents: 98826
diff changeset
551 "Symbol face used to visualize TAB.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
552
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
553 Used when `whitespace-style' includes the value `tabs'."
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
554 :type 'face
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
555 :group 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
556
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
557
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
558 (defface whitespace-tab
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
559 '((((class color) (background dark))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
560 (:background "grey22" :foreground "aquamarine3"))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
561 (((class color) (background light))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
562 (:background "beige" :foreground "aquamarine3"))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
563 (t (:inverse-video t)))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
564 "Face used to visualize TAB."
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
565 :group 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
566
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
567
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
568 (defcustom whitespace-newline 'whitespace-newline
100171
d42aff5ca541 * align.el:
Lute Kamstra <lute@gnu.org>
parents: 98826
diff changeset
569 "Symbol face used to visualize NEWLINE char mapping.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
570
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
571 See `whitespace-display-mappings'.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
572
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
573 Used when `whitespace-style' includes the values `newline-mark'
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
574 and `newline'."
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
575 :type 'face
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
576 :group 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
577
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
578
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
579 (defface whitespace-newline
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
580 '((((class color) (background dark))
97073
7159ef9ad909 whitespace-newline: change initilization to have a low contrast relative to the background color.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 96968
diff changeset
581 (:foreground "darkgray" :bold nil))
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
582 (((class color) (background light))
97073
7159ef9ad909 whitespace-newline: change initilization to have a low contrast relative to the background color.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 96968
diff changeset
583 (:foreground "lightgray" :bold nil))
7159ef9ad909 whitespace-newline: change initilization to have a low contrast relative to the background color.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 96968
diff changeset
584 (t (:underline t :bold nil)))
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
585 "Face used to visualize NEWLINE char mapping.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
586
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
587 See `whitespace-display-mappings'."
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
588 :group 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
589
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
590
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
591 (defcustom whitespace-trailing 'whitespace-trailing
100171
d42aff5ca541 * align.el:
Lute Kamstra <lute@gnu.org>
parents: 98826
diff changeset
592 "Symbol face used to visualize trailing blanks.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
593
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
594 Used when `whitespace-style' includes the value `trailing'."
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
595 :type 'face
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
596 :group 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
597
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
598
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
599 (defface whitespace-trailing ; 'trailing-whitespace
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
600 '((((class mono)) (:inverse-video t :bold t :underline t))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
601 (t (:background "red1" :foreground "yellow" :bold t)))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
602 "Face used to visualize trailing blanks."
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
603 :group 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
604
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
605
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
606 (defcustom whitespace-line 'whitespace-line
100171
d42aff5ca541 * align.el:
Lute Kamstra <lute@gnu.org>
parents: 98826
diff changeset
607 "Symbol face used to visualize \"long\" lines.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
608
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
609 See `whitespace-line-column'.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
610
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
611 Used when `whitespace-style' includes the value `line'."
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
612 :type 'face
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
613 :group 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
614
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
615
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
616 (defface whitespace-line
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
617 '((((class mono)) (:inverse-video t :bold t :underline t))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
618 (t (:background "gray20" :foreground "violet")))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
619 "Face used to visualize \"long\" lines.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
620
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
621 See `whitespace-line-column'."
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
622 :group 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
623
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
624
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
625 (defcustom whitespace-space-before-tab 'whitespace-space-before-tab
100171
d42aff5ca541 * align.el:
Lute Kamstra <lute@gnu.org>
parents: 98826
diff changeset
626 "Symbol face used to visualize SPACEs before TAB.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
627
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
628 Used when `whitespace-style' includes the value `space-before-tab'."
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
629 :type 'face
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
630 :group 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
631
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
632
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
633 (defface whitespace-space-before-tab
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
634 '((((class mono)) (:inverse-video t :bold t :underline t))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
635 (t (:background "DarkOrange" :foreground "firebrick")))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
636 "Face used to visualize SPACEs before TAB."
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
637 :group 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
638
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
639
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
640 (defcustom whitespace-indentation 'whitespace-indentation
100171
d42aff5ca541 * align.el:
Lute Kamstra <lute@gnu.org>
parents: 98826
diff changeset
641 "Symbol face used to visualize 8 or more SPACEs at beginning of line.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
642
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
643 Used when `whitespace-style' includes the value `indentation'."
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
644 :type 'face
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
645 :group 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
646
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
647
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
648 (defface whitespace-indentation
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
649 '((((class mono)) (:inverse-video t :bold t :underline t))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
650 (t (:background "yellow" :foreground "firebrick")))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
651 "Face used to visualize 8 or more SPACEs at beginning of line."
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
652 :group 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
653
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
654
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
655 (defcustom whitespace-empty 'whitespace-empty
100171
d42aff5ca541 * align.el:
Lute Kamstra <lute@gnu.org>
parents: 98826
diff changeset
656 "Symbol face used to visualize empty lines at beginning and/or end of buffer.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
657
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
658 Used when `whitespace-style' includes the value `empty'."
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
659 :type 'face
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
660 :group 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
661
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
662
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
663 (defface whitespace-empty
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
664 '((((class mono)) (:inverse-video t :bold t :underline t))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
665 (t (:background "yellow" :foreground "firebrick")))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
666 "Face used to visualize empty lines at beginning and/or end of buffer."
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
667 :group 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
668
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
669
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
670 (defcustom whitespace-space-after-tab 'whitespace-space-after-tab
100171
d42aff5ca541 * align.el:
Lute Kamstra <lute@gnu.org>
parents: 98826
diff changeset
671 "Symbol face used to visualize 8 or more SPACEs after TAB.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
672
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
673 Used when `whitespace-style' includes the value `space-after-tab'."
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
674 :type 'face
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
675 :group 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
676
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
677
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
678 (defface whitespace-space-after-tab
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
679 '((((class mono)) (:inverse-video t :bold t :underline t))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
680 (t (:background "yellow" :foreground "firebrick")))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
681 "Face used to visualize 8 or more SPACEs after TAB."
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
682 :group 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
683
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
684
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
685 (defcustom whitespace-hspace-regexp
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
686 "\\(\\(\xA0\\|\x8A0\\|\x920\\|\xE20\\|\xF20\\)+\\)"
100171
d42aff5ca541 * align.el:
Lute Kamstra <lute@gnu.org>
parents: 98826
diff changeset
687 "Specify HARD SPACE characters regexp.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
688
88118
959dc75df82e (whitespace): Set :version tag to 23.1.
Juanma Barranquero <lekktu@gmail.com>
parents: 88115
diff changeset
689 If you're using `mule' package, there may be other characters besides:
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
690
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
691 \"\\xA0\" \"\\x8A0\" \"\\x920\" \"\\xE20\" \"\\xF20\"
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
692
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
693 that should be considered HARD SPACE.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
694
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
695 Here are some examples:
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
696
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
697 \"\\\\(^\\xA0+\\\\)\" \
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
698 visualize only leading HARD SPACEs.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
699 \"\\\\(\\xA0+$\\\\)\" \
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
700 visualize only trailing HARD SPACEs.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
701 \"\\\\(^\\xA0+\\\\|\\xA0+$\\\\)\" \
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
702 visualize leading and/or trailing HARD SPACEs.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
703 \"\\t\\\\(\\xA0+\\\\)\\t\" \
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
704 visualize only HARD SPACEs between TABs.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
705
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
706 NOTE: Enclose always by \\\\( and \\\\) the elements to highlight.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
707 Use exactly one pair of enclosing \\\\( and \\\\).
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
708
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
709 Used when `whitespace-style' includes `spaces'."
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
710 :type '(regexp :tag "HARD SPACE Chars")
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
711 :group 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
712
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
713
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
714 (defcustom whitespace-space-regexp "\\( +\\)"
100171
d42aff5ca541 * align.el:
Lute Kamstra <lute@gnu.org>
parents: 98826
diff changeset
715 "Specify SPACE characters regexp.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
716
88118
959dc75df82e (whitespace): Set :version tag to 23.1.
Juanma Barranquero <lekktu@gmail.com>
parents: 88115
diff changeset
717 If you're using `mule' package, there may be other characters
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
718 besides \" \" that should be considered SPACE.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
719
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
720 Here are some examples:
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
721
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
722 \"\\\\(^ +\\\\)\" visualize only leading SPACEs.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
723 \"\\\\( +$\\\\)\" visualize only trailing SPACEs.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
724 \"\\\\(^ +\\\\| +$\\\\)\" \
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
725 visualize leading and/or trailing SPACEs.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
726 \"\\t\\\\( +\\\\)\\t\" visualize only SPACEs between TABs.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
727
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
728 NOTE: Enclose always by \\\\( and \\\\) the elements to highlight.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
729 Use exactly one pair of enclosing \\\\( and \\\\).
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
730
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
731 Used when `whitespace-style' includes `spaces'."
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
732 :type '(regexp :tag "SPACE Chars")
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
733 :group 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
734
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
735
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
736 (defcustom whitespace-tab-regexp "\\(\t+\\)"
100171
d42aff5ca541 * align.el:
Lute Kamstra <lute@gnu.org>
parents: 98826
diff changeset
737 "Specify TAB characters regexp.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
738
88118
959dc75df82e (whitespace): Set :version tag to 23.1.
Juanma Barranquero <lekktu@gmail.com>
parents: 88115
diff changeset
739 If you're using `mule' package, there may be other characters
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
740 besides \"\\t\" that should be considered TAB.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
741
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
742 Here are some examples:
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
743
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
744 \"\\\\(^\\t+\\\\)\" visualize only leading TABs.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
745 \"\\\\(\\t+$\\\\)\" visualize only trailing TABs.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
746 \"\\\\(^\\t+\\\\|\\t+$\\\\)\" \
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
747 visualize leading and/or trailing TABs.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
748 \" \\\\(\\t+\\\\) \" visualize only TABs between SPACEs.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
749
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
750 NOTE: Enclose always by \\\\( and \\\\) the elements to highlight.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
751 Use exactly one pair of enclosing \\\\( and \\\\).
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
752
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
753 Used when `whitespace-style' includes `tabs'."
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
754 :type '(regexp :tag "TAB Chars")
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
755 :group 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
756
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
757
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
758 (defcustom whitespace-trailing-regexp
94400
049f194820fe whitespace-trailing-regexp option fix.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94374
diff changeset
759 "\\(\\(\t\\| \\|\xA0\\|\x8A0\\|\x920\\|\xE20\\|\xF20\\)+\\)$"
100171
d42aff5ca541 * align.el:
Lute Kamstra <lute@gnu.org>
parents: 98826
diff changeset
760 "Specify trailing characters regexp.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
761
88118
959dc75df82e (whitespace): Set :version tag to 23.1.
Juanma Barranquero <lekktu@gmail.com>
parents: 88115
diff changeset
762 If you're using `mule' package, there may be other characters besides:
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
763
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
764 \" \" \"\\t\" \"\\xA0\" \"\\x8A0\" \"\\x920\" \"\\xE20\" \
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
765 \"\\xF20\"
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
766
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
767 that should be considered blank.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
768
94440
e227f5ee58db whitespace-trailing-regexp docstring fix.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94431
diff changeset
769 NOTE: Enclose always by \"\\\\(\" and \"\\\\)$\" the elements to highlight.
94400
049f194820fe whitespace-trailing-regexp option fix.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94374
diff changeset
770 Use exactly one pair of enclosing elements above.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
771
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
772 Used when `whitespace-style' includes `trailing'."
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
773 :type '(regexp :tag "Trailing Chars")
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
774 :group 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
775
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
776
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
777 (defcustom whitespace-space-before-tab-regexp "\\( +\\)\\(\t+\\)"
100171
d42aff5ca541 * align.el:
Lute Kamstra <lute@gnu.org>
parents: 98826
diff changeset
778 "Specify SPACEs before TAB regexp.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
779
88118
959dc75df82e (whitespace): Set :version tag to 23.1.
Juanma Barranquero <lekktu@gmail.com>
parents: 88115
diff changeset
780 If you're using `mule' package, there may be other characters besides:
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
781
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
782 \" \" \"\\t\" \"\\xA0\" \"\\x8A0\" \"\\x920\" \"\\xE20\" \
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
783 \"\\xF20\"
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
784
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
785 that should be considered blank.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
786
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
787 Used when `whitespace-style' includes `space-before-tab',
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
788 `space-before-tab::tab' or `space-before-tab::space'."
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
789 :type '(regexp :tag "SPACEs Before TAB")
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
790 :group 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
791
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
792
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
793 (defcustom whitespace-indentation-regexp
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
794 '("^\t*\\(\\( \\{%d\\}\\)+\\)[^\n\t]"
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
795 . "^ *\\(\t+\\)[^\n]")
100171
d42aff5ca541 * align.el:
Lute Kamstra <lute@gnu.org>
parents: 98826
diff changeset
796 "Specify regexp for 8 or more SPACEs at beginning of line.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
797
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
798 It is a cons where the cons car is used for SPACEs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
799 and the cons cdr is used for TABs visualization.
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
800
88118
959dc75df82e (whitespace): Set :version tag to 23.1.
Juanma Barranquero <lekktu@gmail.com>
parents: 88115
diff changeset
801 If you're using `mule' package, there may be other characters besides:
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
802
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
803 \" \" \"\\t\" \"\\xA0\" \"\\x8A0\" \"\\x920\" \"\\xE20\" \
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
804 \"\\xF20\"
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
805
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
806 that should be considered blank.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
807
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
808 Used when `whitespace-style' includes `indentation',
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
809 `indentation::tab' or `indentation::space'."
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
810 :type '(cons (regexp :tag "Indentation SPACEs")
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
811 (regexp :tag "Indentation TABs"))
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
812 :group 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
813
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
814
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
815 (defcustom whitespace-empty-at-bob-regexp "\\`\\(\\([ \t]*\n\\)+\\)"
100171
d42aff5ca541 * align.el:
Lute Kamstra <lute@gnu.org>
parents: 98826
diff changeset
816 "Specify regexp for empty lines at beginning of buffer.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
817
88118
959dc75df82e (whitespace): Set :version tag to 23.1.
Juanma Barranquero <lekktu@gmail.com>
parents: 88115
diff changeset
818 If you're using `mule' package, there may be other characters besides:
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
819
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
820 \" \" \"\\t\" \"\\xA0\" \"\\x8A0\" \"\\x920\" \"\\xE20\" \
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
821 \"\\xF20\"
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
822
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
823 that should be considered blank.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
824
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
825 Used when `whitespace-style' includes `empty'."
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
826 :type '(regexp :tag "Empty Lines At Beginning Of Buffer")
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
827 :group 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
828
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
829
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
830 (defcustom whitespace-empty-at-eob-regexp "^\\([ \t\n]+\\)\\'"
100171
d42aff5ca541 * align.el:
Lute Kamstra <lute@gnu.org>
parents: 98826
diff changeset
831 "Specify regexp for empty lines at end of buffer.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
832
88118
959dc75df82e (whitespace): Set :version tag to 23.1.
Juanma Barranquero <lekktu@gmail.com>
parents: 88115
diff changeset
833 If you're using `mule' package, there may be other characters besides:
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
834
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
835 \" \" \"\\t\" \"\\xA0\" \"\\x8A0\" \"\\x920\" \"\\xE20\" \
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
836 \"\\xF20\"
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
837
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
838 that should be considered blank.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
839
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
840 Used when `whitespace-style' includes `empty'."
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
841 :type '(regexp :tag "Empty Lines At End Of Buffer")
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
842 :group 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
843
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
844
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
845 (defcustom whitespace-space-after-tab-regexp
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
846 '("\t+\\(\\( \\{%d\\}\\)+\\)"
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
847 . "\\(\t+\\) +")
100171
d42aff5ca541 * align.el:
Lute Kamstra <lute@gnu.org>
parents: 98826
diff changeset
848 "Specify regexp for 8 or more SPACEs after TAB.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
849
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
850 It is a cons where the cons car is used for SPACEs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
851 and the cons cdr is used for TABs visualization.
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
852
88118
959dc75df82e (whitespace): Set :version tag to 23.1.
Juanma Barranquero <lekktu@gmail.com>
parents: 88115
diff changeset
853 If you're using `mule' package, there may be other characters besides:
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
854
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
855 \" \" \"\\t\" \"\\xA0\" \"\\x8A0\" \"\\x920\" \"\\xE20\" \
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
856 \"\\xF20\"
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
857
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
858 that should be considered blank.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
859
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
860 Used when `whitespace-style' includes `space-after-tab',
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
861 `space-after-tab::tab' or `space-after-tab::space'."
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
862 :type '(regexp :tag "SPACEs After TAB")
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
863 :group 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
864
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
865
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
866 (defcustom whitespace-line-column 80
100171
d42aff5ca541 * align.el:
Lute Kamstra <lute@gnu.org>
parents: 98826
diff changeset
867 "Specify column beyond which the line is highlighted.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
868
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
869 Used when `whitespace-style' includes `lines' or `lines-tail'."
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
870 :type '(integer :tag "Line Length")
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
871 :group 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
872
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
873
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
874 ;; Hacked from `visible-whitespace-mappings' in visws.el
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
875 (defcustom whitespace-display-mappings
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
876 '(
105190
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
877 (space-mark ?\ [?\u00B7] [?.]) ; space - centered dot
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
878 (space-mark ?\xA0 [?\u00A4] [?_]) ; hard space - currency
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
879 (space-mark ?\x8A0 [?\x8A4] [?_]) ; hard space - currency
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
880 (space-mark ?\x920 [?\x924] [?_]) ; hard space - currency
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
881 (space-mark ?\xE20 [?\xE24] [?_]) ; hard space - currency
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
882 (space-mark ?\xF20 [?\xF24] [?_]) ; hard space - currency
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
883 ;; NEWLINE is displayed using the face `whitespace-newline'
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
884 (newline-mark ?\n [?$ ?\n]) ; eol - dollar sign
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
885 ;; (newline-mark ?\n [?\u21B5 ?\n] [?$ ?\n]) ; eol - downwards arrow
105190
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
886 ;; (newline-mark ?\n [?\u00B6 ?\n] [?$ ?\n]) ; eol - pilcrow
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
887 ;; (newline-mark ?\n [?\x8AF ?\n] [?$ ?\n]) ; eol - overscore
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
888 ;; (newline-mark ?\n [?\x8AC ?\n] [?$ ?\n]) ; eol - negation
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
889 ;; (newline-mark ?\n [?\x8B0 ?\n] [?$ ?\n]) ; eol - grade
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
890 ;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
891 ;; WARNING: the mapping below has a problem.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
892 ;; When a TAB occupies exactly one column, it will display the
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
893 ;; character ?\xBB at that column followed by a TAB which goes to
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
894 ;; the next TAB column.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
895 ;; If this is a problem for you, please, comment the line below.
105190
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
896 (tab-mark ?\t [?\u00BB ?\t] [?\\ ?\t]) ; tab - left quote mark
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
897 )
100171
d42aff5ca541 * align.el:
Lute Kamstra <lute@gnu.org>
parents: 98826
diff changeset
898 "Specify an alist of mappings for displaying characters.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
899
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
900 Each element has the following form:
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
901
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
902 (KIND CHAR VECTOR...)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
903
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
904 Where:
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
905
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
906 KIND is the kind of character.
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
907 It can be one of the following symbols:
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
908
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
909 tab-mark for TAB character
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
910
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
911 space-mark for SPACE or HARD SPACE character
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
912
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
913 newline-mark for NEWLINE character
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
914
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
915 CHAR is the character to be mapped.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
916
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
917 VECTOR is a vector of characters to be displayed in place of CHAR.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
918 The first display vector that can be displayed is used;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
919 if no display vector for a mapping can be displayed, then
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
920 that character is displayed unmodified.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
921
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
922 The NEWLINE character is displayed using the face given by
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
923 `whitespace-newline' variable.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
924
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
925 Used when `whitespace-style' includes `tab-mark', `space-mark' or
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
926 `newline-mark'."
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
927 :type '(repeat
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
928 (list :tag "Character Mapping"
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
929 (choice :tag "Char Kind"
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
930 (const :tag "Tab" tab-mark)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
931 (const :tag "Space" space-mark)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
932 (const :tag "Newline" newline-mark))
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
933 (character :tag "Char")
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
934 (repeat :inline t :tag "Vector List"
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
935 (vector :tag ""
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
936 (repeat :inline t
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
937 :tag "Vector Characters"
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
938 (character :tag "Char"))))))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
939 :group 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
940
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
941
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
942 (defcustom whitespace-global-modes t
100171
d42aff5ca541 * align.el:
Lute Kamstra <lute@gnu.org>
parents: 98826
diff changeset
943 "Modes for which global `whitespace-mode' is automagically turned on.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
944
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
945 Global `whitespace-mode' is controlled by the command
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
946 `global-whitespace-mode'.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
947
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
948 If nil, means no modes have `whitespace-mode' automatically
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
949 turned on.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
950
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
951 If t, all modes that support `whitespace-mode' have it
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
952 automatically turned on.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
953
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
954 Else it should be a list of `major-mode' symbol names for which
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
955 `whitespace-mode' should be automatically turned on. The sense
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
956 of the list is negated if it begins with `not'. For example:
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
957
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
958 (c-mode c++-mode)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
959
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
960 means that `whitespace-mode' is turned on for buffers in C and
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
961 C++ modes only."
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
962 :type '(choice :tag "Global Modes"
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
963 (const :tag "None" nil)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
964 (const :tag "All" t)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
965 (set :menu-tag "Mode Specific" :tag "Modes"
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
966 :value (not)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
967 (const :tag "Except" not)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
968 (repeat :inline t
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
969 (symbol :tag "Mode"))))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
970 :group 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
971
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
972
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
973 (defcustom whitespace-action nil
100171
d42aff5ca541 * align.el:
Lute Kamstra <lute@gnu.org>
parents: 98826
diff changeset
974 "Specify which action is taken when a buffer is visited or written.
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
975
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
976 It's a list containing some or all of the following values:
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
977
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
978 nil no action is taken.
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
979
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
980 cleanup cleanup any bogus whitespace always when local
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
981 whitespace is turned on.
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
982 See `whitespace-cleanup' and
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
983 `whitespace-cleanup-region'.
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
984
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
985 report-on-bogus report if there is any bogus whitespace always
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
986 when local whitespace is turned on.
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
987
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
988 auto-cleanup cleanup any bogus whitespace when buffer is
98454
431a14612b87 Eliminate whitespace-kill-buffer-hook functionality.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 98009
diff changeset
989 written.
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
990 See `whitespace-cleanup' and
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
991 `whitespace-cleanup-region'.
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
992
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
993 abort-on-bogus abort if there is any bogus whitespace and the
98454
431a14612b87 Eliminate whitespace-kill-buffer-hook functionality.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 98009
diff changeset
994 buffer is written.
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
995
98454
431a14612b87 Eliminate whitespace-kill-buffer-hook functionality.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 98009
diff changeset
996 warn-if-read-only give a warning if `cleanup' or `auto-cleanup'
98008
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
997 is included in `whitespace-action' and the
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
998 buffer is read-only.
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
999
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1000 Any other value is treated as nil."
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1001 :type '(choice :tag "Actions"
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1002 (const :tag "None" nil)
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1003 (repeat :tag "Action List"
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1004 (choice :tag "Action"
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1005 (const :tag "Cleanup When On" cleanup)
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1006 (const :tag "Report On Bogus" report-on-bogus)
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1007 (const :tag "Auto Cleanup" auto-cleanup)
98008
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1008 (const :tag "Abort On Bogus" abort-on-bogus)
98454
431a14612b87 Eliminate whitespace-kill-buffer-hook functionality.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 98009
diff changeset
1009 (const :tag "Warn If Read-Only" warn-if-read-only))))
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1010 :group 'whitespace)
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1011
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1012
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1013 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1014 ;;;; User commands - Local mode
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1015
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1016
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1017 ;;;###autoload
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1018 (define-minor-mode whitespace-mode
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1019 "Toggle whitespace minor mode visualization (\"ws\" on modeline).
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1020
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1021 If ARG is null, toggle whitespace visualization.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1022 If ARG is a number greater than zero, turn on visualization;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1023 otherwise, turn off visualization.
97311
2be7f5365285 Improve docstring.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97074
diff changeset
1024
2be7f5365285 Improve docstring.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97074
diff changeset
1025 See also `whitespace-style', `whitespace-newline' and
2be7f5365285 Improve docstring.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97074
diff changeset
1026 `whitespace-display-mappings'."
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1027 :lighter " ws"
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1028 :init-value nil
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1029 :global nil
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1030 :group 'whitespace
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1031 (cond
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1032 (noninteractive ; running a batch job
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1033 (setq whitespace-mode nil))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1034 (whitespace-mode ; whitespace-mode on
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1035 (whitespace-turn-on)
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1036 (whitespace-action-when-on))
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1037 (t ; whitespace-mode off
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1038 (whitespace-turn-off))))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1039
96968
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
1040
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
1041 ;;;###autoload
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
1042 (define-minor-mode whitespace-newline-mode
97311
2be7f5365285 Improve docstring.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97074
diff changeset
1043 "Toggle NEWLINE minor mode visualization (\"nl\" on modeline).
96968
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
1044
97311
2be7f5365285 Improve docstring.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97074
diff changeset
1045 If ARG is null, toggle NEWLINE visualization.
96968
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
1046 If ARG is a number greater than zero, turn on visualization;
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
1047 otherwise, turn off visualization.
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
1048
97311
2be7f5365285 Improve docstring.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97074
diff changeset
1049 Use `whitespace-newline-mode' only for NEWLINE visualization
2be7f5365285 Improve docstring.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97074
diff changeset
1050 exclusively. For other visualizations, including NEWLINE
2be7f5365285 Improve docstring.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97074
diff changeset
1051 visualization together with (HARD) SPACEs and/or TABs, please,
2be7f5365285 Improve docstring.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97074
diff changeset
1052 use `whitespace-mode'.
2be7f5365285 Improve docstring.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97074
diff changeset
1053
2be7f5365285 Improve docstring.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97074
diff changeset
1054 See also `whitespace-newline' and `whitespace-display-mappings'."
96968
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
1055 :lighter " nl"
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
1056 :init-value nil
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
1057 :global nil
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
1058 :group 'whitespace
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
1059 (let ((whitespace-style '(newline-mark newline)))
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
1060 (whitespace-mode whitespace-newline-mode)
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
1061 ;; sync states (running a batch job)
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
1062 (setq whitespace-newline-mode whitespace-mode)))
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
1063
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1064
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1065 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1066 ;;;; User commands - Global mode
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1067
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1068
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1069 ;;;###autoload
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1070 (define-minor-mode global-whitespace-mode
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1071 "Toggle whitespace global minor mode visualization (\"WS\" on modeline).
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1072
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1073 If ARG is null, toggle whitespace visualization.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1074 If ARG is a number greater than zero, turn on visualization;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1075 otherwise, turn off visualization.
97311
2be7f5365285 Improve docstring.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97074
diff changeset
1076
2be7f5365285 Improve docstring.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97074
diff changeset
1077 See also `whitespace-style', `whitespace-newline' and
2be7f5365285 Improve docstring.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97074
diff changeset
1078 `whitespace-display-mappings'."
88113
c80332ad12c1 (global-whitespace-mode): Fix modeline lighter.
Juanma Barranquero <lekktu@gmail.com>
parents: 88100
diff changeset
1079 :lighter " WS"
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1080 :init-value nil
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1081 :global t
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1082 :group 'whitespace
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1083 (cond
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1084 (noninteractive ; running a batch job
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1085 (setq global-whitespace-mode nil))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1086 (global-whitespace-mode ; global-whitespace-mode on
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1087 (save-excursion
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1088 (add-hook 'find-file-hook 'whitespace-turn-on-if-enabled)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1089 (dolist (buffer (buffer-list)) ; adjust all local mode
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1090 (set-buffer buffer)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1091 (unless whitespace-mode
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1092 (whitespace-turn-on-if-enabled)))))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1093 (t ; global-whitespace-mode off
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1094 (save-excursion
91377
510381911395 Use find-file-hook instead of find-file-hooks.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 88118
diff changeset
1095 (remove-hook 'find-file-hook 'whitespace-turn-on-if-enabled)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1096 (dolist (buffer (buffer-list)) ; adjust all local mode
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1097 (set-buffer buffer)
91471
13eacee3408e (global-whitespace-mode): Revert last change.
Juanma Barranquero <lekktu@gmail.com>
parents: 91432
diff changeset
1098 (unless whitespace-mode
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1099 (whitespace-turn-off)))))))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1100
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1101
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1102 (defun whitespace-turn-on-if-enabled ()
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1103 (when (cond
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1104 ((eq whitespace-global-modes t))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1105 ((listp whitespace-global-modes)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1106 (if (eq (car-safe whitespace-global-modes) 'not)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1107 (not (memq major-mode (cdr whitespace-global-modes)))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1108 (memq major-mode whitespace-global-modes)))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1109 (t nil))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1110 (let (inhibit-quit)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1111 ;; Don't turn on whitespace mode if...
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1112 (or
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1113 ;; ...we don't have a display (we're running a batch job)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1114 noninteractive
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1115 ;; ...or if the buffer is invisible (name starts with a space)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1116 (eq (aref (buffer-name) 0) ?\ )
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1117 ;; ...or if the buffer is temporary (name starts with *)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1118 (and (eq (aref (buffer-name) 0) ?*)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1119 ;; except the scratch buffer.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1120 (not (string= (buffer-name) "*scratch*")))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1121 ;; Otherwise, turn on whitespace mode.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1122 (whitespace-turn-on)))))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1123
96968
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
1124
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
1125 ;;;###autoload
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
1126 (define-minor-mode global-whitespace-newline-mode
97311
2be7f5365285 Improve docstring.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97074
diff changeset
1127 "Toggle NEWLINE global minor mode visualization (\"NL\" on modeline).
96968
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
1128
97311
2be7f5365285 Improve docstring.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97074
diff changeset
1129 If ARG is null, toggle NEWLINE visualization.
96968
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
1130 If ARG is a number greater than zero, turn on visualization;
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
1131 otherwise, turn off visualization.
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
1132
97311
2be7f5365285 Improve docstring.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97074
diff changeset
1133 Use `global-whitespace-newline-mode' only for NEWLINE
2be7f5365285 Improve docstring.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97074
diff changeset
1134 visualization exclusively. For other visualizations, including
2be7f5365285 Improve docstring.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97074
diff changeset
1135 NEWLINE visualization together with (HARD) SPACEs and/or TABs,
106895
181539c8b6a4 Fix typos in docstrings, error messages, etc.
Juanma Barranquero <lekktu@gmail.com>
parents: 106815
diff changeset
1136 please use `global-whitespace-mode'.
97311
2be7f5365285 Improve docstring.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97074
diff changeset
1137
2be7f5365285 Improve docstring.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97074
diff changeset
1138 See also `whitespace-newline' and `whitespace-display-mappings'."
96968
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
1139 :lighter " NL"
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
1140 :init-value nil
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
1141 :global t
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
1142 :group 'whitespace
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
1143 (let ((whitespace-style '(newline-mark newline)))
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
1144 (global-whitespace-mode global-whitespace-newline-mode)
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
1145 ;; sync states (running a batch job)
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
1146 (setq global-whitespace-newline-mode global-whitespace-mode)))
df4f1b00491d New newline minor mode visualization.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94678
diff changeset
1147
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1148
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1149 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1150 ;;;; User commands - Toggle
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1151
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1152
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1153 (defconst whitespace-style-value-list
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1154 '(tabs
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1155 spaces
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1156 trailing
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1157 lines
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1158 lines-tail
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1159 newline
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1160 empty
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1161 indentation
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1162 indentation::tab
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1163 indentation::space
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1164 space-after-tab
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1165 space-after-tab::tab
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1166 space-after-tab::space
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1167 space-before-tab
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1168 space-before-tab::tab
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1169 space-before-tab::space
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1170 help-newline ; value used by `whitespace-insert-option-mark'
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1171 tab-mark
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1172 space-mark
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1173 newline-mark
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1174 )
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1175 "List of valid `whitespace-style' values.")
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1176
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1177
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1178 (defconst whitespace-toggle-option-alist
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1179 '((?t . tabs)
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1180 (?s . spaces)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1181 (?r . trailing)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1182 (?l . lines)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1183 (?L . lines-tail)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1184 (?n . newline)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1185 (?e . empty)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1186 (?\C-i . indentation)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1187 (?I . indentation::tab)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1188 (?i . indentation::space)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1189 (?\C-a . space-after-tab)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1190 (?A . space-after-tab::tab)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1191 (?a . space-after-tab::space)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1192 (?\C-b . space-before-tab)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1193 (?B . space-before-tab::tab)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1194 (?b . space-before-tab::space)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1195 (?T . tab-mark)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1196 (?S . space-mark)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1197 (?N . newline-mark)
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1198 (?x . whitespace-style)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1199 )
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1200 "Alist of toggle options.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1201
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1202 Each element has the form:
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1203
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1204 (CHAR . SYMBOL)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1205
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1206 Where:
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1207
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1208 CHAR is a char which the user will have to type.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1209
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1210 SYMBOL is a valid symbol associated with CHAR.
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1211 See `whitespace-style-value-list'.")
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1212
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1213
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1214 (defvar whitespace-active-style nil
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1215 "Used to save locally `whitespace-style' value.")
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1216
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1217 (defvar whitespace-indent-tabs-mode indent-tabs-mode
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1218 "Used to save locally `indent-tabs-mode' value.")
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1219
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1220 (defvar whitespace-tab-width tab-width
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1221 "Used to save locally `tab-width' value.")
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1222
105190
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
1223 (defvar whitespace-point (point)
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
1224 "Used to save locally current point value.
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
1225 Used by `whitespace-trailing-regexp' function (which see).")
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
1226
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
1227 (defvar whitespace-font-lock-refontify nil
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
1228 "Used to save locally the font-lock refontify state.
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
1229 Used by `whitespace-post-command-hook' function (which see).")
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
1230
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1231
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1232 ;;;###autoload
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1233 (defun whitespace-toggle-options (arg)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1234 "Toggle local `whitespace-mode' options.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1235
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1236 If local whitespace-mode is off, toggle the option given by ARG
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1237 and turn on local whitespace-mode.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1238
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1239 If local whitespace-mode is on, toggle the option given by ARG
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1240 and restart local whitespace-mode.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1241
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1242 Interactively, it reads one of the following chars:
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1243
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1244 CHAR MEANING
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1245 (VIA FACES)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1246 t toggle TAB visualization
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1247 s toggle SPACE and HARD SPACE visualization
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1248 r toggle trailing blanks visualization
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1249 l toggle \"long lines\" visualization
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1250 L toggle \"long lines\" tail visualization
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1251 n toggle NEWLINE visualization
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1252 e toggle empty line at bob and/or eob visualization
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1253 C-i toggle indentation SPACEs visualization (via `indent-tabs-mode')
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1254 I toggle indentation SPACEs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1255 i toggle indentation TABs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1256 C-a toggle SPACEs after TAB visualization (via `indent-tabs-mode')
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1257 A toggle SPACEs after TAB: SPACEs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1258 a toggle SPACEs after TAB: TABs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1259 C-b toggle SPACEs before TAB visualization (via `indent-tabs-mode')
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1260 B toggle SPACEs before TAB: SPACEs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1261 b toggle SPACEs before TAB: TABs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1262
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1263 (VIA DISPLAY TABLE)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1264 T toggle TAB visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1265 S toggle SPACEs before TAB visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1266 N toggle NEWLINE visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1267
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1268 x restore `whitespace-style' value
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1269 ? display brief help
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1270
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1271 Non-interactively, ARG should be a symbol or a list of symbols.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1272 The valid symbols are:
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1273
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1274 tabs toggle TAB visualization
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1275 spaces toggle SPACE and HARD SPACE visualization
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1276 trailing toggle trailing blanks visualization
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1277 lines toggle \"long lines\" visualization
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1278 lines-tail toggle \"long lines\" tail visualization
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1279 newline toggle NEWLINE visualization
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1280 empty toggle empty line at bob and/or eob visualization
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1281 indentation toggle indentation SPACEs visualization
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1282 indentation::tab toggle indentation SPACEs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1283 indentation::space toggle indentation TABs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1284 space-after-tab toggle SPACEs after TAB visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1285 space-after-tab::tab toggle SPACEs after TAB: SPACEs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1286 space-after-tab::space toggle SPACEs after TAB: TABs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1287 space-before-tab toggle SPACEs before TAB visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1288 space-before-tab::tab toggle SPACEs before TAB: SPACEs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1289 space-before-tab::space toggle SPACEs before TAB: TABs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1290
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1291 tab-mark toggle TAB visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1292 space-mark toggle SPACEs before TAB visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1293 newline-mark toggle NEWLINE visualization
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1294
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1295 whitespace-style restore `whitespace-style' value
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1296
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1297 See `whitespace-style' and `indent-tabs-mode' for documentation."
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1298 (interactive (whitespace-interactive-char t))
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1299 (let ((whitespace-style
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1300 (whitespace-toggle-list t arg whitespace-active-style)))
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1301 (whitespace-mode 0)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1302 (whitespace-mode 1)))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1303
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1304
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1305 (defvar whitespace-toggle-style nil
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1306 "Used to toggle the global `whitespace-style' value.")
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1307
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1308
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1309 ;;;###autoload
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1310 (defun global-whitespace-toggle-options (arg)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1311 "Toggle global `whitespace-mode' options.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1312
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1313 If global whitespace-mode is off, toggle the option given by ARG
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1314 and turn on global whitespace-mode.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1315
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1316 If global whitespace-mode is on, toggle the option given by ARG
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1317 and restart global whitespace-mode.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1318
88118
959dc75df82e (whitespace): Set :version tag to 23.1.
Juanma Barranquero <lekktu@gmail.com>
parents: 88115
diff changeset
1319 Interactively, it accepts one of the following chars:
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1320
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1321 CHAR MEANING
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1322 (VIA FACES)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1323 t toggle TAB visualization
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1324 s toggle SPACE and HARD SPACE visualization
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1325 r toggle trailing blanks visualization
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1326 l toggle \"long lines\" visualization
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1327 L toggle \"long lines\" tail visualization
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1328 n toggle NEWLINE visualization
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1329 e toggle empty line at bob and/or eob visualization
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1330 C-i toggle indentation SPACEs visualization (via `indent-tabs-mode')
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1331 I toggle indentation SPACEs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1332 i toggle indentation TABs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1333 C-a toggle SPACEs after TAB visualization (via `indent-tabs-mode')
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1334 A toggle SPACEs after TAB: SPACEs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1335 a toggle SPACEs after TAB: TABs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1336 C-b toggle SPACEs before TAB visualization (via `indent-tabs-mode')
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1337 B toggle SPACEs before TAB: SPACEs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1338 b toggle SPACEs before TAB: TABs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1339
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1340 (VIA DISPLAY TABLE)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1341 T toggle TAB visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1342 S toggle SPACEs before TAB visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1343 N toggle NEWLINE visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1344
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1345 x restore `whitespace-style' value
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1346 ? display brief help
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1347
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1348 Non-interactively, ARG should be a symbol or a list of symbols.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1349 The valid symbols are:
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1350
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1351 tabs toggle TAB visualization
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1352 spaces toggle SPACE and HARD SPACE visualization
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1353 trailing toggle trailing blanks visualization
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1354 lines toggle \"long lines\" visualization
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1355 lines-tail toggle \"long lines\" tail visualization
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1356 newline toggle NEWLINE visualization
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1357 empty toggle empty line at bob and/or eob visualization
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1358 indentation toggle indentation SPACEs visualization
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1359 indentation::tab toggle indentation SPACEs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1360 indentation::space toggle indentation TABs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1361 space-after-tab toggle SPACEs after TAB visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1362 space-after-tab::tab toggle SPACEs after TAB: SPACEs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1363 space-after-tab::space toggle SPACEs after TAB: TABs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1364 space-before-tab toggle SPACEs before TAB visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1365 space-before-tab::tab toggle SPACEs before TAB: SPACEs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1366 space-before-tab::space toggle SPACEs before TAB: TABs visualization
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1367
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1368 tab-mark toggle TAB visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1369 space-mark toggle SPACEs before TAB visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1370 newline-mark toggle NEWLINE visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1371
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1372 whitespace-style restore `whitespace-style' value
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1373
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1374 See `whitespace-style' and `indent-tabs-mode' for documentation."
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1375 (interactive (whitespace-interactive-char nil))
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1376 (let ((whitespace-style
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1377 (whitespace-toggle-list nil arg whitespace-toggle-style)))
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1378 (setq whitespace-toggle-style whitespace-style)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1379 (global-whitespace-mode 0)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1380 (global-whitespace-mode 1)))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1381
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1382
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1383 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1384 ;;;; User commands - Cleanup
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1385
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1386
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1387 ;;;###autoload
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1388 (defun whitespace-cleanup ()
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1389 "Cleanup some blank problems in all buffer or at region.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1390
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1391 It usually applies to the whole buffer, but in transient mark
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1392 mode when the mark is active, it applies to the region. It also
98826
6bec458afb55 Fix typo.
Chong Yidong <cyd@stupidchicken.com>
parents: 98454
diff changeset
1393 applies to the region when it is not in transient mark mode, the
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1394 mark is active and \\[universal-argument] was pressed just before
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1395 calling `whitespace-cleanup' interactively.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1396
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1397 See also `whitespace-cleanup-region'.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1398
88118
959dc75df82e (whitespace): Set :version tag to 23.1.
Juanma Barranquero <lekktu@gmail.com>
parents: 88115
diff changeset
1399 The problems cleaned up are:
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1400
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1401 1. empty lines at beginning of buffer.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1402 2. empty lines at end of buffer.
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1403 If `whitespace-style' includes the value `empty', remove all
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1404 empty lines at beginning and/or end of buffer.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1405
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1406 3. 8 or more SPACEs at beginning of line.
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1407 If `whitespace-style' includes the value `indentation':
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1408 replace 8 or more SPACEs at beginning of line by TABs, if
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1409 `indent-tabs-mode' is non-nil; otherwise, replace TABs by
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1410 SPACEs.
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1411 If `whitespace-style' includes the value `indentation::tab',
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1412 replace 8 or more SPACEs at beginning of line by TABs.
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1413 If `whitespace-style' includes the value `indentation::space',
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1414 replace TABs by SPACEs.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1415
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1416 4. SPACEs before TAB.
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1417 If `whitespace-style' includes the value `space-before-tab':
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1418 replace SPACEs by TABs, if `indent-tabs-mode' is non-nil;
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1419 otherwise, replace TABs by SPACEs.
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1420 If `whitespace-style' includes the value
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1421 `space-before-tab::tab', replace SPACEs by TABs.
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1422 If `whitespace-style' includes the value
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1423 `space-before-tab::space', replace TABs by SPACEs.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1424
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1425 5. SPACEs or TABs at end of line.
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1426 If `whitespace-style' includes the value `trailing', remove
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1427 all SPACEs or TABs at end of line.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1428
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1429 6. 8 or more SPACEs after TAB.
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1430 If `whitespace-style' includes the value `space-after-tab':
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1431 replace SPACEs by TABs, if `indent-tabs-mode' is non-nil;
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1432 otherwise, replace TABs by SPACEs.
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1433 If `whitespace-style' includes the value
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1434 `space-after-tab::tab', replace SPACEs by TABs.
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1435 If `whitespace-style' includes the value
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1436 `space-after-tab::space', replace TABs by SPACEs.
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1437
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1438 See `whitespace-style', `indent-tabs-mode' and `tab-width' for
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1439 documentation."
98008
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1440 (interactive "@")
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1441 (cond
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1442 ;; read-only buffer
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1443 (buffer-read-only
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1444 (whitespace-warn-read-only "cleanup"))
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1445 ;; region active
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1446 ((and (or transient-mark-mode
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1447 current-prefix-arg)
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1448 mark-active)
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1449 ;; PROBLEMs 1 and 2 are not handled in region
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1450 ;; PROBLEM 3: 8 or more SPACEs at bol
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1451 ;; PROBLEM 4: SPACEs before TAB
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1452 ;; PROBLEM 5: SPACEs or TABs at eol
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1453 ;; PROBLEM 6: 8 or more SPACEs after TAB
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1454 (whitespace-cleanup-region (region-beginning) (region-end)))
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1455 ;; whole buffer
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1456 (t
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1457 (save-excursion
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1458 (save-match-data
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1459 ;; PROBLEM 1: empty lines at bob
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1460 ;; PROBLEM 2: empty lines at eob
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1461 ;; ACTION: remove all empty lines at bob and/or eob
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1462 (when (memq 'empty whitespace-style)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1463 (let (overwrite-mode) ; enforce no overwrite
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1464 (goto-char (point-min))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1465 (when (re-search-forward
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1466 whitespace-empty-at-bob-regexp nil t)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1467 (delete-region (match-beginning 1) (match-end 1)))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1468 (when (re-search-forward
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1469 whitespace-empty-at-eob-regexp nil t)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1470 (delete-region (match-beginning 1) (match-end 1)))))))
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1471 ;; PROBLEM 3: 8 or more SPACEs at bol
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1472 ;; PROBLEM 4: SPACEs before TAB
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1473 ;; PROBLEM 5: SPACEs or TABs at eol
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1474 ;; PROBLEM 6: 8 or more SPACEs after TAB
98008
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1475 (whitespace-cleanup-region (point-min) (point-max)))))
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1476
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1477
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1478 ;;;###autoload
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1479 (defun whitespace-cleanup-region (start end)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1480 "Cleanup some blank problems at region.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1481
88118
959dc75df82e (whitespace): Set :version tag to 23.1.
Juanma Barranquero <lekktu@gmail.com>
parents: 88115
diff changeset
1482 The problems cleaned up are:
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1483
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1484 1. 8 or more SPACEs at beginning of line.
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1485 If `whitespace-style' includes the value `indentation':
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1486 replace 8 or more SPACEs at beginning of line by TABs, if
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1487 `indent-tabs-mode' is non-nil; otherwise, replace TABs by
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1488 SPACEs.
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1489 If `whitespace-style' includes the value `indentation::tab',
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1490 replace 8 or more SPACEs at beginning of line by TABs.
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1491 If `whitespace-style' includes the value `indentation::space',
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1492 replace TABs by SPACEs.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1493
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1494 2. SPACEs before TAB.
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1495 If `whitespace-style' includes the value `space-before-tab':
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1496 replace SPACEs by TABs, if `indent-tabs-mode' is non-nil;
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1497 otherwise, replace TABs by SPACEs.
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1498 If `whitespace-style' includes the value
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1499 `space-before-tab::tab', replace SPACEs by TABs.
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1500 If `whitespace-style' includes the value
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1501 `space-before-tab::space', replace TABs by SPACEs.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1502
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1503 3. SPACEs or TABs at end of line.
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1504 If `whitespace-style' includes the value `trailing', remove
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1505 all SPACEs or TABs at end of line.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1506
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1507 4. 8 or more SPACEs after TAB.
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1508 If `whitespace-style' includes the value `space-after-tab':
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1509 replace SPACEs by TABs, if `indent-tabs-mode' is non-nil;
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1510 otherwise, replace TABs by SPACEs.
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1511 If `whitespace-style' includes the value
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1512 `space-after-tab::tab', replace SPACEs by TABs.
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1513 If `whitespace-style' includes the value
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1514 `space-after-tab::space', replace TABs by SPACEs.
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1515
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1516 See `whitespace-style', `indent-tabs-mode' and `tab-width' for
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1517 documentation."
98008
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1518 (interactive "@r")
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1519 (if buffer-read-only
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1520 ;; read-only buffer
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1521 (whitespace-warn-read-only "cleanup region")
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1522 ;; non-read-only buffer
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1523 (let ((rstart (min start end))
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1524 (rend (copy-marker (max start end)))
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1525 (indent-tabs-mode whitespace-indent-tabs-mode)
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1526 (tab-width whitespace-tab-width)
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1527 overwrite-mode ; enforce no overwrite
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1528 tmp)
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1529 (save-excursion
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1530 (save-match-data
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1531 ;; PROBLEM 1: 8 or more SPACEs at bol
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1532 (cond
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1533 ;; ACTION: replace 8 or more SPACEs at bol by TABs, if
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1534 ;; `indent-tabs-mode' is non-nil; otherwise, replace TABs
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1535 ;; by SPACEs.
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1536 ((memq 'indentation whitespace-style)
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1537 (let ((regexp (whitespace-indentation-regexp)))
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1538 (goto-char rstart)
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1539 (while (re-search-forward regexp rend t)
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1540 (setq tmp (current-indentation))
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1541 (goto-char (match-beginning 0))
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1542 (delete-horizontal-space)
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1543 (unless (eolp)
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1544 (indent-to tmp)))))
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1545 ;; ACTION: replace 8 or more SPACEs at bol by TABs.
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1546 ((memq 'indentation::tab whitespace-style)
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1547 (whitespace-replace-action
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1548 'tabify rstart rend
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1549 (whitespace-indentation-regexp 'tab) 0))
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1550 ;; ACTION: replace TABs by SPACEs.
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1551 ((memq 'indentation::space whitespace-style)
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1552 (whitespace-replace-action
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1553 'untabify rstart rend
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1554 (whitespace-indentation-regexp 'space) 0)))
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1555 ;; PROBLEM 3: SPACEs or TABs at eol
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1556 ;; ACTION: remove all SPACEs or TABs at eol
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1557 (when (memq 'trailing whitespace-style)
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1558 (whitespace-replace-action
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1559 'delete-region rstart rend
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1560 whitespace-trailing-regexp 1))
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1561 ;; PROBLEM 4: 8 or more SPACEs after TAB
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1562 (cond
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1563 ;; ACTION: replace 8 or more SPACEs by TABs, if
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1564 ;; `indent-tabs-mode' is non-nil; otherwise, replace TABs
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1565 ;; by SPACEs.
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1566 ((memq 'space-after-tab whitespace-style)
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1567 (whitespace-replace-action
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1568 (if whitespace-indent-tabs-mode 'tabify 'untabify)
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1569 rstart rend (whitespace-space-after-tab-regexp) 1))
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1570 ;; ACTION: replace 8 or more SPACEs by TABs.
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1571 ((memq 'space-after-tab::tab whitespace-style)
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1572 (whitespace-replace-action
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1573 'tabify rstart rend
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1574 (whitespace-space-after-tab-regexp 'tab) 1))
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1575 ;; ACTION: replace TABs by SPACEs.
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1576 ((memq 'space-after-tab::space whitespace-style)
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1577 (whitespace-replace-action
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1578 'untabify rstart rend
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1579 (whitespace-space-after-tab-regexp 'space) 1)))
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1580 ;; PROBLEM 2: SPACEs before TAB
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1581 (cond
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1582 ;; ACTION: replace SPACEs before TAB by TABs, if
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1583 ;; `indent-tabs-mode' is non-nil; otherwise, replace TABs
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1584 ;; by SPACEs.
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1585 ((memq 'space-before-tab whitespace-style)
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1586 (whitespace-replace-action
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1587 (if whitespace-indent-tabs-mode 'tabify 'untabify)
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1588 rstart rend whitespace-space-before-tab-regexp
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1589 (if whitespace-indent-tabs-mode 1 2)))
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1590 ;; ACTION: replace SPACEs before TAB by TABs.
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1591 ((memq 'space-before-tab::tab whitespace-style)
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1592 (whitespace-replace-action
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1593 'tabify rstart rend
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1594 whitespace-space-before-tab-regexp 1))
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1595 ;; ACTION: replace TABs by SPACEs.
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1596 ((memq 'space-before-tab::space whitespace-style)
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1597 (whitespace-replace-action
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1598 'untabify rstart rend
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1599 whitespace-space-before-tab-regexp 2)))))
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
1600 (set-marker rend nil)))) ; point marker to nowhere
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1601
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1602
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1603 (defun whitespace-replace-action (action rstart rend regexp index)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1604 "Do ACTION in the string matched by REGEXP between RSTART and REND.
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1605
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1606 INDEX is the level group matched by REGEXP and used by ACTION.
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1607
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1608 See also `tab-width'."
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1609 (goto-char rstart)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1610 (while (re-search-forward regexp rend t)
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1611 (goto-char (match-end index))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1612 (funcall action (match-beginning index) (match-end index))))
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1613
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1614
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1615 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1616 ;;;; User command - report
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1617
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1618
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1619 (defun whitespace-regexp (regexp &optional kind)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1620 "Return REGEXP depending on `whitespace-indent-tabs-mode'."
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1621 (cond
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1622 ((or (eq kind 'tab)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1623 whitespace-indent-tabs-mode)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1624 (format (car regexp) whitespace-tab-width))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1625 ((or (eq kind 'space)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1626 (not whitespace-indent-tabs-mode))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1627 (cdr regexp))))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1628
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1629
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1630 (defun whitespace-indentation-regexp (&optional kind)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1631 "Return the indentation regexp depending on `whitespace-indent-tabs-mode'."
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1632 (whitespace-regexp whitespace-indentation-regexp kind))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1633
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1634
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1635 (defun whitespace-space-after-tab-regexp (&optional kind)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1636 "Return the space-after-tab regexp depending on `whitespace-indent-tabs-mode'."
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1637 (whitespace-regexp whitespace-space-after-tab-regexp kind))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1638
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1639
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1640 (defconst whitespace-report-list
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1641 (list
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1642 (cons 'empty whitespace-empty-at-bob-regexp)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1643 (cons 'empty whitespace-empty-at-eob-regexp)
94400
049f194820fe whitespace-trailing-regexp option fix.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94374
diff changeset
1644 (cons 'trailing whitespace-trailing-regexp)
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1645 (cons 'indentation nil)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1646 (cons 'indentation::tab nil)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1647 (cons 'indentation::space nil)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1648 (cons 'space-before-tab whitespace-space-before-tab-regexp)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1649 (cons 'space-before-tab::tab whitespace-space-before-tab-regexp)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1650 (cons 'space-before-tab::space whitespace-space-before-tab-regexp)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1651 (cons 'space-after-tab nil)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1652 (cons 'space-after-tab::tab nil)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1653 (cons 'space-after-tab::space nil)
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1654 )
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1655 "List of whitespace bogus symbol and corresponding regexp.")
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1656
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1657
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1658 (defconst whitespace-report-text
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1659 '( ;; `indent-tabs-mode' has non-nil value
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1660 "\
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1661 Whitespace Report
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1662
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1663 Current Setting Whitespace Problem
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1664
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1665 empty [] [] empty lines at beginning of buffer
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1666 empty [] [] empty lines at end of buffer
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1667 trailing [] [] SPACEs or TABs at end of line
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1668 indentation [] [] 8 or more SPACEs at beginning of line
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1669 indentation::tab [] [] 8 or more SPACEs at beginning of line
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1670 indentation::space [] [] TABs at beginning of line
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1671 space-before-tab [] [] SPACEs before TAB
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1672 space-before-tab::tab [] [] SPACEs before TAB: SPACEs
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1673 space-before-tab::space [] [] SPACEs before TAB: TABs
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1674 space-after-tab [] [] 8 or more SPACEs after TAB
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1675 space-after-tab::tab [] [] 8 or more SPACEs after TAB: SPACEs
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1676 space-after-tab::space [] [] 8 or more SPACEs after TAB: TABs
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1677
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1678 indent-tabs-mode =
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1679 tab-width = \n\n"
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1680 . ;; `indent-tabs-mode' has nil value
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1681 "\
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1682 Whitespace Report
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1683
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1684 Current Setting Whitespace Problem
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1685
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1686 empty [] [] empty lines at beginning of buffer
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1687 empty [] [] empty lines at end of buffer
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1688 trailing [] [] SPACEs or TABs at end of line
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1689 indentation [] [] TABs at beginning of line
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1690 indentation::tab [] [] 8 or more SPACEs at beginning of line
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1691 indentation::space [] [] TABs at beginning of line
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1692 space-before-tab [] [] SPACEs before TAB
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1693 space-before-tab::tab [] [] SPACEs before TAB: SPACEs
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1694 space-before-tab::space [] [] SPACEs before TAB: TABs
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1695 space-after-tab [] [] 8 or more SPACEs after TAB
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1696 space-after-tab::tab [] [] 8 or more SPACEs after TAB: SPACEs
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1697 space-after-tab::space [] [] 8 or more SPACEs after TAB: TABs
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1698
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1699 indent-tabs-mode =
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1700 tab-width = \n\n")
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1701 "Text for whitespace bogus report.
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1702
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1703 It is a cons of strings, where the car part is used when
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1704 `indent-tabs-mode' is non-nil, and the cdr part is used when
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1705 `indent-tabs-mode' is nil.")
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1706
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1707
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1708 (defconst whitespace-report-buffer-name "*Whitespace Report*"
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1709 "The buffer name for whitespace bogus report.")
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1710
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1711
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1712 ;;;###autoload
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1713 (defun whitespace-report (&optional force report-if-bogus)
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1714 "Report some whitespace problems in buffer.
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1715
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1716 Return nil if there is no whitespace problem; otherwise, return
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1717 non-nil.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1718
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1719 If FORCE is non-nil or \\[universal-argument] was pressed just
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1720 before calling `whitespace-report' interactively, it forces
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1721 `whitespace-style' to have:
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1722
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1723 empty
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1724 trailing
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1725 indentation
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1726 space-before-tab
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1727 space-after-tab
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1728
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1729 If REPORT-IF-BOGUS is non-nil, it reports only when there are any
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1730 whitespace problems in buffer.
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1731
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1732 Report if some of the following whitespace problems exist:
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1733
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1734 * If `indent-tabs-mode' is non-nil:
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1735 empty 1. empty lines at beginning of buffer.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1736 empty 2. empty lines at end of buffer.
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1737 trailing 3. SPACEs or TABs at end of line.
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1738 indentation 4. 8 or more SPACEs at beginning of line.
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1739 space-before-tab 5. SPACEs before TAB.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1740 space-after-tab 6. 8 or more SPACEs after TAB.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1741
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1742 * If `indent-tabs-mode' is nil:
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1743 empty 1. empty lines at beginning of buffer.
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1744 empty 2. empty lines at end of buffer.
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1745 trailing 3. SPACEs or TABs at end of line.
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1746 indentation 4. TABS at beginning of line.
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1747 space-before-tab 5. SPACEs before TAB.
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1748 space-after-tab 6. 8 or more SPACEs after TAB.
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1749
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1750 See `whitespace-style' for documentation.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1751 See also `whitespace-cleanup' and `whitespace-cleanup-region' for
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1752 cleaning up these problems."
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1753 (interactive (list current-prefix-arg))
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1754 (whitespace-report-region (point-min) (point-max)
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1755 force report-if-bogus))
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1756
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1757
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1758 ;;;###autoload
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1759 (defun whitespace-report-region (start end &optional force report-if-bogus)
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1760 "Report some whitespace problems in a region.
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1761
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1762 Return nil if there is no whitespace problem; otherwise, return
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1763 non-nil.
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1764
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1765 If FORCE is non-nil or \\[universal-argument] was pressed just
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1766 before calling `whitespace-report-region' interactively, it
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1767 forces `whitespace-style' to have:
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1768
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1769 empty
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1770 indentation
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1771 space-before-tab
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1772 trailing
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1773 space-after-tab
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1774
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1775 If REPORT-IF-BOGUS is non-nil, it reports only when there are any
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1776 whitespace problems in buffer.
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1777
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1778 Report if some of the following whitespace problems exist:
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1779
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1780 * If `indent-tabs-mode' is non-nil:
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1781 empty 1. empty lines at beginning of buffer.
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1782 empty 2. empty lines at end of buffer.
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1783 trailing 3. SPACEs or TABs at end of line.
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1784 indentation 4. 8 or more SPACEs at beginning of line.
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1785 space-before-tab 5. SPACEs before TAB.
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1786 space-after-tab 6. 8 or more SPACEs after TAB.
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1787
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1788 * If `indent-tabs-mode' is nil:
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1789 empty 1. empty lines at beginning of buffer.
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1790 empty 2. empty lines at end of buffer.
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1791 trailing 3. SPACEs or TABs at end of line.
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1792 indentation 4. TABS at beginning of line.
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1793 space-before-tab 5. SPACEs before TAB.
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1794 space-after-tab 6. 8 or more SPACEs after TAB.
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1795
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1796 See `whitespace-style' for documentation.
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1797 See also `whitespace-cleanup' and `whitespace-cleanup-region' for
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1798 cleaning up these problems."
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1799 (interactive "r")
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1800 (setq force (or current-prefix-arg force))
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1801 (save-excursion
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1802 (save-match-data
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1803 (let* ((has-bogus nil)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1804 (rstart (min start end))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1805 (rend (max start end))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1806 (bogus-list
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1807 (mapcar
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1808 #'(lambda (option)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1809 (when force
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1810 (add-to-list 'whitespace-style (car option)))
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1811 (goto-char rstart)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1812 (let ((regexp
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1813 (cond
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1814 ((eq (car option) 'indentation)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1815 (whitespace-indentation-regexp))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1816 ((eq (car option) 'indentation::tab)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1817 (whitespace-indentation-regexp 'tab))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1818 ((eq (car option) 'indentation::space)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1819 (whitespace-indentation-regexp 'space))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1820 ((eq (car option) 'space-after-tab)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1821 (whitespace-space-after-tab-regexp))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1822 ((eq (car option) 'space-after-tab::tab)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1823 (whitespace-space-after-tab-regexp 'tab))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1824 ((eq (car option) 'space-after-tab::space)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1825 (whitespace-space-after-tab-regexp 'space))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1826 (t
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1827 (cdr option)))))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1828 (and (re-search-forward regexp rend t)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1829 (setq has-bogus t))))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1830 whitespace-report-list)))
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1831 (when (if report-if-bogus has-bogus t)
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1832 (whitespace-kill-buffer whitespace-report-buffer-name)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1833 ;; `whitespace-indent-tabs-mode' is local to current buffer
94142
14cbf4c7b904 Handle whitespace-tab-width properly.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94112
diff changeset
1834 ;; `whitespace-tab-width' is local to current buffer
14cbf4c7b904 Handle whitespace-tab-width properly.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94112
diff changeset
1835 (let ((ws-indent-tabs-mode whitespace-indent-tabs-mode)
14cbf4c7b904 Handle whitespace-tab-width properly.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94112
diff changeset
1836 (ws-tab-width whitespace-tab-width))
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1837 (with-current-buffer (get-buffer-create
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1838 whitespace-report-buffer-name)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1839 (erase-buffer)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1840 (insert (if ws-indent-tabs-mode
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1841 (car whitespace-report-text)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1842 (cdr whitespace-report-text)))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1843 (goto-char (point-min))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1844 (forward-line 3)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1845 (dolist (option whitespace-report-list)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1846 (forward-line 1)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1847 (whitespace-mark-x
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1848 27 (memq (car option) whitespace-style))
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1849 (whitespace-mark-x 7 (car bogus-list))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1850 (setq bogus-list (cdr bogus-list)))
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1851 (forward-line 1)
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1852 (whitespace-insert-value ws-indent-tabs-mode)
94142
14cbf4c7b904 Handle whitespace-tab-width properly.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94112
diff changeset
1853 (whitespace-insert-value ws-tab-width)
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1854 (when has-bogus
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1855 (goto-char (point-max))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1856 (insert " Type `M-x whitespace-cleanup'"
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1857 " to cleanup the buffer.\n\n"
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1858 " Type `M-x whitespace-cleanup-region'"
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1859 " to cleanup a region.\n\n"))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1860 (whitespace-display-window (current-buffer)))))
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1861 has-bogus))))
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1862
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1863
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1864 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1865 ;;;; Internal functions
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1866
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1867
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1868 (defvar whitespace-font-lock-mode nil
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1869 "Used to remember whether a buffer had font lock mode on or not.")
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1870
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1871 (defvar whitespace-font-lock nil
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1872 "Used to remember whether a buffer initially had font lock on or not.")
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1873
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1874 (defvar whitespace-font-lock-keywords nil
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1875 "Used to save locally `font-lock-keywords' value.")
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1876
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1877
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1878 (defconst whitespace-help-text
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1879 "\
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1880 Whitespace Toggle Options
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1881
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1882 FACES
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1883 [] t - toggle TAB visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1884 [] s - toggle SPACE and HARD SPACE visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1885 [] r - toggle trailing blanks visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1886 [] l - toggle \"long lines\" visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1887 [] L - toggle \"long lines\" tail visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1888 [] n - toggle NEWLINE visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1889 [] e - toggle empty line at bob and/or eob visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1890 [] C-i - toggle indentation SPACEs visualization (via `indent-tabs-mode')
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1891 [] I - toggle indentation SPACEs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1892 [] i - toggle indentation TABs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1893 [] C-a - toggle SPACEs after TAB visualization (via `indent-tabs-mode')
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1894 [] A - toggle SPACEs after TAB: SPACEs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1895 [] a - toggle SPACEs after TAB: TABs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1896 [] C-b - toggle SPACEs before TAB visualization (via `indent-tabs-mode')
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1897 [] B - toggle SPACEs before TAB: SPACEs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1898 [] b - toggle SPACEs before TAB: TABs visualization
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1899
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1900 DISPLAY TABLE
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1901 [] T - toggle TAB visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1902 [] S - toggle SPACE and HARD SPACE visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1903 [] N - toggle NEWLINE visualization
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1904
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1905 x - restore `whitespace-style' value
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1906
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1907 ? - display this text\n\n"
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1908 "Text for whitespace toggle options.")
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1909
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1910
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1911 (defconst whitespace-help-buffer-name "*Whitespace Toggle Options*"
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1912 "The buffer name for whitespace toggle options.")
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1913
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1914
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1915 (defun whitespace-insert-value (value)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1916 "Insert VALUE at column 20 of next line."
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1917 (forward-line 1)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1918 (move-to-column 20 t)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1919 (insert (format "%s" value)))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1920
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1921
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1922 (defun whitespace-mark-x (nchars condition)
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1923 "Insert the mark ('X' or ' ') after NCHARS depending on CONDITION."
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1924 (forward-char nchars)
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1925 (insert (if condition "X" " ")))
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1926
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1927
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1928 (defun whitespace-insert-option-mark (the-list the-value)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1929 "Insert the option mark ('X' or ' ') in toggle options buffer."
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1930 (goto-char (point-min))
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1931 (forward-line 2)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1932 (dolist (sym the-list)
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1933 (if (eq sym 'help-newline)
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1934 (forward-line 2)
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1935 (forward-line 1)
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1936 (whitespace-mark-x 2 (memq sym the-value)))))
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1937
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1938
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1939 (defun whitespace-help-on (style)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1940 "Display the whitespace toggle options."
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1941 (unless (get-buffer whitespace-help-buffer-name)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1942 (delete-other-windows)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1943 (let ((buffer (get-buffer-create whitespace-help-buffer-name)))
105994
009383a57ce8 * x-dnd.el (x-dnd-maybe-call-test-function):
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 105756
diff changeset
1944 (with-current-buffer buffer
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1945 (erase-buffer)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1946 (insert whitespace-help-text)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1947 (whitespace-insert-option-mark
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
1948 whitespace-style-value-list style)
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1949 (whitespace-display-window buffer)))))
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1950
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1951
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1952 (defun whitespace-display-window (buffer)
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1953 "Display BUFFER in a new window."
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1954 (goto-char (point-min))
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1955 (set-buffer-modified-p nil)
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1956 (let ((size (- (window-height)
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1957 (max window-min-height
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1958 (1+ (count-lines (point-min)
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1959 (point-max)))))))
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1960 (when (<= size 0)
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1961 (kill-buffer buffer)
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1962 (error "Frame height is too small; \
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1963 can't split window to display whitespace toggle options"))
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
1964 (set-window-buffer (split-window nil size) buffer)))
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1965
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1966
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1967 (defun whitespace-kill-buffer (buffer-name)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1968 "Kill buffer BUFFER-NAME and windows related with it."
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1969 (let ((buffer (get-buffer buffer-name)))
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1970 (when buffer
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1971 (delete-windows-on buffer)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1972 (kill-buffer buffer))))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1973
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1974
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1975 (defun whitespace-help-off ()
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1976 "Remove the buffer and window of the whitespace toggle options."
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1977 (whitespace-kill-buffer whitespace-help-buffer-name))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1978
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1979
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1980 (defun whitespace-interactive-char (local-p)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1981 "Interactive function to read a char and return a symbol.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1982
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1983 If LOCAL-P is non-nil, it uses a local context; otherwise, it
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1984 uses a global context.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1985
88118
959dc75df82e (whitespace): Set :version tag to 23.1.
Juanma Barranquero <lekktu@gmail.com>
parents: 88115
diff changeset
1986 It accepts one of the following chars:
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1987
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1988 CHAR MEANING
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1989 (VIA FACES)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1990 t toggle TAB visualization
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1991 s toggle SPACE and HARD SPACE visualization
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1992 r toggle trailing blanks visualization
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1993 l toggle \"long lines\" visualization
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1994 L toggle \"long lines\" tail visualization
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1995 n toggle NEWLINE visualization
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
1996 e toggle empty line at bob and/or eob visualization
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1997 C-i toggle indentation SPACEs visualization (via `indent-tabs-mode')
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1998 I toggle indentation SPACEs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
1999 i toggle indentation TABs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2000 C-a toggle SPACEs after TAB visualization (via `indent-tabs-mode')
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2001 A toggle SPACEs after TAB: SPACEs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2002 a toggle SPACEs after TAB: TABs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2003 C-b toggle SPACEs before TAB visualization (via `indent-tabs-mode')
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2004 B toggle SPACEs before TAB: SPACEs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2005 b toggle SPACEs before TAB: TABs visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2006
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2007 (VIA DISPLAY TABLE)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2008 T toggle TAB visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2009 S toggle SPACE and HARD SPACE visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2010 N toggle NEWLINE visualization
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2011
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2012 x restore `whitespace-style' value
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2013 ? display brief help
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2014
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2015 See also `whitespace-toggle-option-alist'."
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2016 (let* ((is-off (not (if local-p
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2017 whitespace-mode
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2018 global-whitespace-mode)))
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2019 (style (cond (is-off whitespace-style) ; use default value
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2020 (local-p whitespace-active-style)
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2021 (t whitespace-toggle-style)))
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2022 (prompt
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2023 (format "Whitespace Toggle %s (type ? for further options)-"
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2024 (if local-p "Local" "Global")))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2025 ch sym)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2026 ;; read a valid option and get the corresponding symbol
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2027 (save-window-excursion
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2028 (condition-case data
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2029 (progn
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2030 (while
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2031 ;; while condition
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2032 (progn
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2033 (setq ch (read-char prompt))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2034 (not
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2035 (setq sym
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2036 (cdr
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2037 (assq ch whitespace-toggle-option-alist)))))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2038 ;; while body
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2039 (if (eq ch ?\?)
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2040 (whitespace-help-on style)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2041 (ding)))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2042 (whitespace-help-off)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2043 (message " ")) ; clean echo area
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2044 ;; handler
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2045 ((quit error)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2046 (whitespace-help-off)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2047 (error (error-message-string data)))))
106895
181539c8b6a4 Fix typos in docstrings, error messages, etc.
Juanma Barranquero <lekktu@gmail.com>
parents: 106815
diff changeset
2048 (list sym))) ; return the appropriate symbol
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2049
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2050
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2051 (defun whitespace-toggle-list (local-p arg the-list)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2052 "Toggle options in THE-LIST based on list ARG.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2053
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2054 If LOCAL-P is non-nil, it uses a local context; otherwise, it
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2055 uses a global context.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2056
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2057 ARG is a list of options to be toggled.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2058
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2059 THE-LIST is a list of options. This list will be toggled and the
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2060 resultant list will be returned."
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2061 (unless (if local-p whitespace-mode global-whitespace-mode)
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2062 (setq the-list whitespace-style))
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2063 (setq the-list (copy-sequence the-list)) ; keep original list
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2064 (dolist (sym (if (listp arg) arg (list arg)))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2065 (cond
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2066 ;; ignore help value
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2067 ((eq sym 'help-newline))
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2068 ;; restore default values
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2069 ((eq sym 'whitespace-style)
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2070 (setq the-list whitespace-style))
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2071 ;; toggle valid values
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2072 ((memq sym whitespace-style-value-list)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2073 (setq the-list (if (memq sym the-list)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2074 (delq sym the-list)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2075 (cons sym the-list))))))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2076 the-list)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2077
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2078
94226
8191f88f6fb9 (whitespace-display-table, whitespace-display-table-was-local):
Glenn Morris <rgm@gnu.org>
parents: 94142
diff changeset
2079 (defvar whitespace-display-table nil
8191f88f6fb9 (whitespace-display-table, whitespace-display-table-was-local):
Glenn Morris <rgm@gnu.org>
parents: 94142
diff changeset
2080 "Used to save a local display table.")
8191f88f6fb9 (whitespace-display-table, whitespace-display-table-was-local):
Glenn Morris <rgm@gnu.org>
parents: 94142
diff changeset
2081
8191f88f6fb9 (whitespace-display-table, whitespace-display-table-was-local):
Glenn Morris <rgm@gnu.org>
parents: 94142
diff changeset
2082 (defvar whitespace-display-table-was-local nil
8191f88f6fb9 (whitespace-display-table, whitespace-display-table-was-local):
Glenn Morris <rgm@gnu.org>
parents: 94142
diff changeset
2083 "Used to remember whether a buffer initially had a local display table.")
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2084
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2085
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2086 (defun whitespace-turn-on ()
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2087 "Turn on whitespace visualization."
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2088 ;; prepare local hooks
98454
431a14612b87 Eliminate whitespace-kill-buffer-hook functionality.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 98009
diff changeset
2089 (add-hook 'write-file-functions 'whitespace-write-file-hook nil t)
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2090 ;; create whitespace local buffer environment
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2091 (set (make-local-variable 'whitespace-font-lock-mode) nil)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2092 (set (make-local-variable 'whitespace-font-lock) nil)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2093 (set (make-local-variable 'whitespace-font-lock-keywords) nil)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2094 (set (make-local-variable 'whitespace-display-table) nil)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2095 (set (make-local-variable 'whitespace-display-table-was-local) nil)
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2096 (set (make-local-variable 'whitespace-active-style)
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2097 (if (listp whitespace-style)
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2098 whitespace-style
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2099 (list whitespace-style)))
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2100 (set (make-local-variable 'whitespace-indent-tabs-mode)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2101 indent-tabs-mode)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2102 (set (make-local-variable 'whitespace-tab-width)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2103 tab-width)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2104 ;; turn on whitespace
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2105 (when whitespace-active-style
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2106 (whitespace-color-on)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2107 (whitespace-display-char-on)))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2108
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2109
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2110 (defun whitespace-turn-off ()
88118
959dc75df82e (whitespace): Set :version tag to 23.1.
Juanma Barranquero <lekktu@gmail.com>
parents: 88115
diff changeset
2111 "Turn off whitespace visualization."
98454
431a14612b87 Eliminate whitespace-kill-buffer-hook functionality.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 98009
diff changeset
2112 (remove-hook 'write-file-functions 'whitespace-write-file-hook t)
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2113 (when whitespace-active-style
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2114 (whitespace-color-off)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2115 (whitespace-display-char-off)))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2116
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2117
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2118 (defun whitespace-style-face-p ()
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2119 "Return t if there is some visualization via face."
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2120 (or (memq 'tabs whitespace-active-style)
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2121 (memq 'spaces whitespace-active-style)
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2122 (memq 'trailing whitespace-active-style)
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2123 (memq 'lines whitespace-active-style)
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2124 (memq 'lines-tail whitespace-active-style)
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2125 (memq 'newline whitespace-active-style)
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2126 (memq 'empty whitespace-active-style)
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2127 (memq 'indentation whitespace-active-style)
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2128 (memq 'indentation::tab whitespace-active-style)
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2129 (memq 'indentation::space whitespace-active-style)
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2130 (memq 'space-after-tab whitespace-active-style)
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2131 (memq 'space-after-tab::tab whitespace-active-style)
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2132 (memq 'space-after-tab::space whitespace-active-style)
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2133 (memq 'space-before-tab whitespace-active-style)
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2134 (memq 'space-before-tab::tab whitespace-active-style)
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2135 (memq 'space-before-tab::space whitespace-active-style)))
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2136
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2137
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2138 (defun whitespace-color-on ()
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2139 "Turn on color visualization."
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2140 (when (whitespace-style-face-p)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2141 (unless whitespace-font-lock
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2142 (setq whitespace-font-lock t
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2143 whitespace-font-lock-keywords
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2144 (copy-sequence font-lock-keywords)))
105190
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2145 ;; save current point and refontify when necessary
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2146 (set (make-local-variable 'whitespace-point)
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2147 (point))
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2148 (set (make-local-variable 'whitespace-font-lock-refontify)
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2149 nil)
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2150 (add-hook 'post-command-hook #'whitespace-post-command-hook nil t)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2151 ;; turn off font lock
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2152 (set (make-local-variable 'whitespace-font-lock-mode)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2153 font-lock-mode)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2154 (font-lock-mode 0)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2155 ;; add whitespace-mode color into font lock
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2156 (when (memq 'spaces whitespace-active-style)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2157 (font-lock-add-keywords
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2158 nil
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2159 (list
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2160 ;; Show SPACEs
105190
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2161 (list #'whitespace-space-regexp 1 whitespace-space t)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2162 ;; Show HARD SPACEs
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2163 (list whitespace-hspace-regexp 1 whitespace-hspace t))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2164 t))
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2165 (when (memq 'tabs whitespace-active-style)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2166 (font-lock-add-keywords
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2167 nil
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2168 (list
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2169 ;; Show TABs
105190
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2170 (list #'whitespace-tab-regexp 1 whitespace-tab t))
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2171 t))
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2172 (when (memq 'trailing whitespace-active-style)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2173 (font-lock-add-keywords
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2174 nil
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2175 (list
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2176 ;; Show trailing blanks
105190
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2177 (list #'whitespace-trailing-regexp 1 whitespace-trailing t))
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2178 t))
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2179 (when (or (memq 'lines whitespace-active-style)
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2180 (memq 'lines-tail whitespace-active-style))
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2181 (font-lock-add-keywords
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2182 nil
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2183 (list
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2184 ;; Show "long" lines
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2185 (list
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2186 (format
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2187 "^\\([^\t\n]\\{%s\\}\\|[^\t\n]\\{0,%s\\}\t\\)\\{%d\\}%s\\(.+\\)$"
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2188 whitespace-tab-width (1- whitespace-tab-width)
105190
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2189 (/ whitespace-line-column whitespace-tab-width)
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2190 (let ((rem (% whitespace-line-column whitespace-tab-width)))
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2191 (if (zerop rem)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2192 ""
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2193 (format ".\\{%d\\}" rem))))
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2194 (if (memq 'lines whitespace-active-style)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2195 0 ; whole line
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2196 2) ; line tail
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2197 whitespace-line t))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2198 t))
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2199 (cond
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2200 ((memq 'space-before-tab whitespace-active-style)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2201 (font-lock-add-keywords
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2202 nil
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2203 (list
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2204 ;; Show SPACEs before TAB (indent-tabs-mode)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2205 (list whitespace-space-before-tab-regexp
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2206 (if whitespace-indent-tabs-mode 1 2)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2207 whitespace-space-before-tab t))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2208 t))
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2209 ((memq 'space-before-tab::tab whitespace-active-style)
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2210 (font-lock-add-keywords
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2211 nil
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2212 (list
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2213 ;; Show SPACEs before TAB (SPACEs)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2214 (list whitespace-space-before-tab-regexp
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2215 1 whitespace-space-before-tab t))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2216 t))
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2217 ((memq 'space-before-tab::space whitespace-active-style)
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2218 (font-lock-add-keywords
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2219 nil
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2220 (list
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2221 ;; Show SPACEs before TAB (TABs)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2222 (list whitespace-space-before-tab-regexp
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2223 2 whitespace-space-before-tab t))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2224 t)))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2225 (cond
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2226 ((memq 'indentation whitespace-active-style)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2227 (font-lock-add-keywords
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2228 nil
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2229 (list
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2230 ;; Show indentation SPACEs (indent-tabs-mode)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2231 (list (whitespace-indentation-regexp)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2232 1 whitespace-indentation t))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2233 t))
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2234 ((memq 'indentation::tab whitespace-active-style)
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2235 (font-lock-add-keywords
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2236 nil
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2237 (list
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2238 ;; Show indentation SPACEs (SPACEs)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2239 (list (whitespace-indentation-regexp 'tab)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2240 1 whitespace-indentation t))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2241 t))
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2242 ((memq 'indentation::space whitespace-active-style)
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2243 (font-lock-add-keywords
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2244 nil
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2245 (list
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2246 ;; Show indentation SPACEs (TABs)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2247 (list (whitespace-indentation-regexp 'space)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2248 1 whitespace-indentation t))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2249 t)))
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2250 (when (memq 'empty whitespace-active-style)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2251 (font-lock-add-keywords
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2252 nil
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2253 (list
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2254 ;; Show empty lines at beginning of buffer
105190
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2255 (list #'whitespace-empty-at-bob-regexp
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2256 1 whitespace-empty t))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2257 t)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2258 (font-lock-add-keywords
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2259 nil
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2260 (list
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2261 ;; Show empty lines at end of buffer
105190
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2262 (list #'whitespace-empty-at-eob-regexp
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2263 1 whitespace-empty t))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2264 t))
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2265 (cond
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2266 ((memq 'space-after-tab whitespace-active-style)
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2267 (font-lock-add-keywords
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2268 nil
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2269 (list
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2270 ;; Show SPACEs after TAB (indent-tabs-mode)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2271 (list (whitespace-space-after-tab-regexp)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2272 1 whitespace-space-after-tab t))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2273 t))
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2274 ((memq 'space-after-tab::tab whitespace-active-style)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2275 (font-lock-add-keywords
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2276 nil
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2277 (list
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2278 ;; Show SPACEs after TAB (SPACEs)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2279 (list (whitespace-space-after-tab-regexp 'tab)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2280 1 whitespace-space-after-tab t))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2281 t))
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2282 ((memq 'space-after-tab::space whitespace-active-style)
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2283 (font-lock-add-keywords
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2284 nil
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2285 (list
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2286 ;; Show SPACEs after TAB (TABs)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2287 (list (whitespace-space-after-tab-regexp 'space)
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2288 1 whitespace-space-after-tab t))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2289 t)))
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2290 ;; now turn on font lock and highlight blanks
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2291 (font-lock-mode 1)))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2292
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2293
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2294 (defun whitespace-color-off ()
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2295 "Turn off color visualization."
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2296 ;; turn off font lock
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2297 (when (whitespace-style-face-p)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2298 (font-lock-mode 0)
105190
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2299 (remove-hook 'post-command-hook #'whitespace-post-command-hook)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2300 (when whitespace-font-lock
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2301 (setq whitespace-font-lock nil
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2302 font-lock-keywords whitespace-font-lock-keywords))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2303 ;; restore original font lock state
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2304 (font-lock-mode whitespace-font-lock-mode)))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2305
105190
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2306
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2307 (defun whitespace-trailing-regexp (limit)
105244
1308a0fb85e9 Fix doc string.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 105190
diff changeset
2308 "Match trailing spaces which do not contain the point at end of line."
105190
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2309 (let ((status t))
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2310 (while (if (re-search-forward whitespace-trailing-regexp limit t)
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2311 (save-match-data
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2312 (= whitespace-point (match-end 1))) ;; loop if point at eol
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2313 (setq status nil))) ;; end of buffer
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2314 status))
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2315
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2316
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2317 (defun whitespace-empty-at-bob-regexp (limit)
105244
1308a0fb85e9 Fix doc string.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 105190
diff changeset
2318 "Match spaces at beginning of buffer which do not contain the point at \
105190
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2319 beginning of buffer."
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2320 (and (/= whitespace-point 1)
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2321 (re-search-forward whitespace-empty-at-bob-regexp limit t)))
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2322
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2323
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2324 (defun whitespace-empty-at-eob-regexp (limit)
105244
1308a0fb85e9 Fix doc string.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 105190
diff changeset
2325 "Match spaces at end of buffer which do not contain the point at end of \
105190
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2326 buffer."
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2327 (and (/= whitespace-point (1+ (buffer-size)))
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2328 (re-search-forward whitespace-empty-at-eob-regexp limit t)))
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2329
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2330
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2331 (defun whitespace-space-regexp (limit)
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2332 "Match spaces."
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2333 (setq whitespace-font-lock-refontify t)
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2334 (re-search-forward whitespace-space-regexp limit t))
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2335
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2336
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2337 (defun whitespace-tab-regexp (limit)
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2338 "Match tabs."
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2339 (setq whitespace-font-lock-refontify t)
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2340 (re-search-forward whitespace-tab-regexp limit t))
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2341
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2342
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2343 (defun whitespace-post-command-hook ()
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2344 "Save current point into `whitespace-point' variable.
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2345 Also refontify when necessary."
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2346 (setq whitespace-point (point))
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2347 (let ((refontify (or (eolp) ; end of line
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2348 (= whitespace-point 1)))) ; beginning of buffer
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2349 (when (or whitespace-font-lock-refontify refontify)
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2350 (setq whitespace-font-lock-refontify refontify)
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2351 (jit-lock-refontify))))
a0ecdf08bbf5 New version 12. Bug#4177
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 104301
diff changeset
2352
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2353
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2354 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2355 ;;;; Hacked from visws.el (Miles Bader <miles@gnu.org>)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2356
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2357
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2358 (defun whitespace-style-mark-p ()
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2359 "Return t if there is some visualization via display table."
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2360 (or (memq 'tab-mark whitespace-active-style)
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2361 (memq 'space-mark whitespace-active-style)
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2362 (memq 'newline-mark whitespace-active-style)))
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2363
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2364
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2365 (defsubst whitespace-char-valid-p (char)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2366 ;; This check should be improved!!!
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2367 (or (< char 256)
91432
649ddfa757be (whitespace-char-valid-p): Use characterp rather than char-valid-p.
Glenn Morris <rgm@gnu.org>
parents: 91377
diff changeset
2368 (characterp char)))
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2369
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2370
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2371 (defun whitespace-display-vector-p (vec)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2372 "Return true if every character in vector VEC can be displayed."
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2373 (let ((i (length vec)))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2374 (when (> i 0)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2375 (while (and (>= (setq i (1- i)) 0)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2376 (whitespace-char-valid-p (aref vec i))))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2377 (< i 0))))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2378
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2379
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2380 (defun whitespace-display-char-on ()
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2381 "Turn on character display mapping."
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2382 (when (and whitespace-display-mappings
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2383 (whitespace-style-mark-p))
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2384 (let (vecs vec)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2385 ;; Remember whether a buffer has a local display table.
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2386 (unless whitespace-display-table-was-local
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2387 (setq whitespace-display-table-was-local t
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2388 whitespace-display-table
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2389 (copy-sequence buffer-display-table)))
106527
3d526a040a6b Asure buffer-display-table is unique when two or more windows are visible.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 106526
diff changeset
2390 ;; asure `buffer-display-table' is unique
3d526a040a6b Asure buffer-display-table is unique when two or more windows are visible.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 106526
diff changeset
2391 ;; when two or more windows are visible.
3d526a040a6b Asure buffer-display-table is unique when two or more windows are visible.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 106526
diff changeset
2392 (set (make-local-variable 'buffer-display-table)
3d526a040a6b Asure buffer-display-table is unique when two or more windows are visible.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 106526
diff changeset
2393 (copy-sequence buffer-display-table))
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2394 (unless buffer-display-table
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2395 (setq buffer-display-table (make-display-table)))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2396 (dolist (entry whitespace-display-mappings)
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2397 ;; check if it is to display this mark
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2398 (when (memq (car entry) whitespace-style)
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2399 ;; Get a displayable mapping.
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2400 (setq vecs (cddr entry))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2401 (while (and vecs
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2402 (not (whitespace-display-vector-p (car vecs))))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2403 (setq vecs (cdr vecs)))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2404 ;; Display a valid mapping.
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2405 (when vecs
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2406 (setq vec (copy-sequence (car vecs)))
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2407 ;; NEWLINE char
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2408 (when (and (eq (cadr entry) ?\n)
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2409 (memq 'newline whitespace-active-style))
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2410 ;; Only insert face bits on NEWLINE char mapping to avoid
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2411 ;; obstruction of other faces like TABs and (HARD) SPACEs
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2412 ;; faces, font-lock faces, etc.
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2413 (dotimes (i (length vec))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2414 (or (eq (aref vec i) ?\n)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2415 (aset vec i
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2416 (make-glyph-code (aref vec i)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2417 whitespace-newline)))))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2418 ;; Display mapping
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2419 (aset buffer-display-table (cadr entry) vec)))))))
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2420
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2421
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2422 (defun whitespace-display-char-off ()
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2423 "Turn off character display mapping."
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2424 (and whitespace-display-mappings
94373
f9bcef02655f New version 11.0.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 94226
diff changeset
2425 (whitespace-style-mark-p)
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2426 whitespace-display-table-was-local
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2427 (setq whitespace-display-table-was-local nil
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2428 buffer-display-table whitespace-display-table)))
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2429
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2430
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2431 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
2432 ;;;; Hook
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
2433
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
2434
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
2435 (defun whitespace-action-when-on ()
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
2436 "Action to be taken always when local whitespace is turned on."
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
2437 (cond ((memq 'cleanup whitespace-action)
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
2438 (whitespace-cleanup))
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
2439 ((memq 'report-on-bogus whitespace-action)
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
2440 (whitespace-report nil t))))
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
2441
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
2442
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
2443 (defun whitespace-write-file-hook ()
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
2444 "Action to be taken when buffer is written.
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
2445 It should be added buffer-locally to `write-file-functions'."
98454
431a14612b87 Eliminate whitespace-kill-buffer-hook functionality.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 98009
diff changeset
2446 (cond ((memq 'auto-cleanup whitespace-action)
431a14612b87 Eliminate whitespace-kill-buffer-hook functionality.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 98009
diff changeset
2447 (whitespace-cleanup))
431a14612b87 Eliminate whitespace-kill-buffer-hook functionality.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 98009
diff changeset
2448 ((memq 'abort-on-bogus whitespace-action)
431a14612b87 Eliminate whitespace-kill-buffer-hook functionality.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 98009
diff changeset
2449 (when (whitespace-report nil t)
431a14612b87 Eliminate whitespace-kill-buffer-hook functionality.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 98009
diff changeset
2450 (error "Abort write due to whitespace problems in %s"
431a14612b87 Eliminate whitespace-kill-buffer-hook functionality.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 98009
diff changeset
2451 (buffer-name)))))
94112
7b3262e9986b Honor the indent-tabs-mode and tab-width setting from user.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 92372
diff changeset
2452 nil) ; continue hook processing
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
2453
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
2454
98008
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
2455 (defun whitespace-warn-read-only (msg)
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
2456 "Warn if buffer is read-only."
98454
431a14612b87 Eliminate whitespace-kill-buffer-hook functionality.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 98009
diff changeset
2457 (when (memq 'warn-if-read-only whitespace-action)
98008
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
2458 (message "Can't %s: %s is read-only" msg (buffer-name))))
4ec5decd0683 Fix bug#360.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 97311
diff changeset
2459
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
2460
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
2461 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2462
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2463
88115
becc5f138486 (global-whitespace-mode): When turning off the global mode,
Juanma Barranquero <lekktu@gmail.com>
parents: 88113
diff changeset
2464 (defun whitespace-unload-function ()
92372
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
2465 "Unload the whitespace library."
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
2466 (global-whitespace-mode -1)
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
2467 ;; be sure all local whitespace mode is turned off
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
2468 (save-current-buffer
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
2469 (dolist (buf (buffer-list))
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
2470 (set-buffer buf)
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
2471 (whitespace-mode -1)))
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
2472 nil) ; continue standard unloading
0418e6ff8eb2 New version 9.3.
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents: 91471
diff changeset
2473
88115
becc5f138486 (global-whitespace-mode): When turning off the global mode,
Juanma Barranquero <lekktu@gmail.com>
parents: 88113
diff changeset
2474
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2475 (provide 'whitespace)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2476
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2477
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2478 (run-hooks 'whitespace-load-hook)
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2479
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2480
88100
9623247b8103 Re-use arch-tag from old blank-mode.el for lisp/whitespace.el
Miles Bader <miles@gnu.org>
parents: 88099
diff changeset
2481 ;; arch-tag: 1b1e2500-dbd4-4a26-8f7a-5a5edfd3c97e
88097
1662791e8fd8 Rename blank-mode.el to whitespace.el and obsolete/whitespace.el to obsolete/old-whitespace.el
Vinicius Jose Latorre <viniciusjl@ig.com.br>
parents:
diff changeset
2482 ;;; whitespace.el ends here