emacs/lisp/ldefs-boot.el

1231         \\[array-expand-rows]   Expand the array (remove row numbers and
2315 When called interactively, if variable `browse-url-new-window-flag' is
2318 the effect of `browse-url-new-window-flag'.
2321 used instead of `browse-url-new-window-flag'.
2334 When called interactively, if variable `browse-url-new-window-flag' is
2337 the effect of `browse-url-new-window-flag'.
2344 used instead of `browse-url-new-window-flag'.
2353 When called interactively, if variable `browse-url-new-window-flag' is
2356 the effect of `browse-url-new-window-flag'.
2363 used instead of `browse-url-new-window-flag'.
2374 `browse-url-new-window-flag' is non-nil, load the document in a
2377 `browse-url-new-window-flag'.
2384 NEW-WINDOW is used instead of `browse-url-new-window-flag'.
2389 `browse-url-new-window-flag' and `browse-url-firefox-new-window-is-tab'
2400 When called interactively, if variable `browse-url-new-window-flag' is
2403 the effect of `browse-url-new-window-flag'.
2410 used instead of `browse-url-new-window-flag'.
2419 When called interactively, if variable `browse-url-new-window-flag' is
2422 effect of `browse-url-new-window-flag'.
2425 used instead of `browse-url-new-window-flag'.
2437 When called interactively, if variable `browse-url-new-window-flag' is
2440 the effect of `browse-url-new-window-flag'.
2443 used instead of `browse-url-new-window-flag'.
2462 When called interactively, if variable `browse-url-new-window-flag' is
2465 the effect of `browse-url-new-window-flag'.
2468 used instead of `browse-url-new-window-flag'.
2482 When called interactively, if variable `browse-url-new-window-flag' is
2484 prefix argument reverses the effect of `browse-url-new-window-flag'.
2487 used instead of `browse-url-new-window-flag'.
2511 When called interactively, if variable `browse-url-new-window-flag' is
2514 reverses the effect of `browse-url-new-window-flag'.
2517 used instead of `browse-url-new-window-flag'.
2534 When called interactively, if variable `browse-url-new-window-flag' is
2537 `browse-url-new-window-flag'.
2540 used instead of `browse-url-new-window-flag'.
3766 STYLE using `c-set-style' if the optional SET-P flag is non-nil.
4365 ;;;### (autoloads (c-macro-expand) "cmacexp" "progmodes/cmacexp.el"
4369 (autoload (quote c-macro-expand) "cmacexp" "\
4375 Tf the user option `c-macro-prompt-flag' is non-nil
4549 (define-obsolete-variable-alias (quote comint-use-prompt-regexp-instead-of-fields) (quote comint-use-prompt-regexp) "22.1")
4843 When Partial Completion mode is enabled, TAB (or M-TAB if `PC-meta-flag' is
5831 face-alias, customize the face it is aliased to.
5840 If FACE is actually a face-alias, customize the face it is aliased to.
5985 (defconst custom-face-attributes (quote ((:family (string :tag "Font Family" :help-echo "Font family or fontset alias name.")) (:width (choice :tag "Width" :help-echo "Font width." :value normal (const :tag "compressed" condensed) (const :tag "condensed" condensed) (const :tag "demiexpanded" semi-expanded) (const :tag "expanded" expanded) (const :tag "extracondensed" extra-condensed) (const :tag "extraexpanded" extra-expanded) (const :tag "medium" normal) (const :tag "narrow" condensed) (const :tag "normal" normal) (const :tag "regular" normal) (const :tag "semicondensed" semi-condensed) (const :tag "semiexpanded" semi-expanded) (const :tag "ultracondensed" ultra-condensed) (const :tag "ultraexpanded" ultra-expanded) (const :tag "wide" extra-expanded))) (:height (choice :tag "Height" :help-echo "Face's font height." :value 1.0 (integer :tag "Height in 1/10 pt") (number :tag "Scale" 1.0))) (:weight (choice :tag "Weight" :help-echo "Font weight." :value normal (const :tag "black" ultra-bold) (const :tag "bold" bold) (const :tag "book" semi-light) (const :tag "demibold" semi-bold) (const :tag "extralight" extra-light) (const :tag "extrabold" extra-bold) (const :tag "heavy" extra-bold) (const :tag "light" light) (const :tag "medium" normal) (const :tag "normal" normal) (const :tag "regular" normal) (const :tag "semibold" semi-bold) (const :tag "semilight" semi-light) (const :tag "ultralight" ultra-light) (const :tag "ultrabold" ultra-bold))) (:slant (choice :tag "Slant" :help-echo "Font slant." :value normal (const :tag "italic" italic) (const :tag "oblique" oblique) (const :tag "normal" normal))) (:underline (choice :tag "Underline" :help-echo "Control text underlining." (const :tag "Off" nil) (const :tag "On" t) (color :tag "Colored"))) (:overline (choice :tag "Overline" :help-echo "Control text overlining." (const :tag "Off" nil) (const :tag "On" t) (color :tag "Colored"))) (:strike-through (choice :tag "Strike-through" :help-echo "Control text strike-through." (const :tag "Off" nil) (const :tag "On" t) (color :tag "Colored"))) (:box (choice :tag "Box around text" :help-echo "Control box around text." (const :tag "Off" nil) (list :tag "Box" :value (:line-width 2 :color "grey75" :style released-button) (const :format "" :value :line-width) (integer :tag "Width") (const :format "" :value :color) (choice :tag "Color" (const :tag "*" nil) color) (const :format "" :value :style) (choice :tag "Style" (const :tag "Raised" released-button) (const :tag "Sunken" pressed-button) (const :tag "None" nil)))) (lambda (real-value) (and real-value (let ((lwidth (or (and (consp real-value) (plist-get real-value :line-width)) (and (integerp real-value) real-value) 1)) (color (or (and (consp real-value) (plist-get real-value :color)) (and (stringp real-value) real-value) nil)) (style (and (consp real-value) (plist-get real-value :style)))) (list :line-width lwidth :color color :style style)))) (lambda (cus-value) (and cus-value (let ((lwidth (plist-get cus-value :line-width)) (color (plist-get cus-value :color)) (style (plist-get cus-value :style))) (cond ((and (null color) (null style)) lwidth) ((and (null lwidth) (null style)) color) (t (nconc (and lwidth (\` (:line-width (\, lwidth)))) (and color (\` (:color (\, color)))) (and style (\` (:style (\, style))))))))))) (:inverse-video (choice :tag "Inverse-video" :help-echo "Control whether text should be in inverse-video." (const :tag "Off" nil) (const :tag "On" t))) (:foreground (color :tag "Foreground" :help-echo "Set foreground color (name or #RRGGBB hex spec).")) (:background (color :tag "Background" :help-echo "Set background color (name or #RRGGBB hex spec).")) (:stipple (choice :tag "Stipple" :help-echo "Background bit-mask" (const :tag "None" nil) (file :tag "File" :help-echo "Name of bitmap file." :must-match t))) (:inherit (repeat :tag "Inherit" :help-echo "List of faces to inherit attributes from." (face :Tag "Face" default)) (lambda (real-value) (cond ((or (null real-value) (eq real-value (quote unspecified))) nil) ((symbolp real-value) (list real-value)) (t real-value))) (lambda (cus-value) (if (and (consp cus-value) (null (cdr cus-value))) (car cus-value) cus-value))))) "\
6145 ;;;### (autoloads (dabbrev-expand dabbrev-completion) "dabbrev" "dabbrev.el"
6148  (define-key esc-map "/" 'dabbrev-expand)
6153 Like \\[dabbrev-expand] but finds all expansions in the current buffer
6165 (autoload (quote dabbrev-expand) "dabbrev" "\
7049 You can flag files for deletion with \\[dired-flag-file-deletion] and then
7082   files for later commands or \"flag\" them for deletion, either file
7086 Instead, type \\[dired-flag-file-deletion] to flag a file for Deletion.
7240 To clear the flags on these files, you can use \\[dired-flag-backup-files]
7470   You can add `R' to the switches to expand the whole tree starting at
7489   You can add `R' to the switches to expand the whole tree starting at
8001 expression has a non-nil value.  `:included' is an alias for `:visible'.
8049 expression has a non-nil value.  `:included' is an alias for `:visible'.
10414 ;;;### (autoloads (eudc-load-eudc eudc-query-form eudc-expand-inline
10438 (autoload (quote eudc-expand-inline) "eudc" "\
10439 Query the directory server, and expand the query string before point.
10466 (cond ((not (string-match "XEmacs" emacs-version)) (defvar eudc-tools-menu (make-sparse-keymap "Directory Search")) (fset (quote eudc-tools-menu) (symbol-value (quote eudc-tools-menu))) (define-key eudc-tools-menu [phone] (quote ("Get Phone" . eudc-get-phone))) (define-key eudc-tools-menu [email] (quote ("Get Email" . eudc-get-email))) (define-key eudc-tools-menu [separator-eudc-email] (quote ("--"))) (define-key eudc-tools-menu [expand-inline] (quote ("Expand Inline Query" . eudc-expand-inline))) (define-key eudc-tools-menu [query] (quote ("Query with Form" . eudc-query-form))) (define-key eudc-tools-menu [separator-eudc-query] (quote ("--"))) (define-key eudc-tools-menu [new] (quote ("New Server" . eudc-set-server))) (define-key eudc-tools-menu [load] (quote ("Load Hotlist of Servers" . eudc-load-eudc)))) (t (let ((menu (quote ("Directory Search" ["Load Hotlist of Servers" eudc-load-eudc t] ["New Server" eudc-set-server t] ["---" nil nil] ["Query with Form" eudc-query-form t] ["Expand Inline Query" eudc-expand-inline t] ["---" nil nil] ["Get Email" eudc-get-email t] ["Get Phone" eudc-get-phone t])))) (if (not (featurep (quote eudc-autoloads))) (if eudc-xemacs-p (if (and (featurep (quote menubar)) (not (featurep (quote infodock)))) (add-submenu (quote ("Tools")) menu)) (require (quote easymenu)) (cond ((fboundp (quote easy-menu-add-item)) (easy-menu-add-item nil (quote ("tools")) (easy-menu-create-menu (car menu) (cdr menu)))) ((fboundp (quote easy-menu-create-keymaps)) (define-key global-map [menu-bar tools eudc] (cons "Directory Search" (easy-menu-create-keymaps "Directory Search" (cdr menu)))))))))))
10612 ;;;### (autoloads (expand-jump-to-next-slot expand-jump-to-previous-slot
10613 ;;;;;;  expand-abbrev-hook expand-add-abbrevs) "expand" "expand.el"
10615 ;;; Generated autoloads from expand.el
10617 (autoload (quote expand-add-abbrevs) "expand" "\
10634 cyclicaly with the functions `expand-jump-to-previous-slot' and
10635 `expand-jump-to-next-slot'.
10641 (autoload (quote expand-abbrev-hook) "expand" "\
10642 Abbrev hook used to do the expansion job of expand abbrevs.
10643 See `expand-add-abbrevs'.  Value is non-nil if expansion was done.
10647 (autoload (quote expand-jump-to-previous-slot) "expand" "\
10649 This is used only in conjunction with `expand-add-abbrevs'.
10653 (autoload (quote expand-jump-to-next-slot) "expand" "\
10655 This is used only in conjunction with `expand-add-abbrevs'.
10658  (define-key ctl-x-map "ap" 'expand-jump-to-previous-slot)
10659  (define-key ctl-x-map "an" 'expand-jump-to-next-slot)
12182 Possibly expand a group's active range to include articles
12526 constructed (extra-aliases may be a list).  Additionally, if
12545  (extra-aliases \"foo@localhost\" \"foo-redist@home\")
12859 (define-obsolete-function-alias (quote goto-address-at-mouse) (quote goto-address-at-point) "22.1")
12992 FILES may use abbreviations defined in `grep-files-aliases', e.g.
13010 FILES may use abbreviations defined in `grep-files-aliases', e.g.
13961 ;;;### (autoloads (make-hippie-expand-function hippie-expand hippie-expand-only-buffers
13962 ;;;;;;  hippie-expand-ignore-buffers hippie-expand-max-buffers hippie-expand-no-restriction
13963 ;;;;;;  hippie-expand-dabbrev-as-symbol hippie-expand-dabbrev-skip-space
13964 ;;;;;;  hippie-expand-verbose hippie-expand-try-functions-list) "hippie-exp"
13968 (defvar hippie-expand-try-functions-list (quote (try-complete-file-name-partially try-complete-file-name try-expand-all-abbrevs try-expand-list try-expand-line try-expand-dabbrev try-expand-dabbrev-all-buffers try-expand-dabbrev-from-kill try-complete-lisp-symbol-partially try-complete-lisp-symbol)) "\
13969 The list of expansion functions tried in order by `hippie-expand'.
13970 To change the behavior of `hippie-expand', remove, change the order of,
13973 (custom-autoload (quote hippie-expand-try-functions-list) "hippie-exp" t)
13975 (defvar hippie-expand-verbose t "\
13976 *Non-nil makes `hippie-expand' output which function it is trying.")
13978 (custom-autoload (quote hippie-expand-verbose) "hippie-exp" t)
13980 (defvar hippie-expand-dabbrev-skip-space nil "\
13981 *Non-nil means tolerate trailing spaces in the abbreviation to expand.")
13983 (custom-autoload (quote hippie-expand-dabbrev-skip-space) "hippie-exp" t)
13985 (defvar hippie-expand-dabbrev-as-symbol t "\
13986 *Non-nil means expand as symbols, i.e. syntax `_' is considered a letter.")
13988 (custom-autoload (quote hippie-expand-dabbrev-as-symbol) "hippie-exp" t)
13990 (defvar hippie-expand-no-restriction t "\
13993 (custom-autoload (quote hippie-expand-no-restriction) "hippie-exp" t)
13995 (defvar hippie-expand-max-buffers nil "\
13999 (custom-autoload (quote hippie-expand-max-buffers) "hippie-exp" t)
14001 (defvar hippie-expand-ignore-buffers (quote ("^ \\*.*\\*$" dired-mode)) "\
14006 (custom-autoload (quote hippie-expand-ignore-buffers) "hippie-exp" t)
14008 (defvar hippie-expand-only-buffers nil "\
14012 `hippie-expand-ignore-buffers'.")
14014 (custom-autoload (quote hippie-expand-only-buffers) "hippie-exp" t)
14016 (autoload (quote hippie-expand) "hippie-exp" "\
14017 Try to expand text before point, using multiple methods.
14018 The expansion functions in `hippie-expand-try-functions-list' are
14020 application of `hippie-expand' inserts successively possible
14028 (autoload (quote make-hippie-expand-function) "hippie-exp" "\
14029 Construct a function similar to `hippie-expand'.
14046 If `hl-line-sticky-flag' is non-nil, Hl-Line mode highlights the
14052 When `hl-line-sticky-flag' is nil, Hl-Line mode highlights the
14574 to set the modification flag of the Ibuffer buffer itself.  Valid
14579   buffer's modification flag.
14831    \\[idlwave-expand-region-abbrevs].  Then mark the entire buffer
14866    Many Abbreviations are predefined to expand to code fragments and templates.
14895    If the variable `idlwave-expand-generic-end' is non-nil, each END typed
16577    (add-hook 'mh-before-send-letter-hook 'ispell-message)
17708 Read mail aliases from personal mail alias file and set `mail-abbrevs'.
17709 By default this is the file specified by `mail-personal-alias-file'.
17714 Define NAME as a mail alias abbrev that translates to DEFINITION.
17722 ;;;### (autoloads (mail-complete define-mail-alias expand-mail-aliases
17738 (autoload (quote expand-mail-aliases) "mailalias" "\
17739 Expand all mail aliases in suitable header fields found between BEG and END.
17740 If interactive, expand in header fields.
17745 removed from alias expansions.
17749 (autoload (quote define-mail-alias) "mailalias" "\
17750 Define NAME as a mail alias that translates to DEFINITION.
18039 `message-send-mail-with-mh', `message-send-mail-with-qmail',
18334 ;;;### (autoloads (mh-fully-kill-draft mh-send-letter mh-user-agent-compose
18335 ;;;;;;  mh-smail-batch mh-smail-other-window mh-smail) "mh-comp"
18336 ;;;;;;  "mh-e/mh-comp.el" (17842 55144))
18337 ;;; Generated autoloads from mh-e/mh-comp.el
18339 (autoload (quote mh-smail) "mh-comp" "\
18341 See `mh-send' for more details on composing mail.
18345 (autoload (quote mh-smail-other-window) "mh-comp" "\
18347 See `mh-send' for more details on composing mail.
18351 (autoload (quote mh-smail-batch) "mh-comp" "\
18356 buffer. Users should use \\[mh-smail] to compose mail.
18362 applications should use `mh-user-agent-compose'.
18366 (define-mail-user-agent (quote mh-e-user-agent) (quote mh-user-agent-compose) (quote mh-send-letter) (quote mh-fully-kill-draft) (quote mh-before-send-letter-hook))
18368 (autoload (quote mh-user-agent-compose) "mh-comp" "\
18387 (autoload (quote mh-send-letter) "mh-comp" "\
18395 The hook `mh-before-send-letter-hook' is run at the beginning of
18399 Unless `mh-insert-auto-fields' had previously been called
18400 manually, the function `mh-insert-auto-fields' is called to
18404 by turning off the option `mh-auto-fields-prompt-flag'.
18407 use `mh-send-prog' to tell MH-E the name.
18411 (autoload (quote mh-fully-kill-draft) "mh-comp" "\
18424 ;;;### (autoloads (mh-version) "mh-e" "mh-e/mh-e.el" (17842 55144))
18425 ;;; Generated autoloads from mh-e/mh-e.el
18427 (put (quote mh-progs) (quote risky-local-variable) t)
18429 (put (quote mh-lib) (quote risky-local-variable) t)
18431 (put (quote mh-lib-progs) (quote risky-local-variable) t)
18433 (autoload (quote mh-version) "mh-e" "\
18441 ;;;### (autoloads (mh-folder-mode mh-nmail mh-rmail) "mh-folder"
18442 ;;;;;;  "mh-e/mh-folder.el" (17842 55144))
18443 ;;; Generated autoloads from mh-e/mh-folder.el
18445 (autoload (quote mh-rmail) "mh-folder" "\
18454 (autoload (quote mh-nmail) "mh-folder" "\
18463 (autoload (quote mh-folder-mode) "mh-folder" "\
18464 Major MH-E mode for \"editing\" an MH folder scan listing.\\<mh-folder-mode-map>
18472 \\[customize-group]; specify the \"mh\" group. In particular, please
18473 see the `mh-scan-format-file' option if you wish to modify scan's
18476 When a folder is visited, the hook `mh-folder-mode-hook' is run.
18481 `mh-forward' or `mh-refile-msg' take a RANGE argument. This argument
18487 sequences, and the abbreviations (described in the mh(1) man
18517 \\{mh-folder-mode-map}
19665 (define-obsolete-variable-alias (quote disabled-command-hook) (quote disabled-command-function) "22.1")
19856 Outline-based notes management and organizer, alias
20518 ;;;;;;  pcomplete-help pcomplete-expand pcomplete-continue pcomplete-expand-and-complete
20535 (autoload (quote pcomplete-expand-and-complete) "pcomplete" "\
20546 (autoload (quote pcomplete-expand) "pcomplete" "\
20653 The exact behavior is determined also by `cvs-dired-use-hook'." (when (stringp dir) (setq dir (directory-file-name dir)) (when (and (string= "CVS" (file-name-nondirectory dir)) (file-readable-p (expand-file-name "Entries" dir)) cvs-dired-use-hook (if (eq cvs-dired-use-hook (quote always)) (not current-prefix-arg) (equal current-prefix-arg cvs-dired-use-hook))) (save-excursion (funcall cvs-dired-action (file-name-directory dir) t t)))))
21658 (defvar bdf-directory-list (if (memq system-type (quote (ms-dos windows-nt))) (list (expand-file-name "fonts/bdf" installation-directory)) (quote ("/usr/local/share/emacs/fonts/bdf"))) "\
22182 for the future to translate the same key.  If this flag is nil, a
22190 programs.  If this flag is non-nil, FORGET-LAST-SELECTION is also set
22200 If KBD-TRANSLATE is set, it is desirable to set also this flag unless
22214 packages, for instance, use this facility.  If this flag is nil, we
23519 ;;;;;;  rmail-summary-line-count-flag rmail-summary-scroll-between-messages)
23528 (defvar rmail-summary-line-count-flag t "\
23531 (custom-autoload (quote rmail-summary-line-count-flag) "rmailsum" t)
23908      of `rx-greedy-flag'.
23912      independent of `rx-greedy-flag'.
24096 ;;;;;;  mail-yank-prefix mail-setup-hook mail-personal-alias-file
24097 ;;;;;;  mail-alias-file mail-default-reply-to mail-archive-file-name
24177 (defvar mail-alias-file nil "\
24178 If non-nil, the name of a file to use instead of `/usr/lib/aliases'.
24179 This file defines aliases to be expanded by the mailer; this is a different
24180 feature from that of defining aliases in `.mailrc' to be expanded in Emacs.
24183 (custom-autoload (quote mail-alias-file) "sendmail" t)
24185 (defvar mail-personal-alias-file "~/.mailrc" "\
24186 If non-nil, the name of the user's personal mail alias file.
24191 (custom-autoload (quote mail-personal-alias-file) "sendmail" t)
24199 (defvar mail-aliases t "\
24200 Alist of mail address aliases,
24201 or t meaning should be initialized from your mail aliases file.
24202 \(The file's name is normally `~/.mailrc', but `mail-personal-alias-file'
24204 The alias definitions in the file have this form:
24205     alias ALIAS MEANING")
24579 indicate what shell it is use `sh-alias-alist' to translate.
24844 Function for transforming a skeleton proxy's aliases' variable value.")
26430 Widen the current cell by N columns and expand the cell horizontally.
27687 Enable display of time, load level, and mail flag in mode lines.
27705 Toggle display of time, load level, and mail flag in mode lines.
29104 (defalias (quote url-https-expand-file-name) (quote url-http-expand-file-name))
29519 FILE is passed through `expand-file-name'; BODY executed within
29788   (when (file-readable-p (expand-file-name
29835 find any project directory." (let ((project-dir (getenv "PROJECTDIR")) dirs dir) (when project-dir (if (file-name-absolute-p project-dir) (setq dirs (quote ("SCCS" ""))) (setq dirs (quote ("src/SCCS" "src" "source/SCCS" "source"))) (setq project-dir (expand-file-name (concat "~" project-dir)))) (while (and (not dir) dirs) (setq dir (expand-file-name (car dirs) project-dir)) (unless (file-directory-p dir) (setq dir nil) (setq dirs (cdr dirs)))) (and dir (expand-file-name (concat "s." basename) dir)))))
29847     (when (file-readable-p (expand-file-name
31453 ;;;;;;  "eshell/em-alias.el" "eshell/em-banner.el" "eshell/em-basic.el"
31469 ;;;;;;  "gnus/gnus-mh.el" "gnus/gnus-salt.el" "gnus/gnus-score.el"
31509 ;;;;;;  "mh-e/mh-acros.el" "mh-e/mh-alias.el" "mh-e/mh-buffers.el"
31510 ;;;;;;  "mh-e/mh-compat.el" "mh-e/mh-funcs.el" "mh-e/mh-gnus.el"
31511 ;;;;;;  "mh-e/mh-identity.el" "mh-e/mh-inc.el" "mh-e/mh-junk.el"
31512 ;;;;;;  "mh-e/mh-letter.el" "mh-e/mh-limit.el" "mh-e/mh-loaddefs.el"
31513 ;;;;;;  "mh-e/mh-mime.el" "mh-e/mh-print.el" "mh-e/mh-scan.el" "mh-e/mh-search.el"
31514 ;;;;;;  "mh-e/mh-seq.el" "mh-e/mh-show.el" "mh-e/mh-speed.el" "mh-e/mh-thread.el"
31515 ;;;;;;  "mh-e/mh-tool-bar.el" "mh-e/mh-utils.el" "mh-e/mh-xface.el"
31540 ;;;;;;  "url/url-expand.el" "url/url-ftp.el" "url/url-history.el"