![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to shell CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Research Unix] / researchv9 / cmd / emacs / macros|
Return to shell CVS log | Up to [Research Unix] / researchv9 / cmd / emacs / macros |
1.1 root 1: � edits the shell command file [MACRO]
2:
3: Shell command execution macros for Version 4.4 and later
4:
5: Joe Steffen and Bill Paulson
6:
7: This set of macros allows convenient execution of shell commands
8: inside emacs. Shell commands are kept in a "hidden" file
9: named $HOME/.commands. Use � to edit or move the line pointer in
10: this file. Exit from M-E by ^Z. M-C displays the current line in
11: this file in case you forget. M-N and M-P move the cursor down and up,
12: respectively, in the file and display the current line. They take an
13: argument just like ^N and ^P. These commands make it easy to switch
14: between several command lines without using the M-E macro.
15: M-^E will execute the current line in the command file. If the
16: first character of the line is not '!', then any
17: output will be captured in .exec just like using �. On return
18: from execution, the current buffer will be displayed in the top window,
19: and .exec will be displayed in the lower window. The shell output can
20: then be examined as a regular buffer.
21: If the first character of the line is '!', the output will be
22: displayed on the screen as the command(s) are being executed
23: just like using �. This allows you to abort a program that is in an
24: infinite loop, or to enter program input interactively. Entering 'n'
25: in place of a space when you get the "Continue?" prompt will execute the
26: ^Xs macro described later.
27: Note that the command line can contain multiple commands separated
28: by semicolons. Since emacs allows a line to be several hundred
29: characters long, entire shell scripts can be executed.
30: Note also that you can use � while editing the command buffer
31: with �. Thus you can test the command line and quickly change it if
32: it contains an error.
33:
34: B save current buffer name
35: <$HOME/.commands
36: change to command file
37: recursively edit the command file
38: return to original buffer
39:
40: � displays the current line in shell command file [MACRO]
41: B save this buffer name
42: <$HOME/.commands
43: get the command file
44: &�� save commands line
45: 1> pull original buffer name to top of stack
46: return to the original buffer
47: 0@ display the commands line
48:
49: � displays (arg'th) next line in shell command file [MACRO]
50: B save this buffer name
51: <$HOME/.commands
52: get the command file
53: 1 move to next line
54: &�� save commands line
55: 1> pull original buffer name to top of stack
56: return to the original buffer
57: 0@ display the commands line
58:
59: � displays (arg'th) previous line in shell command file [MACRO]
60: B save this buffer name
61: <$HOME/.commands
62: get the command file
63: 1 move to previous line
64: &�� save commands line
65: 1> pull original buffer name to top of stack
66: return to the original buffer
67: 0@ display the commands line
68:
69: � executes current line in shell command file [MACRO]
70: 0<Executing Commands
71: 0 indicate that execution is in progress
72: B save this buffer name
73: <filename=
74: +F prepend "filename=<filename>;" to command
75: +<;
76: <$HOME/.commands
77: get the command file
78: &!� if the first char in the current line is a "!"
79: �! skip over the !
80: 12�- prepend the filename assignment
81: & save the commands line
82: 12�&- restore comand line
83: � mark file updated
84: 1> pull original buffer name to top of stack
85: restore buffer
86: <usilent
87: �0
turn off usilent mode (save old value)
88: � execute the line
89: <usilent
90:
restore old usilent mode value
91: !�-<Continue?
92: �ns� execute the shell if 'n' is entered
93: � otherwise exit
94: � if the first char is a $
95: �$ skip over the $
96: 12�- prepend the filename assignment
97: & save the commands line
98: 12�&- restore command line
99: � mark file updated
100: 1> pull original buffer name to top of stack
101: restore buffer
102: <usilent
103: �0
turn off usilent mode (save old value)
104: � execute the commands line & save the output
105: <usilent
106:
restore old usilent mode value
107: 1 ensure one window mode
108: <.exec
109: 20 display .exec in lower window
110: � mark it as updated to prevent junk file
111: switch to the top window
112: �
113: �� else
114: 12�- prepend the filename assignment
115: & save the commands line
116: 12�&- restore command line
117: � mark file updated
118: > pull original buffer name to top of stack
119: restore buffer
120: 0> duplicate commands line
121: 0@ display commands line
122: � execute the commands line & save the output
123: 1 ensure one window mode
124: <.exec
125: 20 display .exec in lower window
126: � mark it as updated to prevent junk file
127: switch to the top window
128: �
129: � endif
130: return to the original buffer
131:
132: s escapes to the shell (enter ^D to exit) [MACRO]
133:
134: Joe Steffen, Version 4.0
135:
136: This macro executes the shell interactively
137: instead of prompting for each command. This allows cd
138: commands to stay in effect and allows you to see the results of
139: several commands. The prompt is changed to 'emacs' to remind you
140: that you are still within emacs. Enter ^D instead of a null line to
141: return to emacs.
142: <usilent
143: �0
turn off usilent mode (save old value)
144: <export PS1; PS1='emacs ' exec ${SHELL:-/bin/sh} -i
145: � execute the shell interactively with a different prompt
146: <usilent
147:
restore old usilent mode value
148:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.