39 |
|
|
40 |
Quick Start: |
Quick Start: |
41 |
|
|
42 |
To start the EDT Emulation, first start Emacs and then enter |
To start the EDT Emulation, first start Emacs and then enter |
43 |
|
|
44 |
M-x edt-emulation-on |
M-x edt-emulation-on |
45 |
|
|
46 |
to begin the emulation. After initialization is complete, the |
to begin the emulation. After initialization is complete, the |
47 |
following message will appear below the status line informing you |
following message will appear below the status line informing you |
48 |
that the emulation has been enabled: "Default EDT keymap active". |
that the emulation has been enabled: "Default EDT keymap active". |
64 |
edt-lk201.el - Built-in support for DEC LK-201 Keyboards |
edt-lk201.el - Built-in support for DEC LK-201 Keyboards |
65 |
edt-vt100.el - Built-in support for DEC VT-100 (and above) terminals |
edt-vt100.el - Built-in support for DEC VT-100 (and above) terminals |
66 |
edt-pc.el - Built-in support for PC 101 Keyboards under MS-DOS |
edt-pc.el - Built-in support for PC 101 Keyboards under MS-DOS |
67 |
edt-mapper.el - Create an EDT LK-201 Map File for Keyboards Without |
edt-mapper.el - Create an EDT LK-201 Map File for Keyboards Without |
68 |
Built-in Support |
Built-in Support |
69 |
|
|
70 |
Enhancements: |
Enhancements: |
80 |
following line |
following line |
81 |
|
|
82 |
(edt-set-scroll-margins "20%" "25%") |
(edt-set-scroll-margins "20%" "25%") |
83 |
|
|
84 |
sets the top margin to 20% of the window and the bottom margin |
sets the top margin to 20% of the window and the bottom margin |
85 |
to 25% of the window. To disable this feature, set each |
to 25% of the window. To disable this feature, set each |
86 |
margin to 0%. You can also invoke edt-set-scroll-margins |
margin to 0%. You can also invoke edt-set-scroll-margins |
90 |
NOTE: Another way to set the scroll margins is to use the |
NOTE: Another way to set the scroll margins is to use the |
91 |
Emacs customization feature (not available in Emacs 19) to set |
Emacs customization feature (not available in Emacs 19) to set |
92 |
the following two variables directly: |
the following two variables directly: |
93 |
|
|
94 |
edt-top-scroll-margin and edt-bottom-scroll-margin |
edt-top-scroll-margin and edt-bottom-scroll-margin |
95 |
|
|
96 |
Enter the Emacs `customize' command. First select the Editing |
Enter the Emacs `customize' command. First select the Editing |
97 |
group and then select the Emulations group. Finally, select |
group and then select the Emulations group. Finally, select |
98 |
the Edt group and follow the directions. |
the Edt group and follow the directions. |
99 |
|
|
100 |
2. The SUBS command is now supported and bound to GOLD-Enter by |
2. The SUBS command is now supported and bound to GOLD-Enter by |
101 |
default. (This design was copied from tpu-edt.el.) Note, in |
default. (This design was copied from tpu-edt.el.) Note, in |
102 |
earlier versions of EDT Emulation, GOLD-Enter was assigned to |
earlier versions of EDT Emulation, GOLD-Enter was assigned to |
152 |
1. Emulate EDT Keypad Mode commands closely so that current EDT users |
1. Emulate EDT Keypad Mode commands closely so that current EDT users |
153 |
will find that it easy and comfortable to use GNU Emacs with a |
will find that it easy and comfortable to use GNU Emacs with a |
154 |
small learning curve; |
small learning curve; |
155 |
|
|
156 |
2. Make it easy for a user to customize EDT emulation key bindings |
2. Make it easy for a user to customize EDT emulation key bindings |
157 |
without knowing much about Emacs Lisp; |
without knowing much about Emacs Lisp; |
158 |
|
|
164 |
|
|
165 |
5. Provide an easy way to restore ALL original Emacs key bindings, |
5. Provide an easy way to restore ALL original Emacs key bindings, |
166 |
just as they existed before the EDT emulation was first invoked. |
just as they existed before the EDT emulation was first invoked. |
167 |
|
|
168 |
6. Support GNU Emacs 19 and higher. (GNU Emacs 18 and below is no |
6. Support GNU Emacs 19 and higher. (GNU Emacs 18 and below is no |
169 |
longer supported.) XEmacs 19, and above, is also supported. |
longer supported.) XEmacs 19, and above, is also supported. |
170 |
|
|
191 |
|
|
192 |
(1) DEC VT-100 series and higher. This includes well behaved VT clones and |
(1) DEC VT-100 series and higher. This includes well behaved VT clones and |
193 |
emulators. If you are using a VT series terminal, be sure that the term |
emulators. If you are using a VT series terminal, be sure that the term |
194 |
environment variable is set properly before invoking emacs. |
environment variable is set properly before invoking emacs. |
195 |
|
|
196 |
(2) PC AT keyboard under MS-DOS. |
(2) PC AT keyboard under MS-DOS. |
197 |
|
|
198 |
Be sure to read the SPECIAL NOTES FOR SOME PLATFORMS sections to see if those |
Be sure to read the SPECIAL NOTES FOR SOME PLATFORMS sections to see if those |
199 |
notes apply to you. |
notes apply to you. |
251 |
|
|
252 |
The Sun Type 5 and other more recent Sun keyboards, however, do have |
The Sun Type 5 and other more recent Sun keyboards, however, do have |
253 |
separate arrow keys. This makes them candidates for setting up a |
separate arrow keys. This makes them candidates for setting up a |
254 |
reasonable EDT keypad emulation. |
reasonable EDT keypad emulation. |
255 |
|
|
256 |
Depending upon the configuration of the version of X installed on your |
Depending upon the configuration of the version of X installed on your |
257 |
system, you may find the default X keynames for the keypad keys don't |
system, you may find the default X keynames for the keypad keys don't |
258 |
permit Emacs to interpret some or all the keypad keys as something other |
permit Emacs to interpret some or all the keypad keys as something other |
259 |
than arrow keys, numeric keys, Home, PgUP, etc. Both Sun and HP have been |
than arrow keys, numeric keys, Home, PgUP, etc. Both Sun and HP have been |
260 |
particularly guilty of making bizarre keysym assignments to the keypad |
particularly guilty of making bizarre keysym assignments to the keypad |
261 |
keys. |
keys. |
262 |
|
|
263 |
In most cases, the X Windows command, xmodmap, can be used to correct the |
In most cases, the X Windows command, xmodmap, can be used to correct the |
264 |
problem. Here's a sample .xmodmaprc file which corrects this problem on |
problem. Here's a sample .xmodmaprc file which corrects this problem on |
303 |
|
|
304 |
changes the X Windows name of the keypad NumLock key to be known |
changes the X Windows name of the keypad NumLock key to be known |
305 |
internally as the F24 key. Doing so permits it to be configured to behave |
internally as the F24 key. Doing so permits it to be configured to behave |
306 |
as the PF1 (Gold) key. |
as the PF1 (Gold) key. |
307 |
|
|
308 |
The side effect of this change is that you will no longer have a NumLock |
The side effect of this change is that you will no longer have a NumLock |
309 |
key. If you are using other software under X which requires a NumLock |
key. If you are using other software under X which requires a NumLock |
332 |
xmodmap. |
xmodmap. |
333 |
|
|
334 |
On one distribution on an Intel PC, the following .xmodmaprc set things up |
On one distribution on an Intel PC, the following .xmodmaprc set things up |
335 |
nicely. |
nicely. |
336 |
|
|
337 |
! File: .xmodmaprc |
! File: .xmodmaprc |
338 |
! |
! |
339 |
! Set up PC keypad under GNU/Linux for the GNU Emacs EDT Emulation |
! Set up PC keypad under GNU/Linux for the GNU Emacs EDT Emulation |
340 |
! |
! |
341 |
clear mod2 |
clear mod2 |
342 |
keycode 77 = F12 |
keycode 77 = F12 |
411 |
|
|
412 |
! File: .xmodmaprc |
! File: .xmodmaprc |
413 |
! |
! |
414 |
! Set up PC keypad under GNU/Linux for the GNU Emacs EDT Emulation |
! Set up PC keypad under GNU/Linux for the GNU Emacs EDT Emulation |
415 |
! |
! |
416 |
clear mod2 |
clear mod2 |
417 |
keycode 77 = F12 |
keycode 77 = F12 |
424 |
|
|
425 |
Now, edt-mapper.el will see "f12" when the physical NumLock key |
Now, edt-mapper.el will see "f12" when the physical NumLock key |
426 |
is pressed, allowing the NumLock key to be used as the EDT PF1 |
is pressed, allowing the NumLock key to be used as the EDT PF1 |
427 |
(Gold) key. |
(Gold) key. |
428 |
|
|
429 |
V. HOW DOES THIS EDT EMULATION DIFFER FROM REAL EDT?: |
V. HOW DOES THIS EDT EMULATION DIFFER FROM REAL EDT?: |
430 |
|
|
432 |
all, of EDT's most used Keypad Mode editing functions and behavior. It is not |
all, of EDT's most used Keypad Mode editing functions and behavior. It is not |
433 |
perfect, but most EDT users who have tried the emulation agree that it is |
perfect, but most EDT users who have tried the emulation agree that it is |
434 |
quite good enough to make it easy for die-hard EDT users to move over to using |
quite good enough to make it easy for die-hard EDT users to move over to using |
435 |
GNU Emacs. |
GNU Emacs. |
436 |
|
|
437 |
Here's a list of the most important differences between EDT and this GNU Emacs |
Here's a list of the most important differences between EDT and this GNU Emacs |
438 |
EDT Emulation. The list is short but you must be aware of these differences |
EDT Emulation. The list is short but you must be aware of these differences |
497 |
to GOLD C-k in the default EDT mode when EDT control sequence bindings are |
to GOLD C-k in the default EDT mode when EDT control sequence bindings are |
498 |
enabled or one of the sample edt-user.el customization files is used. |
enabled or one of the sample edt-user.el customization files is used. |
499 |
|
|
500 |
2. Direction support is fully supported. |
2. Direction support is fully supported. |
501 |
|
|
502 |
3. All original Emacs bindings are fully restored when EDT emulation is turned |
3. All original Emacs bindings are fully restored when EDT emulation is turned |
503 |
off. So, if a fellow worker comes over to your terminal to help you with a |
off. So, if a fellow worker comes over to your terminal to help you with a |
570 |
|
|
571 |
15. The original EDT emulation package set up many default regular and GOLD |
15. The original EDT emulation package set up many default regular and GOLD |
572 |
bindings. We tried to preserve most (but not all!) of these, so users of |
bindings. We tried to preserve most (but not all!) of these, so users of |
573 |
the original emulation package will feel more at home. |
the original emulation package will feel more at home. |
574 |
|
|
575 |
Nevertheless, there are still many GOLD key sequences which are not bound |
Nevertheless, there are still many GOLD key sequences which are not bound |
576 |
to any functions. These are prime candidates to use for your own |
to any functions. These are prime candidates to use for your own |
577 |
customizations. |
customizations. |
578 |
|
|
579 |
Also, there are several commands in edt.el not bound to any key. So, you |
Also, there are several commands in edt.el not bound to any key. So, you |
580 |
will find it worthwhile to look through edt.el for functions you may wish |
will find it worthwhile to look through edt.el for functions you may wish |
581 |
to add to your personal customized bindings. |
to add to your personal customized bindings. |
630 |
|
|
631 |
NOTE: A few sites have different load-path requirements, so the above |
NOTE: A few sites have different load-path requirements, so the above |
632 |
directions may need some modification if your site has such special |
directions may need some modification if your site has such special |
633 |
needs. |
needs. |
634 |
|
|
635 |
|
|
636 |
Creating your own edt-user.el file: |
Creating your own edt-user.el file: |
640 |
bindings to your own liking. Names used to identify the set of LK-201 |
bindings to your own liking. Names used to identify the set of LK-201 |
641 |
keypad and function keys are: |
keypad and function keys are: |
642 |
|
|
643 |
Keypad Keys: |
Keypad Keys: |
644 |
PF1 PF2 PF3 PF4 |
PF1 PF2 PF3 PF4 |
645 |
KP7 KP8 KP9 KP- |
KP7 KP8 KP9 KP- |
646 |
KP4 KP5 KP6 KP, |
KP4 KP5 KP6 KP, |
647 |
KP1 KP2 KP3 |
KP1 KP2 KP3 |
648 |
KP0 KPP KPE |
KP0 KPP KPE |
649 |
|
|
650 |
Arrow Keys: |
Arrow Keys: |
654 |
F1 F2 F3 F4 F5 F6 F7 F8 F9 F10 F11 F12 F13 F14 |
F1 F2 F3 F4 F5 F6 F7 F8 F9 F10 F11 F12 F13 F14 |
655 |
HELP DO F17 F18 F19 F20 |
HELP DO F17 F18 F19 F20 |
656 |
|
|
657 |
FIND INSERT REMOVE |
FIND INSERT REMOVE |
658 |
SELECT PREVIOUS NEXT |
SELECT PREVIOUS NEXT |
659 |
|
|
660 |
Note: |
Note: |
737 |
edt-set-scroll-margins in your .emacs file. For example, the following line |
edt-set-scroll-margins in your .emacs file. For example, the following line |
738 |
|
|
739 |
(edt-set-scroll-margins "20%" "25%") |
(edt-set-scroll-margins "20%" "25%") |
740 |
|
|
741 |
sets the top margin to 20% of the window and the bottom margin to 25% of the |
sets the top margin to 20% of the window and the bottom margin to 25% of the |
742 |
window. To disable this feature, set each margin to 0%. You can also invoke |
window. To disable this feature, set each margin to 0%. You can also invoke |
743 |
edt-set-scroll-margins interactively while EDT Emulation is active to change |
edt-set-scroll-margins interactively while EDT Emulation is active to change |
746 |
NOTE: Another way to set the scroll margins is to use the Emacs customization |
NOTE: Another way to set the scroll margins is to use the Emacs customization |
747 |
feature (not available in Emacs 19) to set the following two variables |
feature (not available in Emacs 19) to set the following two variables |
748 |
directly: |
directly: |
749 |
|
|
750 |
edt-top-scroll-margin and edt-bottom-scroll-margin |
edt-top-scroll-margin and edt-bottom-scroll-margin |
751 |
|
|
752 |
Enter the Emacs `customize' command. First select the Editing group and then |
Enter the Emacs `customize' command. First select the Editing group and then |
762 |
G-F9: Paste Rect Insert +----------+----------+----------+----------+ |
G-F9: Paste Rect Insert +----------+----------+----------+----------+ |
763 |
F10: Cut Rectangle |
F10: Cut Rectangle |
764 |
G-F10: Paste Rectangle |
G-F10: Paste Rectangle |
765 |
F11: ESC |
F11: ESC |
766 |
F12: Begining of Line +----------+----------+----------+----------+ |
F12: Beginning of Line +----------+----------+----------+----------+ |
767 |
G-F12: Delete Other Windows | GOLD | HELP | FNDNXT | DEL L | |
G-F12: Delete Other Windows | GOLD | HELP | FNDNXT | DEL L | |
768 |
F13: Delete to Begin of Word | (PF1) | (PF2) | (PF3) | (PF4) | |
F13: Delete to Begin of Word | (PF1) | (PF2) | (PF3) | (PF4) | |
769 |
HELP: Keypad Help |Mark Wisel|Desc Funct| FIND | UND L | |
HELP: Keypad Help |Mark Wisel|Desc Funct| FIND | UND L | |
784 |
C-t: Display the Time | (0) | (.) | Query | |
C-t: Display the Time | (0) | (.) | Query | |
785 |
C-u: Delete to Begin of Line | Open Line | RESET | Replace | |
C-u: Delete to Begin of Line | Open Line | RESET | Replace | |
786 |
C-v: Redraw Display +---------------------+----------+----------+ |
C-v: Redraw Display +---------------------+----------+----------+ |
787 |
C-w: Set Screen Width 132 |
C-w: Set Screen Width 132 |
788 |
C-z: Suspend Emacs +----------+----------+----------+ |
C-z: Suspend Emacs +----------+----------+----------+ |
789 |
G-C-\: Split Window | FNDNXT | Yank | CUT | |
G-C-\: Split Window | FNDNXT | Yank | CUT | |
790 |
| (FIND) | (INSERT) | (REMOVE) | |
| (FIND) | (INSERT) | (REMOVE) | |
817 |
G-`: What line |
G-`: What line |
818 |
G-/: Query-Replace |
G-/: Query-Replace |
819 |
|
|
820 |
;;; File: edt-user.el --- Sample User Customizations for the Enhanced |
;;; File: edt-user.el --- Sample User Customizations for the Enhanced |
821 |
;;; EDT Keypad Mode Emulation |
;;; EDT Keypad Mode Emulation |
822 |
;;; |
;;; |
823 |
;;; For GNU Emacs 19 and Above |
;;; For GNU Emacs 19 and Above |
824 |
;;; |
;;; |
825 |
;; Copyright (C) 1986, 1992, 1993, 2000 Free Software Foundation, Inc. |
;; Copyright (C) 1986, 1992, 1993, 2000 Free Software Foundation, Inc. |
875 |
(edt-bind-function-key "KP6" 'edt-cut-or-copy 'yank) |
(edt-bind-function-key "KP6" 'edt-cut-or-copy 'yank) |
876 |
(edt-bind-function-key "KP8" 'edt-scroll-window 'fill-paragraph) |
(edt-bind-function-key "KP8" 'edt-scroll-window 'fill-paragraph) |
877 |
(edt-bind-function-key "KP9" 'open-line 'edt-eliminate-all-tabs) |
(edt-bind-function-key "KP9" 'open-line 'edt-eliminate-all-tabs) |
878 |
(edt-bind-function-key "KPP" |
(edt-bind-function-key "KPP" |
879 |
'edt-toggle-select 'edt-line-to-middle-of-window) |
'edt-toggle-select 'edt-line-to-middle-of-window) |
880 |
(edt-bind-function-key "KPE" 'edt-change-direction 'overwrite-mode) |
(edt-bind-function-key "KPE" 'edt-change-direction 'overwrite-mode) |
881 |
|
|
916 |
F8: Cut Rect Overstrike | (UP) | (DOWN) | (LEFT) | (RIGHT) | |
F8: Cut Rect Overstrike | (UP) | (DOWN) | (LEFT) | (RIGHT) | |
917 |
G-F8: Paste Rect Overstrike |Window Top|Window Bot|Bkwd Sent |Frwd Sent | |
G-F8: Paste Rect Overstrike |Window Top|Window Bot|Bkwd Sent |Frwd Sent | |
918 |
F9: Cut Rect Insert +----------+----------+----------+----------+ |
F9: Cut Rect Insert +----------+----------+----------+----------+ |
919 |
G-F9: Paste Rect Insert |
G-F9: Paste Rect Insert |
920 |
F10: Cut Rectangle |
F10: Cut Rectangle |
921 |
G-F10: Paste Rectangle |
G-F10: Paste Rectangle |
922 |
F11: ESC +----------+----------+----------+----------+ |
F11: ESC +----------+----------+----------+----------+ |
923 |
F12: Begining of Line | GOLD |Query Repl| FNDNXT |Del Ent L | |
F12: Beginning of Line | GOLD |Query Repl| FNDNXT |Del Ent L | |
924 |
G-F12: Delete Other Windows | (PF1) | (PF2) | (PF3) | (PF4) | |
G-F12: Delete Other Windows | (PF1) | (PF2) | (PF3) | (PF4) | |
925 |
F13: Delete to Begin of Word |Mark Wisel|Other Wind| FIND | UND L | |
F13: Delete to Begin of Word |Mark Wisel|Other Wind| FIND | UND L | |
926 |
HELP: Keypad Help +----------+----------+----------+----------+ |
HELP: Keypad Help +----------+----------+----------+----------+ |
940 |
C-k: Define Key | (0) | (.) | Toggle | |
C-k: Define Key | (0) | (.) | Toggle | |
941 |
G-C-k: Restore Key | Open Line |Center Lin|Insrt/Over| |
G-C-k: Restore Key | Open Line |Center Lin|Insrt/Over| |
942 |
C-l: Learn +---------------------+----------+----------+ |
C-l: Learn +---------------------+----------+----------+ |
943 |
C-n: Set Screen Width 80 |
C-n: Set Screen Width 80 |
944 |
C-o: Open Line +----------+----------+----------+ |
C-o: Open Line +----------+----------+----------+ |
945 |
C-p: Fill Paragraph | FNDNXT | Yank | CUT | |
C-p: Fill Paragraph | FNDNXT | Yank | CUT | |
946 |
C-q: Quoted Insert | (FIND)) | (INSERT) | (REMOVE) | |
C-q: Quoted Insert | (FIND)) | (INSERT) | (REMOVE) | |