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