diff options
| author | Juanma Barranquero | 2003-02-04 11:26:42 +0000 |
|---|---|---|
| committer | Juanma Barranquero | 2003-02-04 11:26:42 +0000 |
| commit | 71296446d3cec5bb2a27bc5ad6da574df38d0ec8 (patch) | |
| tree | 0204c3c252547a44e2404959409034406f7680cd /lisp/flow-ctrl.el | |
| parent | 693ff6134cb2ec65c7d188696f012662edadfbf0 (diff) | |
| download | emacs-71296446d3cec5bb2a27bc5ad6da574df38d0ec8.tar.gz emacs-71296446d3cec5bb2a27bc5ad6da574df38d0ec8.zip | |
Trailing whitespace deleted.
Diffstat (limited to 'lisp/flow-ctrl.el')
| -rw-r--r-- | lisp/flow-ctrl.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/flow-ctrl.el b/lisp/flow-ctrl.el index f98ecaa0fb9..44b496357a4 100644 --- a/lisp/flow-ctrl.el +++ b/lisp/flow-ctrl.el | |||
| @@ -29,14 +29,14 @@ | |||
| 29 | ;; Terminals that use XON/XOFF flow control can cause problems with | 29 | ;; Terminals that use XON/XOFF flow control can cause problems with |
| 30 | ;; GNU Emacs users. This file contains Emacs Lisp code that makes it | 30 | ;; GNU Emacs users. This file contains Emacs Lisp code that makes it |
| 31 | ;; easy for a user to deal with this problem, when using such a | 31 | ;; easy for a user to deal with this problem, when using such a |
| 32 | ;; terminal. | 32 | ;; terminal. |
| 33 | ;; | 33 | ;; |
| 34 | ;; To invoke these adjustments, a user need only invoke the function | 34 | ;; To invoke these adjustments, a user need only invoke the function |
| 35 | ;; enable-flow-control-on with a list of terminal types in his/her own | 35 | ;; enable-flow-control-on with a list of terminal types in his/her own |
| 36 | ;; .emacs file. As arguments, give it the names of one or more terminal | 36 | ;; .emacs file. As arguments, give it the names of one or more terminal |
| 37 | ;; types in use by that user which require flow control adjustments. | 37 | ;; types in use by that user which require flow control adjustments. |
| 38 | ;; Here's an example: | 38 | ;; Here's an example: |
| 39 | ;; | 39 | ;; |
| 40 | ;; (enable-flow-control-on "vt200" "vt300" "vt101" "vt131") | 40 | ;; (enable-flow-control-on "vt200" "vt300" "vt101" "vt131") |
| 41 | 41 | ||
| 42 | ;; Portability note: This uses (getenv "TERM"), and therefore probably | 42 | ;; Portability note: This uses (getenv "TERM"), and therefore probably |
| @@ -96,7 +96,7 @@ With arg, enable flow control mode if arg is positive, otherwise disable." | |||
| 96 | (aset keyboard-translate-table flow-control-c-q-replacement ?\^q) | 96 | (aset keyboard-translate-table flow-control-c-q-replacement ?\^q) |
| 97 | (aset keyboard-translate-table ?\^q flow-control-c-q-replacement) | 97 | (aset keyboard-translate-table ?\^q flow-control-c-q-replacement) |
| 98 | (message "XON/XOFF adjustment for %s: use %s for C-s, and use %s for C-q" | 98 | (message "XON/XOFF adjustment for %s: use %s for C-s, and use %s for C-q" |
| 99 | (getenv "TERM") | 99 | (getenv "TERM") |
| 100 | (single-key-description flow-control-c-s-replacement) | 100 | (single-key-description flow-control-c-s-replacement) |
| 101 | (single-key-description flow-control-c-q-replacement)) | 101 | (single-key-description flow-control-c-q-replacement)) |
| 102 | (sleep-for 2))) ; Give user a chance to see message. | 102 | (sleep-for 2))) ; Give user a chance to see message. |