Mercurial > emacs
annotate lisp/term/news.el @ 24419:30e478cd167e
(shell-command-default-error-buffer): Renamed from
shell-command-on-region-default-error-buffer.
(shell-command-on-region): Mention in echo area when there
is some error output. Mention success or failure, too.
Accumulate multiple error outputs
going forward, with formfeed in between. Display the error buffer
when we have put something in it.
(shell-command): Add the ERROR-BUFFER argument feature.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Mon, 01 Mar 1999 03:19:32 +0000 |
parents | 8f952e921136 |
children | 853c3674f20a |
rev | line source |
---|---|
17517 | 1 ;;; news.el --- keypad and function key bindings for the Sony NEWS keyboard |
2139
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
2 |
14170 | 3 ;; Copyright (C) 1989, 1993 Free Software Foundation, Inc. |
4 | |
2139
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
5 ;; Author: FSF |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
6 ;; Keywords: terminals |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
7 |
14170 | 8 ;; This file is part of GNU Emacs. |
9 | |
10 ;; GNU Emacs is free software; you can redistribute it and/or modify | |
11 ;; it under the terms of the GNU General Public License as published by | |
12 ;; the Free Software Foundation; either version 2, or (at your option) | |
13 ;; any later version. | |
30 | 14 |
14170 | 15 ;; GNU Emacs is distributed in the hope that it will be useful, |
16 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of | |
17 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
18 ;; GNU General Public License for more details. | |
19 | |
20 ;; You should have received a copy of the GNU General Public License | |
21 ;; along with GNU Emacs; see the file COPYING. If not, write to the | |
22 ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, | |
23 ;; Boston, MA 02111-1307, USA. | |
30 | 24 |
2139
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
25 ;;; Commentary: |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
26 |
14170 | 27 ;; Uses the Emacs 19 terminal initialization features --- won't work with 18. |
2139
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
28 |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
29 ;;; Code: |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
30 |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
31 (if (boundp 'news-fkey-prefix) |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
32 nil |
2240
8638238fa65f
Fix things so that bindings are added to the keymap already created by
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
2139
diff
changeset
|
33 ;; The terminal initialization should already have set up some keys |
8638238fa65f
Fix things so that bindings are added to the keymap already created by
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
2139
diff
changeset
|
34 (setq news-fkey-prefix (lookup-key function-key-map "\eO")) |
8638238fa65f
Fix things so that bindings are added to the keymap already created by
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
2139
diff
changeset
|
35 (if (not (keymapp news-fkey-prefix)) |
8638238fa65f
Fix things so that bindings are added to the keymap already created by
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
2139
diff
changeset
|
36 (error "What? Your news termcap/terminfo has no keycaps in it.")) |
30 | 37 |
2139
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
38 ;; Termcap or terminfo will set these |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
39 ;; (define-key news-fkey-prefix "P" [f1]) |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
40 ;; (define-key news-fkey-prefix "Q" [f2]) |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
41 ;; (define-key news-fkey-prefix "R" [f3]) |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
42 ;; (define-key news-fkey-prefix "S" [f4]) |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
43 ;; (define-key news-fkey-prefix "T" [f5]) |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
44 ;; (define-key news-fkey-prefix "U" [f6]) |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
45 ;; (define-key news-fkey-prefix "V" [f7]) |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
46 ;; (define-key news-fkey-prefix "W" [f8]) |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
47 ;; (define-key news-fkey-prefix "X" [f9]) |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
48 ;; (define-key news-fkey-prefix "Y" [f10]) |
30 | 49 |
2139
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
50 ;; Terminfo will set these |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
51 (define-key news-fkey-prefix "a" [execute]) |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
52 (define-key news-fkey-prefix "b" [select]) |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
53 (define-key news-fkey-prefix "c" [cancel]) |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
54 (define-key news-fkey-prefix "M" [kp-enter]) |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
55 (define-key news-fkey-prefix "q" [kp-1]) |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
56 (define-key news-fkey-prefix "s" [kp-3]) |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
57 (define-key news-fkey-prefix "u" [kp-5]) |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
58 (define-key news-fkey-prefix "w" [kp-7]) |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
59 (define-key news-fkey-prefix "y" [kp-9]) |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
60 |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
61 ;; These aren't in either termcap or terminfo's repertoire |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
62 (define-key news-fkey-prefix "m" [kp-subtract]) |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
63 (define-key news-fkey-prefix "k" [kp-add]) |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
64 (define-key news-fkey-prefix "l" [kp-separator]) |
8577
e4f634a14441
(news-fkey-prefix): Use kp-decimal, not kp-period.
Richard M. Stallman <rms@gnu.org>
parents:
3287
diff
changeset
|
65 (define-key news-fkey-prefix "n" [kp-decimal]) |
2139
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
66 (define-key news-fkey-prefix "p" [kp-0]) |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
67 (define-key news-fkey-prefix "r" [kp-2]) |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
68 (define-key news-fkey-prefix "t" [kp-4]) |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
69 (define-key news-fkey-prefix "v" [kp-6]) |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
70 (define-key news-fkey-prefix "x" [kp-8]) |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
71 ) |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
72 |
b43b95612c90
Added headers, changed a few cookie names.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
494
diff
changeset
|
73 ;;; news.el ends here |