diff options
| author | Juanma Barranquero | 2008-01-19 15:13:09 +0000 |
|---|---|---|
| committer | Juanma Barranquero | 2008-01-19 15:13:09 +0000 |
| commit | 3df7f6458d0ad30331f8e3f00ccf818e6424da1c (patch) | |
| tree | 88f3992b1dbc6544c136aa0b4e7592296c1b0b74 | |
| parent | 404967ca97ee9da387d06a6d79371bbb3fb7c2bb (diff) | |
| download | emacs-3df7f6458d0ad30331f8e3f00ccf818e6424da1c.tar.gz emacs-3df7f6458d0ad30331f8e3f00ccf818e6424da1c.zip | |
(blank-style, blank-chars, blank-hspace-regexp, blank-space-regexp,
blank-tab-regexp, blank-trailing-regexp, blank-space-before-tab-regexp,
blank-global-modes, blank-mode, global-blank-mode): Doc fixes.
(blank, blank-space-face, blank-hspace-face, blank-tab-face, blank-newline-face,
blank-trailing-face, blank-line-face, blank-space-before-tab-face,
blank-display-mappings, blank-chars-value-list, blank-style-value-list,
blank-toggle-options, global-blank-toggle-options, blank-help-text,
blank-interactive-char, blank-turn-on, blank-turn-off, blank-color-on,
blank-color-off): Fix typos in docstrings.
| -rw-r--r-- | lisp/ChangeLog | 24 | ||||
| -rw-r--r-- | lisp/blank-mode.el | 228 |
2 files changed, 133 insertions, 119 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 1611261964b..fbf675d8f7e 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,10 +1,24 @@ | |||
| 1 | 2008-01-19 Juanma Barranquero <lekktu@gmail.com> | ||
| 2 | |||
| 3 | * blank-mode.el (blank-style, blank-chars, blank-hspace-regexp) | ||
| 4 | (blank-space-regexp, blank-tab-regexp, blank-trailing-regexp) | ||
| 5 | (blank-space-before-tab-regexp, blank-global-modes, blank-mode) | ||
| 6 | (global-blank-mode): Doc fixes. | ||
| 7 | (blank, blank-space-face, blank-hspace-face, blank-tab-face) | ||
| 8 | (blank-newline-face, blank-trailing-face, blank-line-face) | ||
| 9 | (blank-space-before-tab-face, blank-display-mappings) | ||
| 10 | (blank-chars-value-list, blank-style-value-list, blank-toggle-options) | ||
| 11 | (global-blank-toggle-options, blank-help-text, blank-interactive-char) | ||
| 12 | (blank-turn-on, blank-turn-off, blank-color-on, blank-color-off): | ||
| 13 | Fix typos in docstrings. | ||
| 14 | |||
| 1 | 2008-01-18 Richard Stallman <rms@gnu.org> | 15 | 2008-01-18 Richard Stallman <rms@gnu.org> |
| 2 | 16 | ||
| 3 | * icomplete.el (icomplete-get-keys): | 17 | * icomplete.el (icomplete-get-keys): |
| 4 | Look up KEYS using all maps in proper buffer. | 18 | Look up KEYS using all maps in proper buffer. |
| 5 | 19 | ||
| 6 | 2008-01-17 Vinicius Jose Latorre <viniciusjl@ig.com.br> | 20 | 2008-01-17 Vinicius Jose Latorre <viniciusjl@ig.com.br> |
| 7 | 2008-01-17 Miles Bader <miles@gnu.org> | 21 | Miles Bader <miles@gnu.org> |
| 8 | 22 | ||
| 9 | * blank-mode.el: New file. Minor mode to visualise TAB, | 23 | * blank-mode.el: New file. Minor mode to visualise TAB, |
| 10 | (HARD) SPACE, NEWLINE. Miles Bader <miles@gnu.org> wrote the original | 24 | (HARD) SPACE, NEWLINE. Miles Bader <miles@gnu.org> wrote the original |
| @@ -143,7 +157,7 @@ | |||
| 143 | 157 | ||
| 144 | * vc-hg.el (vc-hg-diff): Don't pass an empty string. | 158 | * vc-hg.el (vc-hg-diff): Don't pass an empty string. |
| 145 | 159 | ||
| 146 | 2008-01-09 Wilson Snyder <wsnyder@wsnyder.org> | 160 | 2008-01-09 Wilson Snyder <wsnyder@wsnyder.org> |
| 147 | 161 | ||
| 148 | * progmodes/verilog-mode.el (top-level): Fix spacing. | 162 | * progmodes/verilog-mode.el (top-level): Fix spacing. |
| 149 | (verilog-mode-version, verilog-mode-release-date): Update version | 163 | (verilog-mode-version, verilog-mode-release-date): Update version |
| @@ -610,8 +624,8 @@ | |||
| 610 | (verilog-emacs-features, verilog-auto-ascii-enum) | 624 | (verilog-emacs-features, verilog-auto-ascii-enum) |
| 611 | (verilog-insert-indices): Escape braces in doc strings. | 625 | (verilog-insert-indices): Escape braces in doc strings. |
| 612 | 626 | ||
| 613 | 2007-12-08 Michael McNamara <mac@verilog.com> | 627 | 2007-12-08 Michael McNamara <mac@verilog.com> |
| 614 | Wilson Snyder <wsnyder@wsnyder.org> | 628 | Wilson Snyder <wsnyder@wsnyder.org> |
| 615 | 629 | ||
| 616 | * progmodes/verilog-mode.el: New file. | 630 | * progmodes/verilog-mode.el: New file. |
| 617 | 631 | ||
diff --git a/lisp/blank-mode.el b/lisp/blank-mode.el index 3a57f2e971c..112562af576 100644 --- a/lisp/blank-mode.el +++ b/lisp/blank-mode.el | |||
| @@ -1,4 +1,4 @@ | |||
| 1 | ;;; blank-mode.el --- minor mode to visualise TAB, (HARD) SPACE, NEWLINE | 1 | ;;; blank-mode.el --- minor mode to visualize TAB, (HARD) SPACE, NEWLINE |
| 2 | 2 | ||
| 3 | ;; Copyright (C) 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008 | 3 | ;; Copyright (C) 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008 |
| 4 | ;; Free Software Foundation, Inc. | 4 | ;; Free Software Foundation, Inc. |
| @@ -33,10 +33,10 @@ | |||
| 33 | ;; Introduction | 33 | ;; Introduction |
| 34 | ;; ------------ | 34 | ;; ------------ |
| 35 | ;; | 35 | ;; |
| 36 | ;; This package is a minor mode to visualise blanks (TAB, (HARD) SPACE | 36 | ;; This package is a minor mode to visualize blanks (TAB, (HARD) SPACE |
| 37 | ;; and NEWLINE). | 37 | ;; and NEWLINE). |
| 38 | ;; | 38 | ;; |
| 39 | ;; blank-mode uses two ways to visualise blanks: faces and display | 39 | ;; blank-mode uses two ways to visualize blanks: faces and display |
| 40 | ;; table. | 40 | ;; table. |
| 41 | ;; | 41 | ;; |
| 42 | ;; * Faces are used to highlight the background with a color. | 42 | ;; * Faces are used to highlight the background with a color. |
| @@ -47,7 +47,7 @@ | |||
| 47 | ;; of line (?\xB6), at SPACEs (?\xB7) and at TABs (?\xBB). | 47 | ;; of line (?\xB6), at SPACEs (?\xB7) and at TABs (?\xBB). |
| 48 | ;; | 48 | ;; |
| 49 | ;; The `blank-style' and `blank-chars' variables are used to select | 49 | ;; The `blank-style' and `blank-chars' variables are used to select |
| 50 | ;; which way should be used to visualise blanks. | 50 | ;; which way should be used to visualize blanks. |
| 51 | ;; | 51 | ;; |
| 52 | ;; Note that when blank-mode is turned on, blank-mode saves the | 52 | ;; Note that when blank-mode is turned on, blank-mode saves the |
| 53 | ;; font-lock state, that is, if font-lock is on or off. And | 53 | ;; font-lock state, that is, if font-lock is on or off. And |
| @@ -94,7 +94,7 @@ | |||
| 94 | ;; `global-blank-toggle-options'. For example: | 94 | ;; `global-blank-toggle-options'. For example: |
| 95 | ;; | 95 | ;; |
| 96 | ;; (autoload 'blank-mode "blank-mode" | 96 | ;; (autoload 'blank-mode "blank-mode" |
| 97 | ;; "Toggle blank visualisation." t) | 97 | ;; "Toggle blank visualization." t) |
| 98 | ;; (autoload 'blank-toggle-options "blank-mode" | 98 | ;; (autoload 'blank-toggle-options "blank-mode" |
| 99 | ;; "Toggle local `blank-mode' options." t) | 99 | ;; "Toggle local `blank-mode' options." t) |
| 100 | ;; | 100 | ;; |
| @@ -175,26 +175,26 @@ | |||
| 175 | ;; Below it's shown a brief description of blank-mode options, please, | 175 | ;; Below it's shown a brief description of blank-mode options, please, |
| 176 | ;; see the options declaration in the code for a long documentation. | 176 | ;; see the options declaration in the code for a long documentation. |
| 177 | ;; | 177 | ;; |
| 178 | ;; `blank-style' Specify the visualisation style. | 178 | ;; `blank-style' Specify the visualization style. |
| 179 | ;; | 179 | ;; |
| 180 | ;; `blank-chars' Specify which kind of blank is | 180 | ;; `blank-chars' Specify which kind of blank is |
| 181 | ;; visualised. | 181 | ;; visualized. |
| 182 | ;; | 182 | ;; |
| 183 | ;; `blank-space-face' Face used to visualise SPACE. | 183 | ;; `blank-space-face' Face used to visualize SPACE. |
| 184 | ;; | 184 | ;; |
| 185 | ;; `blank-hspace-face' Face used to visualise HARD SPACE. | 185 | ;; `blank-hspace-face' Face used to visualize HARD SPACE. |
| 186 | ;; | 186 | ;; |
| 187 | ;; `blank-tab-face' Face used to visualise TAB. | 187 | ;; `blank-tab-face' Face used to visualize TAB. |
| 188 | ;; | 188 | ;; |
| 189 | ;; `blank-newline-face' Face used to visualise NEWLINE char | 189 | ;; `blank-newline-face' Face used to visualize NEWLINE char |
| 190 | ;; mapping. | 190 | ;; mapping. |
| 191 | ;; | 191 | ;; |
| 192 | ;; `blank-trailing-face' Face used to visualise trailing | 192 | ;; `blank-trailing-face' Face used to visualize trailing |
| 193 | ;; blanks. | 193 | ;; blanks. |
| 194 | ;; | 194 | ;; |
| 195 | ;; `blank-line-face' Face used to visualise "long" lines. | 195 | ;; `blank-line-face' Face used to visualize "long" lines. |
| 196 | ;; | 196 | ;; |
| 197 | ;; `blank-space-before-tab-face' Face used to visualise SPACEs | 197 | ;; `blank-space-before-tab-face' Face used to visualize SPACEs |
| 198 | ;; before TAB. | 198 | ;; before TAB. |
| 199 | ;; | 199 | ;; |
| 200 | ;; `blank-space-regexp' Specify SPACE characters regexp. | 200 | ;; `blank-space-regexp' Specify SPACE characters regexp. |
| @@ -268,7 +268,7 @@ | |||
| 268 | 268 | ||
| 269 | 269 | ||
| 270 | (defgroup blank nil | 270 | (defgroup blank nil |
| 271 | "Visualise blanks (TAB, (HARD) SPACE and NEWLINE)." | 271 | "Visualize blanks (TAB, (HARD) SPACE and NEWLINE)." |
| 272 | :link '(emacs-library-link :tag "Source Lisp File" "blank-mode.el") | 272 | :link '(emacs-library-link :tag "Source Lisp File" "blank-mode.el") |
| 273 | :version "22.2" | 273 | :version "22.2" |
| 274 | :group 'wp | 274 | :group 'wp |
| @@ -276,17 +276,17 @@ | |||
| 276 | 276 | ||
| 277 | 277 | ||
| 278 | (defcustom blank-style '(mark color) | 278 | (defcustom blank-style '(mark color) |
| 279 | "*Specify the visualisation style. | 279 | "*Specify the visualization style. |
| 280 | 280 | ||
| 281 | It's a list which element value can be: | 281 | It's a list which element value can be: |
| 282 | 282 | ||
| 283 | mark display mappings are visualised. | 283 | mark display mappings are visualized. |
| 284 | 284 | ||
| 285 | color faces are visualised. | 285 | color faces are visualized. |
| 286 | 286 | ||
| 287 | Any other value is ignored. | 287 | Any other value is ignored. |
| 288 | 288 | ||
| 289 | If it's nil, don't visualise TABs, (HARD) SPACEs and NEWLINEs. | 289 | If nil, don't visualize TABs, (HARD) SPACEs and NEWLINEs. |
| 290 | 290 | ||
| 291 | See also `blank-display-mappings' for documentation." | 291 | See also `blank-display-mappings' for documentation." |
| 292 | :type '(repeat :tag "Style of Blank" | 292 | :type '(repeat :tag "Style of Blank" |
| @@ -298,26 +298,26 @@ See also `blank-display-mappings' for documentation." | |||
| 298 | 298 | ||
| 299 | (defcustom blank-chars | 299 | (defcustom blank-chars |
| 300 | '(tabs spaces trailing lines space-before-tab newline) | 300 | '(tabs spaces trailing lines space-before-tab newline) |
| 301 | "*Specify which kind of blank is visualised. | 301 | "*Specify which kind of blank is visualized. |
| 302 | 302 | ||
| 303 | It's a list which element value can be: | 303 | It's a list which element value can be: |
| 304 | 304 | ||
| 305 | trailing trailing blanks are visualised. | 305 | trailing trailing blanks are visualized. |
| 306 | 306 | ||
| 307 | tabs TABs are visualised. | 307 | tabs TABs are visualized. |
| 308 | 308 | ||
| 309 | spaces SPACEs and HARD SPACEs are visualised. | 309 | spaces SPACEs and HARD SPACEs are visualized. |
| 310 | 310 | ||
| 311 | lines lines whose length is greater than | 311 | lines lines whose length is greater than |
| 312 | `blank-line-length' are highlighted. | 312 | `blank-line-length' are highlighted. |
| 313 | 313 | ||
| 314 | space-before-tab SPACEs before TAB are visualised. | 314 | space-before-tab SPACEs before TAB are visualized. |
| 315 | 315 | ||
| 316 | newline NEWLINEs are visualised. | 316 | newline NEWLINEs are visualized. |
| 317 | 317 | ||
| 318 | Any other element value is ignored. | 318 | Any other value is ignored. |
| 319 | 319 | ||
| 320 | If it's nil, don't visualise TABs, (HARD) SPACEs and NEWLINEs. | 320 | If nil, don't visualize TABs, (HARD) SPACEs and NEWLINEs. |
| 321 | 321 | ||
| 322 | Used when `blank-style' has `color' as an element. | 322 | Used when `blank-style' has `color' as an element. |
| 323 | If `blank-chars' has `newline' as an element, used when `blank-style' | 323 | If `blank-chars' has `newline' as an element, used when `blank-style' |
| @@ -336,7 +336,7 @@ has `mark' as an element." | |||
| 336 | 336 | ||
| 337 | 337 | ||
| 338 | (defcustom blank-space-face 'blank-space-face | 338 | (defcustom blank-space-face 'blank-space-face |
| 339 | "*Symbol face used to visualise SPACE. | 339 | "*Symbol face used to visualize SPACE. |
| 340 | 340 | ||
| 341 | Used when `blank-style' has `color' as an element." | 341 | Used when `blank-style' has `color' as an element." |
| 342 | :type 'face | 342 | :type 'face |
| @@ -349,12 +349,12 @@ Used when `blank-style' has `color' as an element." | |||
| 349 | (((class color) (background light)) | 349 | (((class color) (background light)) |
| 350 | (:background "LightYellow" :foreground "aquamarine3")) | 350 | (:background "LightYellow" :foreground "aquamarine3")) |
| 351 | (t (:inverse-video t))) | 351 | (t (:inverse-video t))) |
| 352 | "Face used to visualise SPACE." | 352 | "Face used to visualize SPACE." |
| 353 | :group 'blank) | 353 | :group 'blank) |
| 354 | 354 | ||
| 355 | 355 | ||
| 356 | (defcustom blank-hspace-face 'blank-hspace-face | 356 | (defcustom blank-hspace-face 'blank-hspace-face |
| 357 | "*Symbol face used to visualise HARD SPACE. | 357 | "*Symbol face used to visualize HARD SPACE. |
| 358 | 358 | ||
| 359 | Used when `blank-style' has `color' as an element." | 359 | Used when `blank-style' has `color' as an element." |
| 360 | :type 'face | 360 | :type 'face |
| @@ -367,12 +367,12 @@ Used when `blank-style' has `color' as an element." | |||
| 367 | (((class color) (background light)) | 367 | (((class color) (background light)) |
| 368 | (:background "LemonChiffon3" :foreground "aquamarine3")) | 368 | (:background "LemonChiffon3" :foreground "aquamarine3")) |
| 369 | (t (:inverse-video t))) | 369 | (t (:inverse-video t))) |
| 370 | "Face used to visualise HARD SPACE." | 370 | "Face used to visualize HARD SPACE." |
| 371 | :group 'blank) | 371 | :group 'blank) |
| 372 | 372 | ||
| 373 | 373 | ||
| 374 | (defcustom blank-tab-face 'blank-tab-face | 374 | (defcustom blank-tab-face 'blank-tab-face |
| 375 | "*Symbol face used to visualise TAB. | 375 | "*Symbol face used to visualize TAB. |
| 376 | 376 | ||
| 377 | Used when `blank-style' has `color' as an element." | 377 | Used when `blank-style' has `color' as an element." |
| 378 | :type 'face | 378 | :type 'face |
| @@ -385,12 +385,12 @@ Used when `blank-style' has `color' as an element." | |||
| 385 | (((class color) (background light)) | 385 | (((class color) (background light)) |
| 386 | (:background "beige" :foreground "aquamarine3")) | 386 | (:background "beige" :foreground "aquamarine3")) |
| 387 | (t (:inverse-video t))) | 387 | (t (:inverse-video t))) |
| 388 | "Face used to visualise TAB." | 388 | "Face used to visualize TAB." |
| 389 | :group 'blank) | 389 | :group 'blank) |
| 390 | 390 | ||
| 391 | 391 | ||
| 392 | (defcustom blank-newline-face 'blank-newline-face | 392 | (defcustom blank-newline-face 'blank-newline-face |
| 393 | "*Symbol face used to visualise NEWLINE char mapping. | 393 | "*Symbol face used to visualize NEWLINE char mapping. |
| 394 | 394 | ||
| 395 | See `blank-display-mappings'. | 395 | See `blank-display-mappings'. |
| 396 | 396 | ||
| @@ -406,14 +406,14 @@ and `blank-chars' has `newline' as an element." | |||
| 406 | (((class color) (background light)) | 406 | (((class color) (background light)) |
| 407 | (:background "linen" :foreground "aquamarine3" :bold t)) | 407 | (:background "linen" :foreground "aquamarine3" :bold t)) |
| 408 | (t (:bold t :underline t))) | 408 | (t (:bold t :underline t))) |
| 409 | "Face used to visualise NEWLINE char mapping. | 409 | "Face used to visualize NEWLINE char mapping. |
| 410 | 410 | ||
| 411 | See `blank-display-mappings'." | 411 | See `blank-display-mappings'." |
| 412 | :group 'blank) | 412 | :group 'blank) |
| 413 | 413 | ||
| 414 | 414 | ||
| 415 | (defcustom blank-trailing-face 'blank-trailing-face | 415 | (defcustom blank-trailing-face 'blank-trailing-face |
| 416 | "*Symbol face used to visualise traling blanks. | 416 | "*Symbol face used to visualize traling blanks. |
| 417 | 417 | ||
| 418 | Used when `blank-style' has `color' as an element." | 418 | Used when `blank-style' has `color' as an element." |
| 419 | :type 'face | 419 | :type 'face |
| @@ -423,14 +423,14 @@ Used when `blank-style' has `color' as an element." | |||
| 423 | (defface blank-trailing-face ; 'trailing-whitespace | 423 | (defface blank-trailing-face ; 'trailing-whitespace |
| 424 | '((((class mono)) (:inverse-video t :bold t :underline t)) | 424 | '((((class mono)) (:inverse-video t :bold t :underline t)) |
| 425 | (t (:background "red1" :foreground "yellow" :bold t))) | 425 | (t (:background "red1" :foreground "yellow" :bold t))) |
| 426 | "Face used to visualise trailing blanks." | 426 | "Face used to visualize trailing blanks." |
| 427 | :group 'blank) | 427 | :group 'blank) |
| 428 | 428 | ||
| 429 | 429 | ||
| 430 | (defcustom blank-line-face 'blank-line-face | 430 | (defcustom blank-line-face 'blank-line-face |
| 431 | "*Symbol face used to visualise \"long\" lines. | 431 | "*Symbol face used to visualize \"long\" lines. |
| 432 | 432 | ||
| 433 | See `blank-line-legnth'. | 433 | See `blank-line-length'. |
| 434 | 434 | ||
| 435 | Used when `blank-style' has `color' as an element." | 435 | Used when `blank-style' has `color' as an element." |
| 436 | :type 'face | 436 | :type 'face |
| @@ -440,14 +440,14 @@ Used when `blank-style' has `color' as an element." | |||
| 440 | (defface blank-line-face | 440 | (defface blank-line-face |
| 441 | '((((class mono)) (:inverse-video t :bold t :underline t)) | 441 | '((((class mono)) (:inverse-video t :bold t :underline t)) |
| 442 | (t (:background "gray20" :foreground "violet"))) | 442 | (t (:background "gray20" :foreground "violet"))) |
| 443 | "Face used to visualise \"long\" lines. | 443 | "Face used to visualize \"long\" lines. |
| 444 | 444 | ||
| 445 | See `blank-line-length'." | 445 | See `blank-line-length'." |
| 446 | :group 'blank) | 446 | :group 'blank) |
| 447 | 447 | ||
| 448 | 448 | ||
| 449 | (defcustom blank-space-before-tab-face 'blank-space-before-tab-face | 449 | (defcustom blank-space-before-tab-face 'blank-space-before-tab-face |
| 450 | "*Symbol face used to visualise SPACEs before TAB. | 450 | "*Symbol face used to visualize SPACEs before TAB. |
| 451 | 451 | ||
| 452 | Used when `blank-style' has `color' as an element." | 452 | Used when `blank-style' has `color' as an element." |
| 453 | :type 'face | 453 | :type 'face |
| @@ -457,7 +457,7 @@ Used when `blank-style' has `color' as an element." | |||
| 457 | (defface blank-space-before-tab-face | 457 | (defface blank-space-before-tab-face |
| 458 | '((((class mono)) (:inverse-video t :bold t :underline t)) | 458 | '((((class mono)) (:inverse-video t :bold t :underline t)) |
| 459 | (t (:background "DarkOrange" :foreground "firebrick"))) | 459 | (t (:background "DarkOrange" :foreground "firebrick"))) |
| 460 | "Face used to visualise SPACEs before TAB." | 460 | "Face used to visualize SPACEs before TAB." |
| 461 | :group 'blank) | 461 | :group 'blank) |
| 462 | 462 | ||
| 463 | 463 | ||
| @@ -469,18 +469,18 @@ If you're using `mule' package, it may exist other characters besides: | |||
| 469 | 469 | ||
| 470 | \"\\xA0\" \"\\x8A0\" \"\\x920\" \"\\xE20\" \"\\xF20\" | 470 | \"\\xA0\" \"\\x8A0\" \"\\x920\" \"\\xE20\" \"\\xF20\" |
| 471 | 471 | ||
| 472 | that it should be considered HARD SPACE. | 472 | that should be considered HARD SPACE. |
| 473 | 473 | ||
| 474 | Here are some examples: | 474 | Here are some examples: |
| 475 | 475 | ||
| 476 | \"\\\\(^\\xA0+\\\\)\" \ | 476 | \"\\\\(^\\xA0+\\\\)\" \ |
| 477 | visualise only leading HARD SPACEs. | 477 | visualize only leading HARD SPACEs. |
| 478 | \"\\\\(\\xA0+$\\\\)\" \ | 478 | \"\\\\(\\xA0+$\\\\)\" \ |
| 479 | visualise only trailing HARD SPACEs. | 479 | visualize only trailing HARD SPACEs. |
| 480 | \"\\\\(^\\xA0+\\\\|\\xA0+$\\\\)\" \ | 480 | \"\\\\(^\\xA0+\\\\|\\xA0+$\\\\)\" \ |
| 481 | visualise leading and/or trailing HARD SPACEs. | 481 | visualize leading and/or trailing HARD SPACEs. |
| 482 | \"\\t\\\\(\\xA0+\\\\)\\t\" \ | 482 | \"\\t\\\\(\\xA0+\\\\)\\t\" \ |
| 483 | visualise only HARD SPACEs between TABs. | 483 | visualize only HARD SPACEs between TABs. |
| 484 | 484 | ||
| 485 | NOTE: Enclose always by \\\\( and \\\\) the elements to highlight. | 485 | NOTE: Enclose always by \\\\( and \\\\) the elements to highlight. |
| 486 | Use exactly one pair of enclosing \\\\( and \\\\). | 486 | Use exactly one pair of enclosing \\\\( and \\\\). |
| @@ -495,15 +495,15 @@ Used when `blank-style' has `color' as an element, and | |||
| 495 | "*Specify SPACE characters regexp. | 495 | "*Specify SPACE characters regexp. |
| 496 | 496 | ||
| 497 | If you're using `mule' package, it may exist other characters | 497 | If you're using `mule' package, it may exist other characters |
| 498 | besides \" \" that it should be considered SPACE. | 498 | besides \" \" that should be considered SPACE. |
| 499 | 499 | ||
| 500 | Here are some examples: | 500 | Here are some examples: |
| 501 | 501 | ||
| 502 | \"\\\\(^ +\\\\)\" visualise only leading SPACEs. | 502 | \"\\\\(^ +\\\\)\" visualize only leading SPACEs. |
| 503 | \"\\\\( +$\\\\)\" visualise only trailing SPACEs. | 503 | \"\\\\( +$\\\\)\" visualize only trailing SPACEs. |
| 504 | \"\\\\(^ +\\\\| +$\\\\)\" \ | 504 | \"\\\\(^ +\\\\| +$\\\\)\" \ |
| 505 | visualise leading and/or trailing SPACEs. | 505 | visualize leading and/or trailing SPACEs. |
| 506 | \"\\t\\\\( +\\\\)\\t\" visualise only SPACEs between TABs. | 506 | \"\\t\\\\( +\\\\)\\t\" visualize only SPACEs between TABs. |
| 507 | 507 | ||
| 508 | NOTE: Enclose always by \\\\( and \\\\) the elements to highlight. | 508 | NOTE: Enclose always by \\\\( and \\\\) the elements to highlight. |
| 509 | Use exactly one pair of enclosing \\\\( and \\\\). | 509 | Use exactly one pair of enclosing \\\\( and \\\\). |
| @@ -518,15 +518,15 @@ Used when `blank-style' has `color' as an element, and | |||
| 518 | "*Specify TAB characters regexp. | 518 | "*Specify TAB characters regexp. |
| 519 | 519 | ||
| 520 | If you're using `mule' package, it may exist other characters | 520 | If you're using `mule' package, it may exist other characters |
| 521 | besides \"\\t\" that it should be considered TAB. | 521 | besides \"\\t\" that should be considered TAB. |
| 522 | 522 | ||
| 523 | Here are some examples: | 523 | Here are some examples: |
| 524 | 524 | ||
| 525 | \"\\\\(^\\t+\\\\)\" visualise only leading TABs. | 525 | \"\\\\(^\\t+\\\\)\" visualize only leading TABs. |
| 526 | \"\\\\(\\t+$\\\\)\" visualise only trailing TABs. | 526 | \"\\\\(\\t+$\\\\)\" visualize only trailing TABs. |
| 527 | \"\\\\(^\\t+\\\\|\\t+$\\\\)\" \ | 527 | \"\\\\(^\\t+\\\\|\\t+$\\\\)\" \ |
| 528 | visualise leading and/or trailing TABs. | 528 | visualize leading and/or trailing TABs. |
| 529 | \" \\\\(\\t+\\\\) \" visualise only TABs between SPACEs. | 529 | \" \\\\(\\t+\\\\) \" visualize only TABs between SPACEs. |
| 530 | 530 | ||
| 531 | NOTE: Enclose always by \\\\( and \\\\) the elements to highlight. | 531 | NOTE: Enclose always by \\\\( and \\\\) the elements to highlight. |
| 532 | Use exactly one pair of enclosing \\\\( and \\\\). | 532 | Use exactly one pair of enclosing \\\\( and \\\\). |
| @@ -546,9 +546,9 @@ If you're using `mule' package, it may exist other characters besides: | |||
| 546 | \" \" \"\\t\" \"\\xA0\" \"\\x8A0\" \"\\x920\" \"\\xE20\" \ | 546 | \" \" \"\\t\" \"\\xA0\" \"\\x8A0\" \"\\x920\" \"\\xE20\" \ |
| 547 | \"\\xF20\" | 547 | \"\\xF20\" |
| 548 | 548 | ||
| 549 | that it should be considered blank. | 549 | that should be considered blank. |
| 550 | 550 | ||
| 551 | NOTE: DOES NOT enclose by \\\\( and \\\\) the elements to highlight. | 551 | NOTE: DO NOT enclose by \\\\( and \\\\) the elements to highlight. |
| 552 | `blank-mode' surrounds this regexp by \"\\\\(\\\\(\" and | 552 | `blank-mode' surrounds this regexp by \"\\\\(\\\\(\" and |
| 553 | \"\\\\)+\\\\)$\". | 553 | \"\\\\)+\\\\)$\". |
| 554 | 554 | ||
| @@ -566,7 +566,7 @@ If you're using `mule' package, it may exist other characters besides: | |||
| 566 | \" \" \"\\t\" \"\\xA0\" \"\\x8A0\" \"\\x920\" \"\\xE20\" \ | 566 | \" \" \"\\t\" \"\\xA0\" \"\\x8A0\" \"\\x920\" \"\\xE20\" \ |
| 567 | \"\\xF20\" | 567 | \"\\xF20\" |
| 568 | 568 | ||
| 569 | that it should be considered blank. | 569 | that should be considered blank. |
| 570 | 570 | ||
| 571 | Used when `blank-style' has `color' as an element, and | 571 | Used when `blank-style' has `color' as an element, and |
| 572 | `blank-chars' has `space-before-tab' as an element." | 572 | `blank-chars' has `space-before-tab' as an element." |
| @@ -627,7 +627,7 @@ VECTOR is a vector of characters to be displayed in place of CHAR. | |||
| 627 | 627 | ||
| 628 | The NEWLINE character is displayed using the face given by | 628 | The NEWLINE character is displayed using the face given by |
| 629 | `blank-newline-face' variable. The characters in the vector to be | 629 | `blank-newline-face' variable. The characters in the vector to be |
| 630 | displayed will not have applied this face if the character code is | 630 | displayed will not have this face applied if the character code is |
| 631 | above #x1FFFF. | 631 | above #x1FFFF. |
| 632 | 632 | ||
| 633 | Used when `blank-style' has `mark' as an element." | 633 | Used when `blank-style' has `mark' as an element." |
| @@ -650,7 +650,7 @@ Global `blank-mode' is controlled by the command `global-blank-mode'. | |||
| 650 | If nil, means no modes have `blank-mode' automatically turned on. | 650 | If nil, means no modes have `blank-mode' automatically turned on. |
| 651 | If t, all modes that support `blank-mode' have it automatically | 651 | If t, all modes that support `blank-mode' have it automatically |
| 652 | turned on. | 652 | turned on. |
| 653 | If a list, it should be a list of `major-mode' symbol names for | 653 | Else it should be a list of `major-mode' symbol names for |
| 654 | which `blank-mode' should be automatically turned on. The sense | 654 | which `blank-mode' should be automatically turned on. The sense |
| 655 | of the list is negated if it begins with `not'. For example: | 655 | of the list is negated if it begins with `not'. For example: |
| 656 | 656 | ||
| @@ -674,11 +674,11 @@ modes only." | |||
| 674 | 674 | ||
| 675 | ;;;###autoload | 675 | ;;;###autoload |
| 676 | (define-minor-mode blank-mode | 676 | (define-minor-mode blank-mode |
| 677 | "Toggle blank minor mode visualisation (bl on modeline). | 677 | "Toggle blank minor mode visualization (\"bl\" on modeline). |
| 678 | 678 | ||
| 679 | If ARG is null, toggle blank visualisation. | 679 | If ARG is null, toggle blank visualization. |
| 680 | If ARG is a number and is greater than zero, turn on | 680 | If ARG is a number greater than zero, turn on visualization; |
| 681 | visualisation; otherwise, turn off visualisation. | 681 | otherwise, turn off visualization. |
| 682 | Only useful with a windowing system." | 682 | Only useful with a windowing system." |
| 683 | :lighter " bl" | 683 | :lighter " bl" |
| 684 | :init-value nil | 684 | :init-value nil |
| @@ -698,11 +698,11 @@ Only useful with a windowing system." | |||
| 698 | 698 | ||
| 699 | 699 | ||
| 700 | (define-minor-mode global-blank-mode | 700 | (define-minor-mode global-blank-mode |
| 701 | "Toggle blank global minor mode visualisation (BL on modeline). | 701 | "Toggle blank global minor mode visualization (\"BL\" on modeline). |
| 702 | 702 | ||
| 703 | If ARG is null, toggle blank visualisation. | 703 | If ARG is null, toggle blank visualization. |
| 704 | If ARG is a number and is greater than zero, turn on | 704 | If ARG is a number greater than zero, turn on visualization; |
| 705 | visualisation; otherwise, turn off visualisation. | 705 | otherwise, turn off visualization. |
| 706 | Only useful with a windowing system." | 706 | Only useful with a windowing system." |
| 707 | :lighter " BL" | 707 | :lighter " BL" |
| 708 | :init-value nil | 708 | :init-value nil |
| @@ -766,14 +766,14 @@ Only useful with a windowing system." | |||
| 766 | lines | 766 | lines |
| 767 | newline | 767 | newline |
| 768 | ) | 768 | ) |
| 769 | "List of valid `blank-chars' value.") | 769 | "List of valid `blank-chars' values.") |
| 770 | 770 | ||
| 771 | 771 | ||
| 772 | (defconst blank-style-value-list | 772 | (defconst blank-style-value-list |
| 773 | '(color | 773 | '(color |
| 774 | mark | 774 | mark |
| 775 | ) | 775 | ) |
| 776 | "List of valid `blank-style' value.") | 776 | "List of valid `blank-style' values.") |
| 777 | 777 | ||
| 778 | 778 | ||
| 779 | (defconst blank-toggle-option-alist | 779 | (defconst blank-toggle-option-alist |
| @@ -824,27 +824,27 @@ restart local blank-mode. | |||
| 824 | Interactively, it reads one of the following chars: | 824 | Interactively, it reads one of the following chars: |
| 825 | 825 | ||
| 826 | CHAR MEANING | 826 | CHAR MEANING |
| 827 | t toggle TAB visualisation | 827 | t toggle TAB visualization |
| 828 | s toggle SPACE and HARD SPACE visualisation | 828 | s toggle SPACE and HARD SPACE visualization |
| 829 | r toggle trailing blanks visualisation | 829 | r toggle trailing blanks visualization |
| 830 | b toggle SPACEs before TAB visualisation | 830 | b toggle SPACEs before TAB visualization |
| 831 | l toggle \"long lines\" visualisation | 831 | l toggle \"long lines\" visualization |
| 832 | n toggle NEWLINE visualisation | 832 | n toggle NEWLINE visualization |
| 833 | c toggle color faces | 833 | c toggle color faces |
| 834 | m toggle visual mark | 834 | m toggle visual mark |
| 835 | x restore `blank-chars' value | 835 | x restore `blank-chars' value |
| 836 | z restore `blank-style' value | 836 | z restore `blank-style' value |
| 837 | ? display brief help | 837 | ? display brief help |
| 838 | 838 | ||
| 839 | Non-interactively, ARG should be a symbol or a list of symbol. | 839 | Non-interactively, ARG should be a symbol or a list of symbols. |
| 840 | The valid symbols are: | 840 | The valid symbols are: |
| 841 | 841 | ||
| 842 | tabs toggle TAB visualisation | 842 | tabs toggle TAB visualization |
| 843 | spaces toggle SPACE and HARD SPACE visualisation | 843 | spaces toggle SPACE and HARD SPACE visualization |
| 844 | trailing toggle trailing blanks visualisation | 844 | trailing toggle trailing blanks visualization |
| 845 | space-before-tab toggle SPACEs before TAB visualisation | 845 | space-before-tab toggle SPACEs before TAB visualization |
| 846 | lines toggle \"long lines\" visualisation | 846 | lines toggle \"long lines\" visualization |
| 847 | newline toggle NEWLINE visualisation | 847 | newline toggle NEWLINE visualization |
| 848 | color toggle color faces | 848 | color toggle color faces |
| 849 | mark toggle visual mark | 849 | mark toggle visual mark |
| 850 | blank-chars restore `blank-chars' value | 850 | blank-chars restore `blank-chars' value |
| @@ -881,27 +881,27 @@ restart global blank-mode. | |||
| 881 | Interactively, it reads one of the following chars: | 881 | Interactively, it reads one of the following chars: |
| 882 | 882 | ||
| 883 | CHAR MEANING | 883 | CHAR MEANING |
| 884 | t toggle TAB visualisation | 884 | t toggle TAB visualization |
| 885 | s toggle SPACE and HARD SPACE visualisation | 885 | s toggle SPACE and HARD SPACE visualization |
| 886 | r toggle trailing blanks visualisation | 886 | r toggle trailing blanks visualization |
| 887 | b toggle SPACEs before TAB visualisation | 887 | b toggle SPACEs before TAB visualization |
| 888 | l toggle \"long lines\" visualisation | 888 | l toggle \"long lines\" visualization |
| 889 | n toggle NEWLINE visualisation | 889 | n toggle NEWLINE visualization |
| 890 | c toggle color faces | 890 | c toggle color faces |
| 891 | m toggle visual mark | 891 | m toggle visual mark |
| 892 | x restore `blank-chars' value | 892 | x restore `blank-chars' value |
| 893 | z restore `blank-style' value | 893 | z restore `blank-style' value |
| 894 | ? display brief help | 894 | ? display brief help |
| 895 | 895 | ||
| 896 | Non-interactively, ARG should be a symbol or a list of symbol. | 896 | Non-interactively, ARG should be a symbol or a list of symbols. |
| 897 | The valid symbols are: | 897 | The valid symbols are: |
| 898 | 898 | ||
| 899 | tabs toggle TAB visualisation | 899 | tabs toggle TAB visualization |
| 900 | spaces toggle SPACE and HARD SPACE visualisation | 900 | spaces toggle SPACE and HARD SPACE visualization |
| 901 | trailing toggle trailing blanks visualisation | 901 | trailing toggle trailing blanks visualization |
| 902 | space-before-tab toggle SPACEs before TAB visualisation | 902 | space-before-tab toggle SPACEs before TAB visualization |
| 903 | lines toggle \"long lines\" visualisation | 903 | lines toggle \"long lines\" visualization |
| 904 | newline toggle NEWLINE visualisation | 904 | newline toggle NEWLINE visualization |
| 905 | color toggle color faces | 905 | color toggle color faces |
| 906 | mark toggle visual mark | 906 | mark toggle visual mark |
| 907 | blank-chars restore `blank-chars' value | 907 | blank-chars restore `blank-chars' value |
| @@ -942,12 +942,12 @@ Only useful with a windowing system." | |||
| 942 | "\ | 942 | "\ |
| 943 | blank-mode toggle options: | 943 | blank-mode toggle options: |
| 944 | 944 | ||
| 945 | [] t - toggle TAB visualisation | 945 | [] t - toggle TAB visualization |
| 946 | [] s - toggle SPACE and HARD SPACE visualisation | 946 | [] s - toggle SPACE and HARD SPACE visualization |
| 947 | [] r - toggle trailing blanks visualisation | 947 | [] r - toggle trailing blanks visualization |
| 948 | [] b - toggle SPACEs before TAB visualisation | 948 | [] b - toggle SPACEs before TAB visualization |
| 949 | [] l - toggle \"long lines\" visualisation | 949 | [] l - toggle \"long lines\" visualization |
| 950 | [] n - toggle NEWLINE visualisation | 950 | [] n - toggle NEWLINE visualization |
| 951 | 951 | ||
| 952 | [] c - toggle color faces | 952 | [] c - toggle color faces |
| 953 | [] m - toggle visual mark | 953 | [] m - toggle visual mark |
| @@ -1013,12 +1013,12 @@ uses a global context. | |||
| 1013 | It reads one of the following chars: | 1013 | It reads one of the following chars: |
| 1014 | 1014 | ||
| 1015 | CHAR MEANING | 1015 | CHAR MEANING |
| 1016 | t toggle TAB visualisation | 1016 | t toggle TAB visualization |
| 1017 | s toggle SPACE and HARD SPACE visualisation | 1017 | s toggle SPACE and HARD SPACE visualization |
| 1018 | r toggle trailing blanks visualisation | 1018 | r toggle trailing blanks visualization |
| 1019 | b toggle SPACEs before TAB visualisation | 1019 | b toggle SPACEs before TAB visualization |
| 1020 | l toggle \"long lines\" visualisation | 1020 | l toggle \"long lines\" visualization |
| 1021 | n toggle NEWLINE visualisation | 1021 | n toggle NEWLINE visualization |
| 1022 | c toggle color faces | 1022 | c toggle color faces |
| 1023 | m toggle visual mark | 1023 | m toggle visual mark |
| 1024 | x restore `blank-chars' value | 1024 | x restore `blank-chars' value |
| @@ -1098,7 +1098,7 @@ options are valid." | |||
| 1098 | 1098 | ||
| 1099 | 1099 | ||
| 1100 | (defun blank-turn-on () | 1100 | (defun blank-turn-on () |
| 1101 | "Turn on blank visualisation." | 1101 | "Turn on blank visualization." |
| 1102 | (setq blank-active-style (if (listp blank-style) | 1102 | (setq blank-active-style (if (listp blank-style) |
| 1103 | blank-style | 1103 | blank-style |
| 1104 | (list blank-style))) | 1104 | (list blank-style))) |
| @@ -1112,7 +1112,7 @@ options are valid." | |||
| 1112 | 1112 | ||
| 1113 | 1113 | ||
| 1114 | (defun blank-turn-off () | 1114 | (defun blank-turn-off () |
| 1115 | "Turn off blank visualisation." | 1115 | "Turn off blank visualization." |
| 1116 | (and (memq 'color blank-active-style) | 1116 | (and (memq 'color blank-active-style) |
| 1117 | (blank-color-off)) | 1117 | (blank-color-off)) |
| 1118 | (and (memq 'mark blank-active-style) | 1118 | (and (memq 'mark blank-active-style) |
| @@ -1120,7 +1120,7 @@ options are valid." | |||
| 1120 | 1120 | ||
| 1121 | 1121 | ||
| 1122 | (defun blank-color-on () | 1122 | (defun blank-color-on () |
| 1123 | "Turn on color visualisation." | 1123 | "Turn on color visualization." |
| 1124 | (when blank-active-chars | 1124 | (when blank-active-chars |
| 1125 | (unless blank-font-lock | 1125 | (unless blank-font-lock |
| 1126 | (setq blank-font-lock t | 1126 | (setq blank-font-lock t |
| @@ -1176,7 +1176,7 @@ options are valid." | |||
| 1176 | 1176 | ||
| 1177 | 1177 | ||
| 1178 | (defun blank-color-off () | 1178 | (defun blank-color-off () |
| 1179 | "Turn off color visualisation." | 1179 | "Turn off color visualization." |
| 1180 | (when blank-active-chars | 1180 | (when blank-active-chars |
| 1181 | (when blank-font-lock | 1181 | (when blank-font-lock |
| 1182 | (setq blank-font-lock nil | 1182 | (setq blank-font-lock nil |