6558
|
1 @c -*-texinfo-*-
|
|
2 @c This is part of the GNU Emacs Lisp Reference Manual.
|
|
3 @c Copyright (C) 1990, 1991, 1992, 1993, 1994 Free Software Foundation, Inc.
|
|
4 @c See the file elisp.texi for copying conditions.
|
|
5 @setfilename ../info/os
|
|
6 @node System Interface, Display, Processes, Top
|
|
7 @chapter Operating System Interface
|
|
8
|
|
9 This chapter is about starting and getting out of Emacs, access to
|
|
10 values in the operating system environment, and terminal input, output
|
|
11 and flow control.
|
|
12
|
|
13 @xref{Building Emacs}, for related information. See also
|
|
14 @ref{Display}, for additional operating system status information
|
|
15 pertaining to the terminal and the screen.
|
|
16
|
|
17 @menu
|
|
18 * Starting Up:: Customizing Emacs start-up processing.
|
|
19 * Getting Out:: How exiting works (permanent or temporary).
|
|
20 * System Environment:: Distinguish the name and kind of system.
|
|
21 * User Identification:: Finding the name and user id of the user.
|
|
22 * Time of Day:: Getting the current time.
|
|
23 * Timers:: Setting a timer to call a function at a certain time.
|
|
24 * Terminal Input:: Recording terminal input for debugging.
|
|
25 * Terminal Output:: Recording terminal output for debugging.
|
|
26 * Special Keysyms:: Defining system-specific key symbols for X windows.
|
|
27 * Flow Control:: How to turn output flow control on or off.
|
|
28 * Batch Mode:: Running Emacs without terminal interaction.
|
|
29 @end menu
|
|
30
|
|
31 @node Starting Up
|
|
32 @section Starting Up Emacs
|
|
33
|
|
34 This section describes what Emacs does when it is started, and how you
|
|
35 can customize these actions.
|
|
36
|
|
37 @menu
|
|
38 * Start-up Summary:: Sequence of actions Emacs performs at start-up.
|
|
39 * Init File:: Details on reading the init file (@file{.emacs}).
|
|
40 * Terminal-Specific:: How the terminal-specific Lisp file is read.
|
|
41 * Command Line Arguments:: How command line arguments are processed,
|
|
42 and how you can customize them.
|
|
43 @end menu
|
|
44
|
|
45 @node Start-up Summary
|
|
46 @subsection Summary: Sequence of Actions at Start Up
|
|
47 @cindex initialization
|
|
48 @cindex start up of Emacs
|
|
49 @cindex @file{startup.el}
|
|
50
|
|
51 The order of operations performed (in @file{startup.el}) by Emacs when
|
|
52 it is started up is as follows:
|
|
53
|
|
54 @enumerate
|
|
55 @item
|
|
56 It loads the initialization library for the window system, if you are
|
|
57 using a window system. This library's name is
|
|
58 @file{term/@var{windowsystem}-win.el}.
|
|
59
|
|
60 @item
|
|
61 It initializes the X window frame and faces, if appropriate.
|
|
62
|
|
63 @item
|
|
64 It runs the normal hook @code{before-init-hook}.
|
|
65
|
|
66 @item
|
|
67 It loads the library @file{site-start}, unless the option
|
|
68 @samp{-no-site-file} was specified. The library's file name is usually
|
|
69 @file{site-start.el}.
|
|
70 @cindex @file{site-start.el}
|
|
71
|
|
72 @item
|
|
73 It loads the file @file{~/.emacs} unless @samp{-q} was specified on
|
|
74 command line. (This is not done in @samp{-batch} mode.) The @samp{-u}
|
|
75 option can specify the user name whose home directory should be used
|
|
76 instead of @file{~}.
|
|
77
|
|
78 @item
|
|
79 It loads the library @file{default} unless @code{inhibit-default-init}
|
|
80 is non-@code{nil}. (This is not done in @samp{-batch} mode or if
|
|
81 @samp{-q} was specified on command line.) The library's file name is
|
|
82 usually @file{default.el}.
|
|
83 @cindex @file{default.el}
|
|
84
|
|
85 @item
|
|
86 It runs the normal hook @code{after-init-hook}.
|
|
87
|
|
88 @item
|
|
89 It sets the major mode according to @code{initial-major-mode}, provided
|
|
90 the buffer @samp{*scratch*} is still current and still in Fundamental
|
|
91 mode.
|
|
92
|
|
93 @item
|
|
94 It loads the terminal-specific Lisp file, if any, except when in batch
|
|
95 mode or using a window system.
|
|
96
|
|
97 @item
|
|
98 It displays the initial echo area message, unless you have suppressed
|
|
99 that with @code{inhibit-startup-echo-area-message}.
|
|
100
|
|
101 @item
|
|
102 It processes any remaining command line arguments.
|
|
103
|
|
104 @item
|
|
105 It runs @code{term-setup-hook}.
|
|
106
|
|
107 @item
|
|
108 It calls @code{frame-notice-user-settings}, which modifies the
|
|
109 parameters of the selected frame according to whatever the init files
|
|
110 specify.
|
|
111
|
|
112 @item
|
|
113 It runs @code{window-setup-hook}. @xref{Window Systems}.
|
|
114
|
|
115 @item
|
|
116 It displays copyleft, nonwarranty and basic use information, provided
|
|
117 there were no remaining command line arguments (a few steps above) and
|
|
118 the value of @code{inhibit-startup-message} is @code{nil}.
|
|
119 @end enumerate
|
|
120
|
|
121 @defopt inhibit-startup-message
|
|
122 This variable inhibits the initial startup messages (the nonwarranty,
|
|
123 etc.). If it is non-@code{nil}, then the messages are not printed.
|
|
124
|
|
125 This variable exists so you can set it in your personal init file, once
|
|
126 you are familiar with the contents of the startup message. Do not set
|
|
127 this variable in the init file of a new user, or in a way that affects
|
|
128 more than one user, because that would prevent new users from receiving
|
|
129 the information they are supposed to see.
|
|
130 @end defopt
|
|
131
|
|
132 @defopt inhibit-startup-echo-area-message
|
|
133 This variable controls the display of the startup echo area message.
|
|
134 You can suppress the startup echo area message by adding text with this
|
|
135 form to your @file{.emacs} file:
|
|
136
|
|
137 @example
|
|
138 (setq inhibit-startup-echo-area-message
|
|
139 "@var{your-login-name}")
|
|
140 @end example
|
|
141
|
|
142 Simply setting @code{inhibit-startup-echo-area-message} to your login
|
|
143 name is not sufficient to inhibit the message; Emacs explicitly checks
|
|
144 whether @file{.emacs} contains an expression as shown above. Your login
|
|
145 name must appear in the expression as a Lisp string constant.
|
|
146
|
|
147 This way, you can easily inhibit the message for yourself if you wish,
|
|
148 but thoughtless copying of your @file{.emacs} file will not inhibit the
|
|
149 message for someone else.
|
|
150 @end defopt
|
|
151
|
|
152 @node Init File
|
|
153 @subsection The Init File: @file{.emacs}
|
|
154 @cindex init file
|
|
155 @cindex @file{.emacs}
|
|
156
|
|
157 When you start Emacs, it normally attempts to load the file
|
|
158 @file{.emacs} from your home directory. This file, if it exists, must
|
|
159 contain Lisp code. It is called your @dfn{init file}. The command line
|
|
160 switches @samp{-q} and @samp{-u} affect the use of the init file;
|
|
161 @samp{-q} says not to load an init file, and @samp{-u} says to load a
|
|
162 specified user's init file instead of yours. @xref{Entering Emacs, , ,
|
|
163 emacs, The GNU Emacs Manual}.
|
|
164
|
|
165 @cindex default init file
|
|
166 A site may have a @dfn{default init file}, which is the library named
|
|
167 @file{default.el}. Emacs finds the @file{default.el} file through the
|
|
168 standard search path for libraries (@pxref{How Programs Do Loading}).
|
|
169 The Emacs distribution does not come with this file; sites may provide
|
|
170 one for local customizations. If the default init file exists, it is
|
|
171 loaded whenever you start Emacs, except in batch mode or if @samp{-q} is
|
|
172 specified. But your own personal init file, if any, is loaded first; if
|
|
173 it sets @code{inhibit-default-init} to a non-@code{nil} value, then
|
|
174 Emacs does not subsequently load the @file{default.el} file.
|
|
175
|
|
176 Another file for site-customization is @file{site-start.el}. Emacs
|
|
177 loads this @emph{before} the user's init file. You can inhibit the
|
|
178 loading of this file with the option @samp{-no-site-file}.
|
|
179
|
|
180 If there is a great deal of code in your @file{.emacs} file, you
|
|
181 should move it into another file named @file{@var{something}.el},
|
|
182 byte-compile it (@pxref{Byte Compilation}), and make your @file{.emacs}
|
|
183 file load the other file using @code{load} (@pxref{Loading}).
|
|
184
|
|
185 @xref{Init File Examples, , , emacs, The GNU Emacs Manual}, for
|
|
186 examples of how to make various commonly desired customizations in your
|
|
187 @file{.emacs} file.
|
|
188
|
|
189 @defopt inhibit-default-init
|
|
190 This variable prevents Emacs from loading the default initialization
|
|
191 library file for your session of Emacs. If its value is non-@code{nil},
|
|
192 then the default library is not loaded. The default value is
|
|
193 @code{nil}.
|
|
194 @end defopt
|
|
195
|
|
196 @defvar before-init-hook
|
|
197 @defvarx after-init-hook
|
|
198 These two normal hooks are run just before, and just after, loading of
|
|
199 the user's init file, @file{default.el}, and/or @file{site-start.el}.
|
|
200 @end defvar
|
|
201
|
|
202 @node Terminal-Specific
|
|
203 @subsection Terminal-Specific Initialization
|
|
204 @cindex terminal-specific initialization
|
|
205
|
|
206 Each terminal type can have its own Lisp library that Emacs loads when
|
|
207 run on that type of terminal. For a terminal type named @var{termtype},
|
|
208 the library is called @file{term/@var{termtype}}. Emacs finds the file
|
|
209 by searching the @code{load-path} directories as it does for other
|
|
210 files, and trying the @samp{.elc} and @samp{.el} suffixes. Normally,
|
|
211 terminal-specific Lisp library is located in @file{emacs/lisp/term}, a
|
|
212 subdirectory of the @file{emacs/lisp} directory in which most Emacs Lisp
|
|
213 libraries are kept.@refill
|
|
214
|
|
215 The library's name is constructed by concatenating the value of the
|
|
216 variable @code{term-file-prefix} and the terminal type. Normally,
|
|
217 @code{term-file-prefix} has the value @code{"term/"}; changing this
|
|
218 is not recommended.
|
|
219
|
|
220 The usual function of a terminal-specific library is to enable special
|
|
221 keys to send sequences that Emacs can recognize. It may also need to
|
|
222 set or add to @code{function-key-map} if the Termcap entry does not
|
|
223 specify all the terminal's function keys. @xref{Terminal Input}.
|
|
224
|
|
225 @cindex Termcap
|
|
226 When the name of the terminal type contains a hyphen, only the part of
|
|
227 the name before the first hyphen is significant in choosing the library
|
|
228 name. Thus, terminal types @samp{aaa-48} and @samp{aaa-30-rv} both use
|
|
229 the @file{term/aaa} library. If necessary, the library can evaluate
|
|
230 @code{(getenv "TERM")} to find the full name of the terminal
|
|
231 type.@refill
|
|
232
|
|
233 Your @file{.emacs} file can prevent the loading of the
|
|
234 terminal-specific library by setting the variable
|
|
235 @code{term-file-prefix} to @code{nil}. This feature is useful when
|
|
236 experimenting with your own peculiar customizations.
|
|
237
|
|
238 You can also arrange to override some of the actions of the
|
|
239 terminal-specific library by setting the variable
|
|
240 @code{term-setup-hook}. This is a normal hook which Emacs runs using
|
|
241 @code{run-hooks} at the end of Emacs initialization, after loading both
|
|
242 your @file{.emacs} file and any terminal-specific libraries. You can
|
|
243 use this variable to define initializations for terminals that do not
|
|
244 have their own libraries. @xref{Hooks}.
|
|
245
|
|
246 @defvar term-file-prefix
|
|
247 @cindex @code{TERM} environment variable
|
|
248 If the @code{term-file-prefix} variable is non-@code{nil}, Emacs loads
|
|
249 a terminal-specific initialization file as follows:
|
|
250
|
|
251 @example
|
|
252 (load (concat term-file-prefix (getenv "TERM")))
|
|
253 @end example
|
|
254
|
|
255 @noindent
|
|
256 You may set the @code{term-file-prefix} variable to @code{nil} in your
|
|
257 @file{.emacs} file if you do not wish to load the
|
|
258 terminal-initialization file. To do this, put the following in
|
|
259 your @file{.emacs} file: @code{(setq term-file-prefix nil)}.
|
|
260 @end defvar
|
|
261
|
|
262 @defvar term-setup-hook
|
|
263 This variable is a normal hook which Emacs runs after loading your
|
|
264 @file{.emacs} file, the default initialization file (if any) and the
|
|
265 terminal-specific Lisp file.
|
|
266
|
|
267 You can use @code{term-setup-hook} to override the definitions made by a
|
|
268 terminal-specific file.
|
|
269 @end defvar
|
|
270
|
|
271 See @code{window-setup-hook} in @ref{Window Systems}, for a related
|
|
272 feature.
|
|
273
|
|
274 @node Command Line Arguments
|
|
275 @subsection Command Line Arguments
|
|
276 @cindex command line arguments
|
|
277
|
|
278 You can use command line arguments to request various actions when you
|
|
279 start Emacs. Since you do not need to start Emacs more than once per
|
|
280 day, and will often leave your Emacs session running longer than that,
|
|
281 command line arguments are hardly ever used. As a practical matter, it
|
|
282 is best to avoid making the habit of using them, since this habit would
|
|
283 encourage you to kill and restart Emacs unnecessarily often. These
|
|
284 options exist for two reasons: to be compatible with other editors (for
|
|
285 invocation by other programs) and to enable shell scripts to run
|
|
286 specific Lisp programs.
|
|
287
|
|
288 This section describes how Emacs processes command line arguments,
|
|
289 and how you can customize them.
|
|
290
|
|
291 @ignore
|
|
292 (Note that some other editors require you to start afresh each time
|
|
293 you want to edit a file. With this kind of editor, you will probably
|
|
294 specify the file as a command line argument. The recommended way to
|
|
295 use GNU Emacs is to start it only once, just after you log in, and do
|
|
296 all your editing in the same Emacs process. Each time you want to edit
|
|
297 a different file, you visit it with the existing Emacs, which eventually
|
|
298 comes to have many files in it ready for editing. Usually you do not
|
|
299 kill the Emacs until you are about to log out.)
|
|
300 @end ignore
|
|
301
|
|
302 @defun command-line
|
|
303 This function parses the command line which Emacs was called with,
|
|
304 processes it, loads the user's @file{.emacs} file and displays the
|
|
305 initial nonwarranty information, etc.
|
|
306 @end defun
|
|
307
|
|
308 @defvar command-line-processed
|
|
309 The value of this variable is @code{t} once the command line has been
|
|
310 processed.
|
|
311
|
|
312 If you redump Emacs by calling @code{dump-emacs}, you may wish to set
|
|
313 this variable to @code{nil} first in order to cause the new dumped Emacs
|
|
314 to process its new command line arguments.
|
|
315 @end defvar
|
|
316
|
|
317 @defvar command-switch-alist
|
|
318 @cindex switches on command line
|
|
319 @cindex options on command line
|
|
320 @cindex command line options
|
|
321 The value of this variable is an alist of user-defined command-line
|
|
322 options and associated handler functions. This variable exists so you
|
|
323 can add elements to it.
|
|
324
|
|
325 A @dfn{command line option} is an argument on the command line of the
|
|
326 form:
|
|
327
|
|
328 @example
|
|
329 -@var{option}
|
|
330 @end example
|
|
331
|
|
332 The elements of the @code{command-switch-alist} look like this:
|
|
333
|
|
334 @example
|
|
335 (@var{option} . @var{handler-function})
|
|
336 @end example
|
|
337
|
|
338 The @var{handler-function} is called to handle @var{option} and receives
|
|
339 the option name as its sole argument.
|
|
340
|
|
341 In some cases, the option is followed in the command line by an
|
|
342 argument. In these cases, the @var{handler-function} can find all the
|
|
343 remaining command-line arguments in the variable
|
|
344 @code{command-line-args-left}. (The entire list of command-line
|
|
345 arguments is in @code{command-line-args}.)
|
|
346
|
|
347 The command line arguments are parsed by the @code{command-line-1}
|
|
348 function in the @file{startup.el} file. See also @ref{Command
|
|
349 Switches, , Command Line Switches and Arguments, emacs, The GNU Emacs
|
|
350 Manual}.
|
|
351 @end defvar
|
|
352
|
|
353 @defvar command-line-args
|
|
354 The value of this variable is the list of command line arguments passed
|
|
355 to Emacs.
|
|
356 @end defvar
|
|
357
|
|
358 @defvar command-line-functions
|
|
359 This variable's value is a list of functions for handling an
|
|
360 unrecognized command-line argument. Each time the next argument to be
|
|
361 processed has no special meaning, the functions in this list are called,
|
|
362 in the order they appear, until one of them returns a non-@code{nil}
|
|
363 value.
|
|
364
|
|
365 These functions are called with no arguments. They can access the
|
|
366 command-line argument under consideration through the variable
|
|
367 @code{argi}. The remaining arguments (not including the current one)
|
|
368 are in the variable @code{command-line-args-left}.
|
|
369
|
|
370 When a function recognizes and processes the argument in @code{argi}, it
|
|
371 should return a non-@code{nil} value to say it has dealt with that
|
|
372 argument. If it has also dealt with some of the following arguments, it
|
|
373 can indicate that by deleting them from @code{command-line-args-left}.
|
|
374
|
|
375 If all of these functions return @code{nil}, then the argument is used
|
|
376 as a file name to visit.
|
|
377 @end defvar
|
|
378
|
|
379 @node Getting Out
|
|
380 @section Getting Out of Emacs
|
|
381 @cindex exiting Emacs
|
|
382
|
|
383 There are two ways to get out of Emacs: you can kill the Emacs job,
|
|
384 which exits permanently, or you can suspend it, which permits you to
|
|
385 reenter the Emacs process later. As a practical matter, you seldom kill
|
|
386 Emacs---only when you are about to log out. Suspending is much more
|
|
387 common.
|
|
388
|
|
389 @menu
|
|
390 * Killing Emacs:: Exiting Emacs irreversibly.
|
|
391 * Suspending Emacs:: Exiting Emacs reversibly.
|
|
392 @end menu
|
|
393
|
|
394 @node Killing Emacs
|
|
395 @comment node-name, next, previous, up
|
|
396 @subsection Killing Emacs
|
|
397 @cindex killing Emacs
|
|
398
|
|
399 Killing Emacs means ending the execution of the Emacs process. The
|
|
400 parent process normally resumes control. The low-level primitive for
|
|
401 killing Emacs is @code{kill-emacs}.
|
|
402
|
|
403 @defun kill-emacs &optional exit-data
|
|
404 This function exits the Emacs process and kills it.
|
|
405
|
|
406 If @var{exit-data} is an integer, then it is used as the exit status
|
|
407 of the Emacs process. (This is useful primarily in batch operation; see
|
|
408 @ref{Batch Mode}.)
|
|
409
|
|
410 If @var{exit-data} is a string, its contents are stuffed into the
|
|
411 terminal input buffer so that the shell (or whatever program next reads
|
|
412 input) can read them.
|
|
413 @end defun
|
|
414
|
|
415 All the information in the Emacs process, aside from files that have
|
|
416 been saved, is lost when the Emacs is killed. Because killing Emacs
|
|
417 inadvertently can lose a lot of work, Emacs queries for confirmation
|
|
418 before actually terminating if you have buffers that need saving or
|
|
419 subprocesses that are running. This is done in the function
|
|
420 @code{save-buffers-kill-emacs}.
|
|
421
|
|
422 @defvar kill-emacs-query-functions
|
|
423 After asking the standard questions, @code{save-buffers-kill-emacs}
|
|
424 calls the functions in the list @code{kill-buffer-query-functions}, in
|
|
425 order of appearance, with no arguments. These functions can ask for
|
|
426 additional confirmation from the user. If any of them returns
|
|
427 non-@code{nil}, Emacs is not killed.
|
|
428 @end defvar
|
|
429
|
|
430 @defvar kill-emacs-hook
|
|
431 This variable is a normal hook; once @code{save-buffers-kill-emacs} is
|
|
432 finished with all file saving and confirmation, it runs the functions in
|
|
433 this hook.
|
|
434 @end defvar
|
|
435
|
|
436 @node Suspending Emacs
|
|
437 @subsection Suspending Emacs
|
|
438 @cindex suspending Emacs
|
|
439
|
|
440 @dfn{Suspending Emacs} means stopping Emacs temporarily and returning
|
|
441 control to its superior process, which is usually the shell. This
|
|
442 allows you to resume editing later in the same Emacs process, with the
|
|
443 same buffers, the same kill ring, the same undo history, and so on. To
|
|
444 resume Emacs, use the appropriate command in the parent shell---most
|
|
445 likely @code{fg}.
|
|
446
|
|
447 Some operating systems do not support suspension of jobs; on these
|
|
448 systems, ``suspension'' actually creates a new shell temporarily as a
|
|
449 subprocess of Emacs. Then you would exit the shell to return to Emacs.
|
|
450
|
|
451 Suspension is not useful with window systems such as X, because the
|
|
452 Emacs job may not have a parent that can resume it again, and in any
|
|
453 case you can give input to some other job such as a shell merely by
|
|
454 moving to a different window. Therefore, suspending is not allowed
|
|
455 when Emacs is an X client.
|
|
456
|
|
457 @defun suspend-emacs string
|
|
458 This function stops Emacs and returns control to the superior process.
|
|
459 If and when the superior process resumes Emacs, @code{suspend-emacs}
|
|
460 returns @code{nil} to its caller in Lisp.
|
|
461
|
|
462 If @var{string} is non-@code{nil}, its characters are sent to be read
|
|
463 as terminal input by Emacs's superior shell. The characters in
|
|
464 @var{string} are not echoed by the superior shell; only the results
|
|
465 appear.
|
|
466
|
|
467 Before suspending, @code{suspend-emacs} runs the normal hook
|
|
468 @code{suspend-hook}. In Emacs version 18, @code{suspend-hook} was not a
|
|
469 normal hook; its value was a single function, and if its value was
|
|
470 non-@code{nil}, then @code{suspend-emacs} returned immediately without
|
|
471 actually suspending anything.
|
|
472
|
|
473 After the user resumes Emacs, it runs the normal hook
|
|
474 @code{suspend-resume-hook}. @xref{Hooks}.
|
|
475
|
|
476 The next redisplay after resumption will redraw the entire screen,
|
|
477 unless the variable @code{no-redraw-on-reenter} is non-@code{nil}
|
|
478 (@pxref{Refresh Screen}).
|
|
479
|
|
480 In the following example, note that @samp{pwd} is not echoed after
|
|
481 Emacs is suspended. But it is read and executed by the shell.
|
|
482
|
|
483 @smallexample
|
|
484 @group
|
|
485 (suspend-emacs)
|
|
486 @result{} nil
|
|
487 @end group
|
|
488
|
|
489 @group
|
|
490 (add-hook 'suspend-hook
|
|
491 (function (lambda ()
|
|
492 (or (y-or-n-p
|
|
493 "Really suspend? ")
|
|
494 (error "Suspend cancelled")))))
|
|
495 @result{} (lambda nil
|
|
496 (or (y-or-n-p "Really suspend? ")
|
|
497 (error "Suspend cancelled")))
|
|
498 @end group
|
|
499 @group
|
|
500 (add-hook 'suspend-resume-hook
|
|
501 (function (lambda () (message "Resumed!"))))
|
|
502 @result{} (lambda nil (message "Resumed!"))
|
|
503 @end group
|
|
504 @group
|
|
505 (suspend-emacs "pwd")
|
|
506 @result{} nil
|
|
507 @end group
|
|
508 @group
|
|
509 ---------- Buffer: Minibuffer ----------
|
|
510 Really suspend? @kbd{y}
|
|
511 ---------- Buffer: Minibuffer ----------
|
|
512 @end group
|
|
513
|
|
514 @group
|
|
515 ---------- Parent Shell ----------
|
|
516 lewis@@slug[23] % /user/lewis/manual
|
|
517 lewis@@slug[24] % fg
|
|
518 @end group
|
|
519
|
|
520 @group
|
|
521 ---------- Echo Area ----------
|
|
522 Resumed!
|
|
523 @end group
|
|
524 @end smallexample
|
|
525 @end defun
|
|
526
|
|
527 @defvar suspend-hook
|
|
528 This variable is a normal hook run before suspending.
|
|
529 @end defvar
|
|
530
|
|
531 @defvar suspend-resume-hook
|
|
532 This variable is a normal hook run after suspending.
|
|
533 @end defvar
|
|
534
|
|
535 @node System Environment
|
|
536 @section Operating System Environment
|
|
537 @cindex operating system environment
|
|
538
|
|
539 Emacs provides access to variables in the operating system environment
|
|
540 through various functions. These variables include the name of the
|
|
541 system, the user's @sc{uid}, and so on.
|
|
542
|
|
543 @defvar system-type
|
|
544 The value of this variable is a symbol indicating the type of
|
|
545 operating system Emacs is operating on. Here is a table of the symbols
|
|
546 for the operating systems that Emacs can run on up to version 19.1.
|
|
547
|
|
548 @table @code
|
|
549 @item aix-v3
|
|
550 AIX.
|
|
551
|
|
552 @item berkeley-unix
|
|
553 Berkeley BSD.
|
|
554
|
|
555 @item hpux
|
|
556 Hewlett-Packard operating system.
|
|
557
|
|
558 @item irix
|
|
559 Silicon Graphics Irix system.
|
|
560
|
|
561 @item rtu
|
|
562 Masscomp RTU, UCB universe.
|
|
563
|
|
564 @item unisoft-unix
|
|
565 UniSoft UniPlus.
|
|
566
|
|
567 @item usg-unix-v
|
|
568 AT&T System V.
|
|
569
|
|
570 @item vax-vms
|
|
571 VAX VMS.
|
|
572
|
|
573 @item xenix
|
|
574 SCO Xenix 386.
|
|
575 @end table
|
|
576
|
|
577 We do not wish to add new symbols to make finer distinctions unless it
|
|
578 is absolutely necessary! In fact, we hope to eliminate some of these
|
|
579 alternatives in the future. We recommend using
|
|
580 @code{system-configuration} to distinguish between different operating
|
|
581 systems.
|
|
582 @end defvar
|
|
583
|
|
584 @defvar system-configuration
|
|
585 This variable holds the three-part configuration name for the
|
|
586 hardware/software configuration of your system, as a string. The
|
|
587 convenient way to test parts of this string is with @code{string-match}.
|
|
588 @end defvar
|
|
589
|
|
590 @defun system-name
|
|
591 This function returns the name of the machine you are running on.
|
|
592 @example
|
|
593 (system-name)
|
|
594 @result{} "prep.ai.mit.edu"
|
|
595 @end example
|
|
596 @end defun
|
|
597
|
|
598 @defun getenv var
|
|
599 @cindex environment variable access
|
|
600 This function returns the value of the environment variable @var{var},
|
|
601 as a string. Within Emacs, the environment variable values are kept in
|
|
602 the Lisp variable @code{process-environment}.
|
|
603
|
|
604 @example
|
|
605 @group
|
|
606 (getenv "USER")
|
|
607 @result{} "lewis"
|
|
608 @end group
|
|
609
|
|
610 @group
|
|
611 lewis@@slug[10] % printenv
|
|
612 PATH=.:/user/lewis/bin:/usr/bin:/usr/local/bin
|
|
613 USER=lewis
|
|
614 @end group
|
|
615 @group
|
|
616 TERM=ibmapa16
|
|
617 SHELL=/bin/csh
|
|
618 HOME=/user/lewis
|
|
619 @end group
|
|
620 @end example
|
|
621 @end defun
|
|
622
|
|
623 @c Emacs 19 feature
|
|
624 @deffn Command setenv variable value
|
|
625 This command sets the value of the environment variable named
|
|
626 @var{variable} to @var{value}. Both arguments should be strings. This
|
|
627 function works by modifying @code{process-environment}; binding that
|
|
628 variable with @code{let} is also reasonable practice.
|
|
629 @end deffn
|
|
630
|
|
631 @defvar process-environment
|
|
632 This variable is a list of strings, each describing one environment
|
|
633 variable. The functions @code{getenv} and @code{setenv} work by means
|
|
634 of this variable.
|
|
635
|
|
636 @smallexample
|
|
637 @group
|
|
638 process-environment
|
|
639 @result{} ("l=/usr/stanford/lib/gnuemacs/lisp"
|
|
640 "PATH=.:/user/lewis/bin:/usr/class:/nfsusr/local/bin"
|
|
641 "USER=lewis"
|
|
642 @end group
|
|
643 @group
|
|
644 "TERM=ibmapa16"
|
|
645 "SHELL=/bin/csh"
|
|
646 "HOME=/user/lewis")
|
|
647 @end group
|
|
648 @end smallexample
|
|
649 @end defvar
|
|
650
|
|
651 @defun load-average
|
|
652 This function returns the current 1 minute, 5 minute and 15 minute
|
|
653 load averages in a list. The values are integers that are 100 times
|
|
654 the system load averages. (The load averages indicate the number of
|
|
655 processes trying to run.)
|
|
656
|
|
657 @example
|
|
658 @group
|
|
659 (load-average)
|
|
660 @result{} (169 48 36)
|
|
661 @end group
|
|
662
|
|
663 @group
|
|
664 lewis@@rocky[5] % uptime
|
|
665 11:55am up 1 day, 19:37, 3 users,
|
|
666 load average: 1.69, 0.48, 0.36
|
|
667 @end group
|
|
668 @end example
|
|
669 @end defun
|
|
670
|
|
671 @defun emacs-pid
|
|
672 This function returns the process @sc{id} of the Emacs process.
|
|
673 @end defun
|
|
674
|
|
675 @defun setprv privilege-name &optional setp getprv
|
|
676 This function sets or resets a VMS privilege. (It does not exist on
|
|
677 Unix.) The first arg is the privilege name, as a string. The second
|
|
678 argument, @var{setp}, is @code{t} or @code{nil}, indicating whether the
|
|
679 privilege is to be turned on or off. Its default is @code{nil}. The
|
|
680 function returns @code{t} if successful, @code{nil} otherwise.
|
|
681
|
|
682 If the third argument, @var{getprv}, is non-@code{nil}, @code{setprv}
|
|
683 does not change the privilege, but returns @code{t} or @code{nil}
|
|
684 indicating whether the privilege is currently enabled.
|
|
685 @end defun
|
|
686
|
|
687 @node User Identification
|
|
688 @section User Identification
|
|
689
|
|
690 @defun user-login-name
|
|
691 This function returns the name under which the user is logged in. If
|
|
692 the environment variable @code{LOGNAME} is set, that value is used.
|
|
693 Otherwise, if the environment variable @code{USER} is set, that value is
|
|
694 used. Otherwise, the value is based on the effective @sc{uid}, not the
|
|
695 real @sc{uid}.
|
|
696
|
|
697 @example
|
|
698 @group
|
|
699 (user-login-name)
|
|
700 @result{} "lewis"
|
|
701 @end group
|
|
702 @end example
|
|
703 @end defun
|
|
704
|
|
705 @defun user-real-login-name
|
|
706 This function returns the user name corresponding to Emacs's real
|
|
707 @sc{uid}. This ignores the effective @sc{uid} and ignores the
|
|
708 environment variables @code{LOGNAME} and @code{USER}.
|
|
709 @end defun
|
|
710
|
|
711 @defun user-full-name
|
|
712 This function returns the full name of the user.
|
|
713
|
|
714 @example
|
|
715 @group
|
|
716 (user-full-name)
|
|
717 @result{} "Bil Lewis"
|
|
718 @end group
|
|
719 @end example
|
|
720 @end defun
|
|
721
|
|
722 @defun user-real-uid
|
|
723 This function returns the real @sc{uid} of the user.
|
|
724
|
|
725 @example
|
|
726 @group
|
|
727 (user-real-uid)
|
|
728 @result{} 19
|
|
729 @end group
|
|
730 @end example
|
|
731 @end defun
|
|
732
|
|
733 @defun user-uid
|
|
734 This function returns the effective @sc{uid} of the user.
|
|
735 @end defun
|
|
736
|
|
737 @node Time of Day
|
|
738 @section Time of Day
|
|
739
|
|
740 This section explains how to determine the current time and the time
|
|
741 zone.
|
|
742
|
|
743 @defun current-time-string &optional time-value
|
|
744 This function returns the current time and date as a humanly-readable
|
|
745 string. The format of the string is unvarying; the number of characters
|
|
746 used for each part is always the same, so you can reliably use
|
|
747 @code{substring} to extract pieces of it. However, it would be wise to
|
|
748 count the characters from the beginning of the string rather than from
|
|
749 the end, as additional information may be added at the end.
|
|
750
|
|
751 @c Emacs 19 feature
|
|
752 The argument @var{time-value}, if given, specifies a time to format
|
|
753 instead of the current time. The argument should be a cons cell
|
|
754 containing two integers, or a list whose first two elements are
|
|
755 integers. Thus, you can use times obtained from @code{current-time}
|
|
756 (see below) and from @code{file-attributes} (@pxref{File Attributes}).
|
|
757
|
|
758 @example
|
|
759 @group
|
|
760 (current-time-string)
|
|
761 @result{} "Wed Oct 14 22:21:05 1987"
|
|
762 @end group
|
|
763 @end example
|
|
764 @end defun
|
|
765
|
|
766 @c Emacs 19 feature
|
|
767 @defun current-time
|
|
768 This function returns the system's time value as a list of three
|
|
769 integers: @code{(@var{high} @var{low} @var{microsec})}. The integers
|
|
770 @var{high} and @var{low} combine to give the number of seconds since
|
|
771 0:00 January 1, 1970, which is
|
|
772 @ifinfo
|
|
773 @var{high} * 2**16 + @var{low}.
|
|
774 @end ifinfo
|
|
775 @tex
|
|
776 $high*-2^{16}+low$.
|
|
777 @end tex
|
|
778
|
|
779 The third element, @var{microsec}, gives the microseconds since the
|
|
780 start of the current second (or 0 for systems that return time only on
|
|
781 the resolution of a second).
|
|
782
|
|
783 The first two elements can be compared with file time values such as you
|
|
784 get with the function @code{file-attributes}. @xref{File Attributes}.
|
|
785 @end defun
|
|
786
|
|
787 @c Emacs 19 feature
|
|
788 @defun current-time-zone &optional time-value
|
|
789 This function returns a list describing the time zone that the user is
|
|
790 in.
|
|
791
|
|
792 The value has the form @code{(@var{offset} @var{name})}. Here
|
|
793 @var{offset} is an integer giving the number of seconds ahead of UTC
|
|
794 (east of Greenwich). A negative value means west of Greenwich. The
|
|
795 second element, @var{name} is a string giving the name of the time
|
|
796 zone. Both elements change when daylight savings time begins or ends;
|
|
797 if the user has specified a time zone that does not use a seasonal time
|
|
798 adjustment, then the value is constant through time.
|
|
799
|
|
800 If the operating system doesn't supply all the information necessary to
|
|
801 compute the value, both elements of the list are @code{nil}.
|
|
802
|
|
803 The argument @var{time-value}, if given, specifies a time to analyze
|
|
804 instead of the current time. The argument should be a cons cell
|
|
805 containing two integers, or a list whose first two elements are
|
|
806 integers. Thus, you can use times obtained from @code{current-time}
|
|
807 (see below) and from @code{file-attributes} (@pxref{File Attributes}).
|
|
808 @end defun
|
|
809
|
|
810 @node Timers
|
|
811 @section Timers
|
|
812
|
|
813 You can set up a timer to call a function at a specified future time.
|
|
814
|
|
815 @defun run-at-time time repeat function &rest args
|
|
816 This function arranges to call @var{function} with arguments @var{args}
|
|
817 at time @var{time}. The argument @var{function} is a function to call
|
|
818 later, and @var{args} are the arguments to give it when it is called.
|
|
819 The time @var{time} is specified as a string.
|
|
820
|
|
821 Absolute times may be specified in a wide variety of formats; The form
|
|
822 @samp{@var{hour}:@var{min}:@var{sec} @var{timezone}
|
|
823 @var{month}/@var{day}/@var{year}}, where all fields are numbers, works;
|
|
824 the format that @code{current-time-string} returns is also allowed.
|
|
825
|
|
826 To specify a relative time, use numbers followed by units.
|
|
827 For example:
|
|
828
|
|
829 @table @samp
|
|
830 @item 1 min
|
|
831 denotes 1 minute from now.
|
|
832 @item 1 min 5 sec
|
|
833 denotes 65 seconds from now.
|
|
834 @item 1 min 2 sec 3 hour 4 day 5 week 6 fortnight 7 month 8 year
|
|
835 denotes exactly 103 months, 123 days, and 10862 seconds from now.
|
|
836 @end table
|
|
837
|
|
838 If @var{time} is an integer, that specifies a relative time measured in
|
|
839 seconds.
|
|
840
|
|
841 The argument @var{repeat} specifies how often to repeat the call. If
|
|
842 @var{repeat} is @code{nil}, there are no repetitions; @var{function} is
|
|
843 called just once, at @var{time}. If @var{repeat} is an integer, it
|
|
844 specifies a repetition period measured in seconds.
|
|
845 @end defun
|
|
846
|
|
847 @defun cancel-timer timer
|
|
848 Cancel the requested action for @var{timer}, which should be a value
|
|
849 previously returned by @code{run-at-time}. This cancels the effect of
|
|
850 that call to @code{run-at-time}; the arrival of the specified time will
|
|
851 not cause anything special to happen.
|
|
852 @end defun
|
|
853
|
|
854 @node Terminal Input
|
|
855 @section Terminal Input
|
|
856 @cindex terminal input
|
|
857
|
|
858 This section describes functions and variables for recording or
|
|
859 manipulating terminal input. See @ref{Display}, for related
|
|
860 functions.
|
|
861
|
|
862 @menu
|
|
863 * Input Modes:: Options for how input is processed.
|
|
864 * Translating Input:: Low level conversion of some characters or events
|
|
865 into others.
|
|
866 * Recording Input:: Saving histories of recent or all input events.
|
|
867 @end menu
|
|
868
|
|
869 @node Input Modes
|
|
870 @subsection Input Modes
|
|
871 @cindex input modes
|
|
872 @cindex terminal input modes
|
|
873
|
|
874 @defun set-input-mode interrupt flow meta quit-char
|
|
875 This function sets the mode for reading keyboard input. If
|
|
876 @var{interrupt} is non-null, then Emacs uses input interrupts. If it is
|
|
877 @code{nil}, then it uses @sc{cbreak} mode.
|
|
878
|
|
879 If @var{flow} is non-@code{nil}, then Emacs uses @sc{xon/xoff} (@kbd{C-q},
|
|
880 @kbd{C-s}) flow control for output to terminal. This has no effect except
|
|
881 in @sc{cbreak} mode. @xref{Flow Control}.
|
|
882
|
|
883 The default setting is system dependent. Some systems always use
|
|
884 @sc{cbreak} mode regardless of what is specified.
|
|
885
|
|
886 @c Emacs 19 feature
|
|
887 The argument @var{meta} controls support for input character codes
|
|
888 above 127. If @var{meta} is @code{t}, Emacs converts characters with
|
|
889 the 8th bit set into Meta characters. If @var{meta} is @code{nil},
|
|
890 Emacs disregards the 8th bit; this is necessary when the terminal uses
|
|
891 it as a parity bit. If @var{meta} is neither @code{t} nor @code{nil},
|
|
892 Emacs uses all 8 bits of input unchanged. This is good for terminals
|
|
893 using European 8-bit character sets.
|
|
894
|
|
895 @c Emacs 19 feature
|
|
896 If @var{quit-char} is non-@code{nil}, it specifies the character to
|
|
897 use for quitting. Normally this character is @kbd{C-g}.
|
|
898 @xref{Quitting}.
|
|
899 @end defun
|
|
900
|
|
901 The @code{current-input-mode} function returns the input mode settings
|
|
902 Emacs is currently using.
|
|
903
|
|
904 @c Emacs 19 feature
|
|
905 @defun current-input-mode
|
|
906 This function returns current mode for reading keyboard input. It
|
|
907 returns a list, corresponding to the arguments of @code{set-input-mode},
|
|
908 of the form @code{(@var{interrupt} @var{flow} @var{meta} @var{quit})} in
|
|
909 which:
|
|
910 @table @var
|
|
911 @item interrupt
|
|
912 is non-@code{nil} when Emacs is using interrupt-driven input. If
|
|
913 @code{nil}, Emacs is using @sc{cbreak} mode.
|
|
914 @item flow
|
|
915 is non-@code{nil} if Emacs uses @sc{xon/xoff} (@kbd{C-q}, @kbd{C-s})
|
|
916 flow control for output to the terminal. This value has no effect
|
|
917 unless @var{interrupt} is non-@code{nil}.
|
|
918 @item meta
|
|
919 is non-@code{t} if Emacs treats the eighth bit of input characters as
|
|
920 the meta bit; @code{nil} means Emacs clears the eighth bit of every
|
|
921 input character; any other value means Emacs uses all eight bits as the
|
|
922 basic character code.
|
|
923 @item quit
|
|
924 is the character Emacs currently uses for quitting, usually @kbd{C-g}.
|
|
925 @end table
|
|
926 @end defun
|
|
927
|
|
928 @defvar meta-flag
|
|
929 This variable used to control whether to treat the eight bit in keyboard
|
|
930 input characters as the @key{Meta} bit. @code{nil} meant no, and
|
|
931 anything else meant yes. This variable existed in Emacs versions 18 and
|
|
932 earlier but no longer exists in Emacs 19; use @code{set-input-mode}
|
|
933 instead.
|
|
934 @end defvar
|
|
935
|
|
936 @node Translating Input
|
|
937 @subsection Translating Input Events
|
|
938 @cindex translating input events
|
|
939
|
|
940 This section describes features for translating input events into other
|
|
941 input events before they become part of key sequences.
|
|
942
|
|
943 @c Emacs 19 feature
|
|
944 @defvar extra-keyboard-modifiers
|
|
945 This variable lets Lisp programs ``press'' the modifier keys on the
|
|
946 keyboard. The value is a bit mask:
|
|
947
|
|
948 @table @asis
|
|
949 @item 1
|
|
950 The @key{SHIFT} key.
|
|
951 @item 2
|
|
952 The @key{LOCK} key.
|
|
953 @item 4
|
|
954 The @key{CTL} key.
|
|
955 @item 8
|
|
956 The @key{META} key.
|
|
957 @end table
|
|
958
|
|
959 Each time the user types a keyboard key, it is altered as if the
|
|
960 modifier keys specified in the bit mask were held down.
|
|
961
|
|
962 When you use X windows, the program can ``press'' any of the modifier
|
|
963 keys in this way. Otherwise, only the @key{CTL} and @key{META} keys can
|
|
964 be virtually pressed.
|
|
965 @end defvar
|
|
966
|
|
967 @defvar keyboard-translate-table
|
|
968 This variable is the translate table for keyboard characters. It lets
|
|
969 you reshuffle the keys on the keyboard without changing any command
|
|
970 bindings. Its value must be a string or @code{nil}.
|
|
971
|
|
972 If @code{keyboard-translate-table} is a string, then each character read
|
|
973 from the keyboard is looked up in this string and the character in the
|
|
974 string is used instead. If the string is of length @var{n}, character codes
|
|
975 @var{n} and up are untranslated.
|
|
976
|
|
977 In the example below, we set @code{keyboard-translate-table} to a
|
|
978 string of 128 characters. Then we fill it in to swap the characters
|
|
979 @kbd{C-s} and @kbd{C-\} and the characters @kbd{C-q} and @kbd{C-^}.
|
|
980 Subsequently, typing @kbd{C-\} has all the usual effects of typing
|
|
981 @kbd{C-s}, and vice versa. (@xref{Flow Control} for more information on
|
|
982 this subject.)
|
|
983
|
|
984 @cindex flow control example
|
|
985 @example
|
|
986 @group
|
|
987 (defun evade-flow-control ()
|
|
988 "Replace C-s with C-\ and C-q with C-^."
|
|
989 (interactive)
|
|
990 @end group
|
|
991 @group
|
|
992 (let ((the-table (make-string 128 0)))
|
|
993 (let ((i 0))
|
|
994 (while (< i 128)
|
|
995 (aset the-table i i)
|
|
996 (setq i (1+ i))))
|
|
997 @end group
|
|
998 ;; @r{Swap @kbd{C-s} and @kbd{C-\}.}
|
|
999 (aset the-table ?\034 ?\^s)
|
|
1000 (aset the-table ?\^s ?\034)
|
|
1001 @group
|
|
1002 ;; @r{Swap @kbd{C-q} and @kbd{C-^}.}
|
|
1003 (aset the-table ?\036 ?\^q)
|
|
1004 (aset the-table ?\^q ?\036)
|
|
1005 (setq keyboard-translate-table the-table)))
|
|
1006 @end group
|
|
1007 @end example
|
|
1008
|
|
1009 Note that this translation is the first thing that happens to a
|
|
1010 character after it is read from the terminal. Record-keeping features
|
|
1011 such as @code{recent-keys} and dribble files record the characters after
|
|
1012 translation.
|
|
1013 @end defvar
|
|
1014
|
|
1015 @defun keyboard-translate from to
|
|
1016 This function modifies @code{keyboard-translate-table} to translate
|
|
1017 character code @var{from} into character code @var{to}. It creates
|
|
1018 or enlarges the translate table if necessary.
|
|
1019 @end defun
|
|
1020
|
|
1021 @defvar function-key-map
|
|
1022 This variable holds a keymap which describes the character sequences
|
|
1023 sent by function keys on an ordinary character terminal. This keymap
|
|
1024 uses the data structure as other keymaps, but is used differently: it
|
|
1025 specifies translations to make while reading events.
|
|
1026
|
|
1027 If @code{function-key-map} ``binds'' a key sequence @var{k} to a vector
|
|
1028 @var{v}, then when @var{k} appears as a subsequence @emph{anywhere} in a
|
|
1029 key sequence, it is replaced with the events in @var{v}.
|
|
1030
|
|
1031 For example, VT100 terminals send @kbd{@key{ESC} O P} when the
|
|
1032 keypad PF1 key is pressed. Therefore, we want Emacs to translate
|
|
1033 that sequence of events into the single event @code{pf1}. We accomplish
|
|
1034 this by ``binding'' @kbd{@key{ESC} O P} to @code{[pf1]} in
|
|
1035 @code{function-key-map}, when using a VT100.
|
|
1036
|
|
1037 Thus, typing @kbd{C-c @key{PF1}} sends the character sequence @kbd{C-c
|
|
1038 @key{ESC} O P}; later the function @code{read-key-sequence} translates
|
|
1039 this back into @kbd{C-c @key{PF1}}, which it returns as the vector
|
|
1040 @code{[?\C-c pf1]}.
|
|
1041
|
|
1042 Entries in @code{function-key-map} are ignored if they conflict with
|
|
1043 bindings made in the minor mode, local, or global keymaps. The intent
|
|
1044 is that the character sequences that function keys send should not have
|
|
1045 command bindings in their own right.
|
|
1046
|
|
1047 The value of @code{function-key-map} is usually set up automatically
|
|
1048 according to the terminal's Terminfo or Termcap entry, but sometimes
|
|
1049 those need help from terminal-specific Lisp files. Emacs comes with
|
|
1050 terminal-specific files for many common terminals; their main purpose is
|
|
1051 to make entries in @code{function-key-map} beyond those that can be
|
|
1052 deduced from Termcap and Terminfo. @xref{Terminal-Specific}.
|
|
1053
|
|
1054 Emacs versions 18 and earlier used totally different means of detecting
|
|
1055 the character sequences that represent function keys.
|
|
1056 @end defvar
|
|
1057
|
|
1058 @defvar key-translation-map
|
|
1059 This variable is another keymap used just like @code{function-key-map}
|
|
1060 to translate input events into other events. It differs from
|
|
1061 @code{function-key-map} in two ways:
|
|
1062
|
|
1063 @itemize @bullet
|
|
1064 @item
|
|
1065 @code{key-translation-map} goes to work after @code{function-key-map} is
|
|
1066 finished; it receives the results of translation by
|
|
1067 @code{function-key-map}.
|
|
1068
|
|
1069 @item
|
|
1070 @code{key-translation-map} overrides actual key bindings.
|
|
1071 @end itemize
|
|
1072
|
|
1073 The intent of @code{key-translation-map} is for users to map one
|
|
1074 character set to another, including ordinary characters normally bound
|
|
1075 to @code{self-insert-command}.
|
|
1076 @end defvar
|
|
1077
|
|
1078 @cindex key translation function
|
|
1079 You can use @code{function-key-map} or @code{key-translation-map} for
|
|
1080 more than simple aliases, by using a function, instead of a key
|
|
1081 sequence, as the ``translation'' of a key. Then this function is called
|
|
1082 to compute the translation of that key.
|
|
1083
|
|
1084 The key translation function receives one argument, which is the prompt
|
|
1085 that was specified in @code{read-key-sequence}---or @code{nil} if the
|
|
1086 key sequence is being read by the editor command loop. In most cases
|
|
1087 you can ignore the prompt value.
|
|
1088
|
|
1089 If the function reads input itself, it can have the effect of altering
|
|
1090 the event that follows. For example, here's how to define @kbd{C-c h}
|
|
1091 to turn the character that follows into a Hyper character:
|
|
1092
|
|
1093 @example
|
|
1094 (defun hyperify (prompt)
|
|
1095 (let ((e (read-event)))
|
|
1096 (vector (if (numberp e)
|
|
1097 (logior (lsh 1 20) e)
|
|
1098 (if (memq 'hyper (event-modifiers e))
|
|
1099 e
|
|
1100 (add-event-modifier "H-" e))))))
|
|
1101
|
|
1102 (defun add-event-modifier (string e)
|
|
1103 (let ((symbol (if (symbolp e) e (car e))))
|
|
1104 (setq symbol (intern (concat string
|
|
1105 (symbol-name symbol))))
|
|
1106 (if (symbolp e)
|
|
1107 symbol
|
|
1108 (cons symbol (cdr e)))))
|
|
1109
|
|
1110 (define-key function-key-map "\C-ch" 'hyperify)
|
|
1111 @end example
|
|
1112
|
|
1113 @pindex iso-transl
|
|
1114 @cindex Latin-1 character set (input)
|
|
1115 @cindex ISO Latin-1 characters (input)
|
|
1116 The @file{iso-transl} library uses this feature to provide a way of
|
|
1117 inputting non-ASCII Latin-1 characters.
|
|
1118
|
|
1119 @node Recording Input
|
|
1120 @subsection Recording Input
|
|
1121
|
|
1122 @defun recent-keys
|
|
1123 This function returns a vector containing the last 100 input events
|
|
1124 from the keyboard or mouse. All input events are included, whether or
|
|
1125 not they were used as parts of key sequences. Thus, you always get the
|
|
1126 last 100 inputs, not counting keyboard macros. (Events from keyboard
|
|
1127 macros are excluded because they are less interesting for debugging; it
|
|
1128 should be enough to see the events which invoked the macros.)
|
|
1129 @end defun
|
|
1130
|
|
1131 @deffn Command open-dribble-file filename
|
|
1132 @cindex dribble file
|
|
1133 This function opens a @dfn{dribble file} named @var{filename}. When a
|
|
1134 dribble file is open, each input event from the keyboard or mouse (but
|
|
1135 not those from keyboard macros) is written in that file. A
|
|
1136 non-character event is expressed using its printed representation
|
|
1137 surrounded by @samp{<@dots{}>}.
|
|
1138
|
|
1139 You close the dribble file by calling this function with an argument
|
|
1140 of @code{nil}.
|
|
1141
|
|
1142 This function is normally used to record the input necessary to
|
|
1143 trigger an Emacs bug, for the sake of a bug report.
|
|
1144
|
|
1145 @example
|
|
1146 @group
|
|
1147 (open-dribble-file "~/dribble")
|
|
1148 @result{} nil
|
|
1149 @end group
|
|
1150 @end example
|
|
1151 @end deffn
|
|
1152
|
|
1153 See also the @code{open-termscript} function (@pxref{Terminal Output}).
|
|
1154
|
|
1155 @node Terminal Output
|
|
1156 @section Terminal Output
|
|
1157 @cindex terminal output
|
|
1158
|
|
1159 The terminal output functions send output to the terminal or keep
|
|
1160 track of output sent to the terminal. The variable @code{baud-rate}
|
|
1161 tells you what Emacs thinks is the output speed of the terminal.
|
|
1162
|
|
1163 @defvar baud-rate
|
|
1164 This variable's value is the output speed of the terminal, as far as
|
|
1165 Emacs knows. Setting this variable does not change the speed of actual
|
|
1166 data transmission, but the value is used for calculations such as
|
|
1167 padding. It also affects decisions about whether to scroll part of the
|
|
1168 screen or repaint---even when using a window system, (We designed it
|
|
1169 this way despite the fact that a window system has no true ``output
|
|
1170 speed'', to give you a way to tune these decisions.)
|
|
1171
|
|
1172 The value is measured in baud.
|
|
1173 @end defvar
|
|
1174
|
|
1175 If you are running across a network, and different parts of the
|
|
1176 network work at different baud rates, the value returned by Emacs may be
|
|
1177 different from the value used by your local terminal. Some network
|
|
1178 protocols communicate the local terminal speed to the remote machine, so
|
|
1179 that Emacs and other programs can get the proper value, but others do
|
|
1180 not. If Emacs has the wrong value, it makes decisions that are less
|
|
1181 than optimal. To fix the problem, set @code{baud-rate}.
|
|
1182
|
|
1183 @defun baud-rate
|
|
1184 This function returns the value of the variable @code{baud-rate}. In
|
|
1185 Emacs versions 18 and earlier, this was the only way to find out the
|
|
1186 terminal speed.
|
|
1187 @end defun
|
|
1188
|
|
1189 @defun send-string-to-terminal string
|
|
1190 This function sends @var{string} to the terminal without alteration.
|
|
1191 Control characters in @var{string} have terminal-dependent effects.
|
|
1192
|
|
1193 One use of this function is to define function keys on terminals that
|
|
1194 have downloadable function key definitions. For example, this is how on
|
|
1195 certain terminals to define function key 4 to move forward four
|
|
1196 characters (by transmitting the characters @kbd{C-u C-f} to the
|
|
1197 computer):
|
|
1198
|
|
1199 @example
|
|
1200 @group
|
|
1201 (send-string-to-terminal "\eF4\^U\^F")
|
|
1202 @result{} nil
|
|
1203 @end group
|
|
1204 @end example
|
|
1205 @end defun
|
|
1206
|
|
1207 @deffn Command open-termscript filename
|
|
1208 @cindex termscript file
|
|
1209 This function is used to open a @dfn{termscript file} that will record
|
|
1210 all the characters sent by Emacs to the terminal. It returns
|
|
1211 @code{nil}. Termscript files are useful for investigating problems
|
|
1212 where Emacs garbles the screen, problems that are due to incorrect
|
|
1213 Termcap entries or to undesirable settings of terminal options more
|
|
1214 often than to actual Emacs bugs. Once you are certain which characters
|
|
1215 were actually output, you can determine reliably whether they correspond
|
|
1216 to the Termcap specifications in use.
|
|
1217
|
|
1218 See also @code{open-dribble-file} in @ref{Terminal Input}.
|
|
1219
|
|
1220 @example
|
|
1221 @group
|
|
1222 (open-termscript "../junk/termscript")
|
|
1223 @result{} nil
|
|
1224 @end group
|
|
1225 @end example
|
|
1226 @end deffn
|
|
1227
|
|
1228 @node Special Keysyms
|
|
1229 @section System-Specific X11 Keysyms
|
|
1230
|
|
1231 To define system-specific X11 keysyms, set the variable
|
|
1232 @code{system-key-alist}.
|
|
1233
|
|
1234 @defvar system-key-alist
|
|
1235 This variable's value should be an alist with one element for each
|
|
1236 system-specific keysym. An element has this form: @code{(@var{code}
|
|
1237 . @var{symbol})}, where @var{code} is the numeric keysym code (not
|
|
1238 including the ``vendor specific'' bit, 1 << 28), and @var{symbol} is the
|
|
1239 name for the function key.
|
|
1240
|
|
1241 For example @code{(168 . mute-acute)} defines a system-specific key used
|
|
1242 by HP X servers whose numeric code is (1 << 28) + 168.
|
|
1243
|
|
1244 It is not a problem if the alist defines keysyms for other X servers, as
|
|
1245 long as they don't conflict with the ones used by the X server actually
|
|
1246 in use.
|
|
1247 @end defvar
|
|
1248
|
|
1249 @node Flow Control
|
|
1250 @section Flow Control
|
|
1251 @cindex flow control characters
|
|
1252
|
|
1253 This section attempts to answer the question ``Why does Emacs choose
|
|
1254 to use flow-control characters in its command character set?'' For a
|
|
1255 second view on this issue, read the comments on flow control in the
|
|
1256 @file{emacs/INSTALL} file from the distribution; for help with Termcap
|
|
1257 entries and DEC terminal concentrators, see @file{emacs/etc/TERMS}.
|
|
1258
|
|
1259 @cindex @kbd{C-s}
|
|
1260 @cindex @kbd{C-q}
|
|
1261 At one time, most terminals did not need flow control, and none used
|
|
1262 @code{C-s} and @kbd{C-q} for flow control. Therefore, the choice of
|
|
1263 @kbd{C-s} and @kbd{C-q} as command characters was uncontroversial.
|
|
1264 Emacs, for economy of keystrokes and portability, used nearly all the
|
|
1265 @sc{ASCII} control characters, with mnemonic meanings when possible;
|
|
1266 thus, @kbd{C-s} for search and @kbd{C-q} for quote.
|
|
1267
|
|
1268 Later, some terminals were introduced which required these characters
|
|
1269 for flow control. They were not very good terminals for full-screen
|
|
1270 editing, so Emacs maintainers did not pay attention. In later years,
|
|
1271 flow control with @kbd{C-s} and @kbd{C-q} became widespread among
|
|
1272 terminals, but by this time it was usually an option. And the majority
|
|
1273 of users, who can turn flow control off, were unwilling to switch to
|
|
1274 less mnemonic key bindings for the sake of flow control.
|
|
1275
|
|
1276 So which usage is ``right'', Emacs's or that of some terminal and
|
|
1277 concentrator manufacturers? This question has no simple answer.
|
|
1278
|
|
1279 One reason why we are reluctant to cater to the problems caused by
|
|
1280 @kbd{C-s} and @kbd{C-q} is that they are gratuitous. There are other
|
|
1281 techniques (albeit less common in practice) for flow control that
|
|
1282 preserve transparency of the character stream. Note also that their use
|
|
1283 for flow control is not an official standard. Interestingly, on the
|
|
1284 model 33 teletype with a paper tape punch (which is very old), @kbd{C-s}
|
|
1285 and @kbd{C-q} were sent by the computer to turn the punch on and off!
|
|
1286
|
|
1287 GNU Emacs version 19 provides a convenient way of enabling flow
|
|
1288 control if you want it: call the function @code{enable-flow-control}.
|
|
1289
|
|
1290 @defun enable-flow-control
|
|
1291 This function enables use of @kbd{C-s} and @kbd{C-q} for output flow
|
|
1292 control, and provides the characters @kbd{C-\} and @kbd{C-^} as aliases
|
|
1293 for them using @code{keyboard-translate-table} (@pxref{Translating Input}).
|
|
1294 @end defun
|
|
1295
|
|
1296 You can use the function @code{enable-flow-control-on} in your
|
|
1297 @file{.emacs} file to enable flow control automatically on certain
|
|
1298 terminal types.
|
|
1299
|
|
1300 @defun enable-flow-control-on &rest termtypes
|
|
1301 This function enables flow control, and the aliases @kbd{C-\} and @kbd{C-^},
|
|
1302 if the terminal type is one of @var{termtypes}. For example:
|
|
1303
|
|
1304 @smallexample
|
|
1305 (enable-flow-control-on "vt200" "vt300" "vt101" "vt131")
|
|
1306 @end smallexample
|
|
1307 @end defun
|
|
1308
|
|
1309 Here is how @code{enable-flow-control} does its job:
|
|
1310
|
|
1311 @enumerate
|
|
1312 @item
|
|
1313 @cindex @sc{cbreak}
|
|
1314 It sets @sc{cbreak} mode for terminal input, and tells the operating
|
|
1315 system to handle flow control, with @code{(set-input-mode nil t)}.
|
|
1316
|
|
1317 @item
|
|
1318 It sets up @code{keyboard-translate-table} to translate @kbd{C-\} and
|
|
1319 @kbd{C-^} into @kbd{C-s} and @kbd{C-q} were typed. Except at its very
|
|
1320 lowest level, Emacs never knows that the characters typed were anything
|
|
1321 but @kbd{C-s} and @kbd{C-q}, so you can in effect type them as @kbd{C-\}
|
|
1322 and @kbd{C-^} even when they are input for other commands.
|
|
1323 @xref{Translating Input}.
|
|
1324
|
|
1325 If the terminal is the source of the flow control characters, then once
|
|
1326 you enable kernel flow control handling, you probably can make do with
|
|
1327 less padding than normal for that terminal. You can reduce the amount
|
|
1328 of padding by customizing the Termcap entry. You can also reduce it by
|
|
1329 setting @code{baud-rate} to a smaller value so that Emacs uses a smaller
|
|
1330 speed when calculating the padding needed. @xref{Terminal Output}.
|
|
1331
|
|
1332 @node Batch Mode
|
|
1333 @section Batch Mode
|
|
1334 @cindex batch mode
|
|
1335 @cindex noninteractive use
|
|
1336
|
|
1337 The command line option @samp{-batch} causes Emacs to run
|
|
1338 noninteractively. In this mode, Emacs does not read commands from the
|
|
1339 terminal, it does not alter the terminal modes, and it does not expect
|
|
1340 to be outputting to an erasable screen. The idea is that you specify
|
|
1341 Lisp programs to run; when they are finished, Emacs should exit. The
|
|
1342 way to specify the programs to run is with @samp{-l @var{file}}, which
|
|
1343 loads the library named @var{file}, and @samp{-f @var{function}}, which
|
|
1344 calls @var{function} with no arguments.
|
|
1345
|
|
1346 Any Lisp program output that would normally go to the echo area,
|
|
1347 either using @code{message} or using @code{prin1}, etc., with @code{t}
|
|
1348 as the stream, goes instead to Emacs's standard output descriptor when
|
|
1349 in batch mode. Thus, Emacs behaves much like a noninteractive
|
|
1350 application program. (The echo area output that Emacs itself normally
|
|
1351 generates, such as command echoing, is suppressed entirely.)
|
|
1352
|
|
1353 @defvar noninteractive
|
|
1354 This variable is non-@code{nil} when Emacs is running in batch mode.
|
|
1355 @end defvar
|