comparison lisp/auto-autoloads.el @ 217:d44af0c54775 r20-4b7

Import from CVS: tag r20-4b7
author cvs
date Mon, 13 Aug 2007 10:08:34 +0200
parents 41ff10fd062f
children 262b8bb4a523
comparison
equal deleted inserted replaced
216:43306a74e31c 217:d44af0c54775
1 ;;; DO NOT MODIFY THIS FILE 1 ;;; DO NOT MODIFY THIS FILE
2 (if (featurep 'TopLevel-autoloads) (error "Already loaded")) 2 (if (featurep 'Standard-autoloads) (error "Already loaded"))
3
4 ;;;### (autoloads nil "abbrev" "lisp/abbrev.el")
5
6 ;;;***
7
8 ;;;### (autoloads (about-xemacs) "about" "lisp/about.el")
9
10 (autoload 'about-xemacs "about" "\
11 Describe the True Editor and its minions." t nil)
12
13 ;;;***
14
15 ;;;### (autoloads (apropos-documentation apropos-value apropos apropos-command) "apropos" "lisp/apropos.el")
16
17 (fset 'command-apropos 'apropos-command)
18
19 (autoload 'apropos-command "apropos" "\
20 Shows commands (interactively callable functions) that match REGEXP.
21 With optional prefix ARG or if `apropos-do-all' is non-nil, also show
22 variables." t nil)
23
24 (autoload 'apropos "apropos" "\
25 Show all bound symbols whose names match REGEXP.
26 With optional prefix ARG or if `apropos-do-all' is non-nil, also show unbound
27 symbols and key bindings, which is a little more time-consuming.
28 Returns list of symbols and documentation found." t nil)
29
30 (autoload 'apropos-value "apropos" "\
31 Show all symbols whose value's printed image matches REGEXP.
32 With optional prefix ARG or if `apropos-do-all' is non-nil, also looks
33 at the function and at the names and values of properties.
34 Returns list of symbols and values found." t nil)
35
36 (autoload 'apropos-documentation "apropos" "\
37 Show symbols whose documentation contain matches for REGEXP.
38 With optional prefix ARG or if `apropos-do-all' is non-nil, also use
39 documentation that is not stored in the documentation file and show key
40 bindings.
41 Returns list of symbols and documentation found." t nil)
42
43 ;;;***
44
45 ;;;### (autoloads (batch-update-directory batch-update-autoloads update-autoloads-from-directory update-autoloads-here update-file-autoloads generate-file-autoloads) "autoload" "lisp/autoload.el")
46
47 (autoload 'generate-file-autoloads "autoload" "\
48 Insert at point a loaddefs autoload section for FILE.
49 autoloads are generated for defuns and defmacros in FILE
50 marked by `generate-autoload-cookie' (which see).
51 If FILE is being visited in a buffer, the contents of the buffer
52 are used." t nil)
53
54 (autoload 'update-file-autoloads "autoload" "\
55 Update the autoloads for FILE in `generated-autoload-file'
56 \(which FILE might bind in its local variables).
57 This functions refuses to update autoloads files." t nil)
58
59 (autoload 'update-autoloads-here "autoload" "\
60 Update sections of the current buffer generated by `update-file-autoloads'." t nil)
61
62 (autoload 'update-autoloads-from-directory "autoload" "\
63 Update `generated-autoload-file' with all the current autoloads from DIR.
64 This runs `update-file-autoloads' on each .el file in DIR.
65 Obsolete autoload entries for files that no longer exist are deleted." t nil)
66
67 (autoload 'batch-update-autoloads "autoload" "\
68 Update the autoloads for the files or directories on the command line.
69 Runs `update-file-autoloads' on files and `update-directory-autoloads'
70 on directories. Must be used only with -batch, and kills Emacs on completion.
71 Each file will be processed even if an error occurred previously.
72 For example, invoke `xemacs -batch -f batch-update-autoloads *.el'.
73 The directory to which the auto-autoloads.el file must be the first parameter
74 on the command line." nil nil)
75
76 (autoload 'batch-update-directory "autoload" "\
77 Update the autoloads for the directory on the command line.
78 Runs `update-file-autoloads' on each file in the given directory, must
79 be used only with -batch and kills XEmacs on completion." nil nil)
80
81 ;;;***
82
83 ;;;### (autoloads nil "buff-menu" "lisp/buff-menu.el")
84
85 (defvar list-buffers-directory nil)
86
87 (make-variable-buffer-local 'list-buffers-directory)
88
89 ;;;***
3 90
4 ;;;### (autoloads (batch-byte-recompile-directory batch-byte-recompile-directory-norecurse batch-byte-compile display-call-tree byte-compile-sexp byte-compile compile-defun byte-compile-file byte-recompile-file byte-recompile-directory byte-force-recompile) "bytecomp" "lisp/bytecomp.el") 91 ;;;### (autoloads (batch-byte-recompile-directory batch-byte-recompile-directory-norecurse batch-byte-compile display-call-tree byte-compile-sexp byte-compile compile-defun byte-compile-file byte-recompile-file byte-recompile-directory byte-force-recompile) "bytecomp" "lisp/bytecomp.el")
5 92
6 (autoload 'byte-force-recompile "bytecomp" "\ 93 (autoload 'byte-force-recompile "bytecomp" "\
7 Recompile every `.el' file in DIRECTORY that already has a `.elc' file. 94 Recompile every `.el' file in DIRECTORY that already has a `.elc' file.
405 492
406 (autoload 'compiler-macroexpand "cl-macs" nil nil nil) 493 (autoload 'compiler-macroexpand "cl-macs" nil nil nil)
407 494
408 ;;;*** 495 ;;;***
409 496
497 ;;;### (autoloads (batch-remove-old-elc) "cleantree" "lisp/cleantree.el")
498
499 (autoload 'batch-remove-old-elc "cleantree" nil nil nil)
500
501 ;;;***
502
503 ;;;### (autoloads (config-value config-value-hash-table) "config" "lisp/config.el")
504
505 (autoload 'config-value-hash-table "config" "\
506 Returns hashtable of configuration parameters and their values." nil nil)
507
508 (autoload 'config-value "config" "\
509 Return the value of the configuration parameter CONFIG_SYMBOL." nil nil)
510
511 ;;;***
512
410 ;;;### (autoloads (Custom-make-dependencies) "cus-dep" "lisp/cus-dep.el") 513 ;;;### (autoloads (Custom-make-dependencies) "cus-dep" "lisp/cus-dep.el")
411 514
412 (autoload 'Custom-make-dependencies "cus-dep" "\ 515 (autoload 'Custom-make-dependencies "cus-dep" "\
413 Extract custom dependencies from .el files in SUBDIRS. 516 Extract custom dependencies from .el files in SUBDIRS.
414 SUBDIRS is a list of directories. If it is nil, the command-line 517 SUBDIRS is a list of directories. If it is nil, the command-line
528 that option." nil nil) 631 that option." nil nil)
529 632
530 (autoload 'customize-browse "cus-edit" "\ 633 (autoload 'customize-browse "cus-edit" "\
531 Create a tree browser for the customize hierarchy." t nil) 634 Create a tree browser for the customize hierarchy." t nil)
532 635
533 (defcustom custom-file (if (boundp 'emacs-user-extension-dir) (concat "~" init-file-user emacs-user-extension-dir "options.el") "~/.emacs") "File used for storing customization information.\nIf you change this from the default \"~/.emacs\" you need to\nexplicitly load that file for the settings to take effect." :type 'file :group 'customize) 636 (defcustom custom-file (if (boundp 'user-init-directory) (concat "~" init-file-user user-init-directory "options.el") "~/.emacs") "File used for storing customization information.\nIf you change this from the default \"~/.emacs\" you need to\nexplicitly load that file for the settings to take effect." :type 'file :group 'customize)
534 637
535 (autoload 'customize-save-customized "cus-edit" "\ 638 (autoload 'customize-save-customized "cus-edit" "\
536 Save all user options which have been set in this session." t nil) 639 Save all user options which have been set in this session." t nil)
537 640
538 (autoload 'custom-save-all "cus-edit" "\ 641 (autoload 'custom-save-all "cus-edit" "\
574 Print disassembled code for OBJECT in (optional) BUFFER. 677 Print disassembled code for OBJECT in (optional) BUFFER.
575 OBJECT can be a symbol defined as a function, or a function itself 678 OBJECT can be a symbol defined as a function, or a function itself
576 \(a lambda expression or a compiled-function object). 679 \(a lambda expression or a compiled-function object).
577 If OBJECT is not already compiled, we compile it, but do not 680 If OBJECT is not already compiled, we compile it, but do not
578 redefine OBJECT if it is a symbol." t nil) 681 redefine OBJECT if it is a symbol." t nil)
682
683 ;;;***
684
685 ;;;### (autoloads nil "easymenu" "lisp/easymenu.el")
686
687 ;;;***
688
689 ;;;### (autoloads (tags-apropos list-tags tags-query-replace tags-search tags-loop-continue next-file find-tag-other-window find-tag visit-tags-table) "etags" "lisp/etags.el")
690
691 (defcustom tags-build-completion-table 'ask "*If this variable is nil, then tags completion is disabled.\nIf this variable is t, then things which prompt for tags will do so with \n completion across all known tags.\nIf this variable is the symbol `ask', then you will be asked whether each\n tags table should be added to the completion list as it is read in.\n (With the exception that for very small tags tables, you will not be asked,\n since they can be parsed quickly.)" :type '(radio (const :tag "Disabled" nil) (const :tag "Complete All" t) (const :tag "Ask" ask)) :group 'etags)
692
693 (defcustom tags-always-exact nil "*If this variable is non-nil, then tags always looks for exact matches." :type 'boolean :group 'etags)
694
695 (defcustom tag-table-alist nil "*A list which determines which tags files are active for a buffer.\nThis is not really an association list, in that all elements are\nchecked. The CAR of each element of this list is a pattern against\nwhich the buffer's file name is compared; if it matches, then the CDR\nof the list should be the name of the tags table to use. If more than\none element of this list matches the buffer's file name, then all of\nthe associated tags tables will be used. Earlier ones will be\nsearched first.\n\nIf the CAR of elements of this list are strings, then they are treated\nas regular-expressions against which the file is compared (like the\nauto-mode-alist). If they are not strings, then they are evaluated.\nIf they evaluate to non-nil, then the current buffer is considered to\nmatch.\n\nIf the CDR of the elements of this list are strings, then they are\nassumed to name a TAGS file. If they name a directory, then the string\n\"TAGS\" is appended to them to get the file name. If they are not \nstrings, then they are evaluated, and must return an appropriate string.\n\nFor example:\n (setq tag-table-alist\n '((\"/usr/src/public/perl/\" . \"/usr/src/public/perl/perl-3.0/\")\n (\"\\\\.el$\" . \"/usr/local/emacs/src/\")\n (\"/jbw/gnu/\" . \"/usr15/degree/stud/jbw/gnu/\")\n (\"\" . \"/usr/local/emacs/src/\")\n ))\n\nThis means that anything in the /usr/src/public/perl/ directory should use\nthe TAGS file /usr/src/public/perl/perl-3.0/TAGS; and file ending in .el should\nuse the TAGS file /usr/local/emacs/src/TAGS; and anything in or below the\ndirectory /jbw/gnu/ should use the TAGS file /usr15/degree/stud/jbw/gnu/TAGS.\nA file called something like \"/usr/jbw/foo.el\" would use both the TAGS files\n/usr/local/emacs/src/TAGS and /usr15/degree/stud/jbw/gnu/TAGS (in that order)\nbecause it matches both patterns.\n\nIf the buffer-local variable `buffer-tag-table' is set, then it names a tags\ntable that is searched before all others when find-tag is executed from this\nbuffer.\n\nIf there is a file called \"TAGS\" in the same directory as the file in \nquestion, then that tags file will always be used as well (after the\n`buffer-tag-table' but before the tables specified by this list.)\n\nIf the variable tags-file-name is set, then the tags file it names will apply\nto all buffers (for backwards compatibility.) It is searched first.\n" :type '(repeat (cons (choice :value "" (regexp :tag "Buffer regexp") (function :tag "Expression")) (string :tag "Tag file or directory"))) :group 'etags)
696
697 (autoload 'visit-tags-table "etags" "\
698 Tell tags commands to use tags table file FILE first.
699 FILE should be the name of a file created with the `etags' program.
700 A directory name is ok too; it means file TAGS in that directory." t nil)
701
702 (autoload 'find-tag "etags" "\
703 *Find tag whose name contains TAGNAME.
704 Selects the buffer that the tag is contained in
705 and puts point at its definition.
706 If TAGNAME is a null string, the expression in the buffer
707 around or before point is used as the tag name.
708 If called interactively with a numeric argument, searches for the next tag
709 in the tag table that matches the tagname used in the previous find-tag.
710 If second arg OTHER-WINDOW is non-nil, uses another window to display
711 the tag.
712
713 This version of this function supports multiple active tags tables,
714 and completion.
715
716 Variables of note:
717
718 tag-table-alist controls which tables apply to which buffers
719 tags-file-name a default tags table
720 tags-build-completion-table controls completion behavior
721 buffer-tag-table another way of specifying a buffer-local table
722 make-tags-files-invisible whether tags tables should be very hidden
723 tag-mark-stack-max how many tags-based hops to remember" t nil)
724
725 (autoload 'find-tag-other-window "etags" "\
726 *Find tag whose name contains TAGNAME.
727 Selects the buffer that the tag is contained in in another window
728 and puts point at its definition.
729 If TAGNAME is a null string, the expression in the buffer
730 around or before point is used as the tag name.
731 If second arg NEXT is non-nil (interactively, with prefix arg),
732 searches for the next tag in the tag table
733 that matches the tagname used in the previous find-tag.
734
735 This version of this function supports multiple active tags tables,
736 and completion.
737
738 Variables of note:
739
740 tag-table-alist controls which tables apply to which buffers
741 tags-file-name a default tags table
742 tags-build-completion-table controls completion behavior
743 buffer-tag-table another way of specifying a buffer-local table
744 make-tags-files-invisible whether tags tables should be very hidden
745 tag-mark-stack-max how many tags-based hops to remember" t nil)
746
747 (autoload 'next-file "etags" "\
748 Select next file among files in current tag table(s).
749
750 A first argument of t (prefix arg, if interactive) initializes to the
751 beginning of the list of files in the (first) tags table. If the argument
752 is neither nil nor t, it is evalled to initialize the list of files.
753
754 Non-nil second argument NOVISIT means use a temporary buffer
755 to save time and avoid uninteresting warnings.
756
757 Value is nil if the file was already visited;
758 if the file was newly read in, the value is the filename." t nil)
759
760 (autoload 'tags-loop-continue "etags" "\
761 Continue last \\[tags-search] or \\[tags-query-replace] command.
762 Used noninteractively with non-nil argument to begin such a command (the
763 argument is passed to `next-file', which see).
764 Two variables control the processing we do on each file:
765 the value of `tags-loop-scan' is a form to be executed on each file
766 to see if it is interesting (it returns non-nil if so)
767 and `tags-loop-operate' is a form to execute to operate on an interesting file
768 If the latter returns non-nil, we exit; otherwise we scan the next file." t nil)
769
770 (autoload 'tags-search "etags" "\
771 Search through all files listed in tags table for match for REGEXP.
772 Stops when a match is found.
773 To continue searching for next match, use command \\[tags-loop-continue].
774
775 See documentation of variable `tag-table-alist'." t nil)
776
777 (autoload 'tags-query-replace "etags" "\
778 Query-replace-regexp FROM with TO through all files listed in tags table.
779 Third arg DELIMITED (prefix arg) means replace only word-delimited matches.
780 If you exit (\\[keyboard-quit] or ESC), you can resume the query-replace
781 with the command \\[tags-loop-continue].
782
783 See documentation of variable `tag-table-alist'." t nil)
784
785 (autoload 'list-tags "etags" "\
786 Display list of tags in file FILE.
787 FILE should not contain a directory spec
788 unless it has one in the tag table." t nil)
789
790 (autoload 'tags-apropos "etags" "\
791 Display list of all tags in tag table REGEXP matches." t nil)
792
793 ;;;***
794
795 ;;;### (autoloads (font-lock-set-defaults-1 font-lock-fontify-buffer turn-off-font-lock turn-on-font-lock font-lock-mode) "font-lock" "lisp/font-lock.el")
796
797 (defvar font-lock-auto-fontify t "\
798 *Whether font-lock should automatically fontify files as they're loaded.
799 This will only happen if font-lock has fontifying keywords for the major
800 mode of the file. You can get finer-grained control over auto-fontification
801 by using this variable in combination with `font-lock-mode-enable-list' or
802 `font-lock-mode-disable-list'.")
803
804 (defvar font-lock-mode-enable-list nil "\
805 *List of modes to auto-fontify, if `font-lock-auto-fontify' is nil.")
806
807 (defvar font-lock-mode-disable-list nil "\
808 *List of modes not to auto-fontify, if `font-lock-auto-fontify' is t.")
809
810 (defvar font-lock-use-colors '(color) "\
811 *Specification for when Font Lock will set up color defaults.
812 Normally this should be '(color), meaning that Font Lock will set up
813 color defaults that are only used on color displays. Set this to nil
814 if you don't want Font Lock to set up color defaults at all. This
815 should be one of
816
817 -- a list of valid tags, meaning that the color defaults will be used
818 when all of the tags apply. (e.g. '(color x))
819 -- a list whose first element is 'or and whose remaining elements are
820 lists of valid tags, meaning that the defaults will be used when
821 any of the tag lists apply.
822 -- nil, meaning that the defaults should not be set up at all.
823
824 \(If you specify face values in your init file, they will override any
825 that Font Lock specifies, regardless of whether you specify the face
826 values before or after loading Font Lock.)
827
828 See also `font-lock-use-fonts'. If you want more control over the faces
829 used for fontification, see the documentation of `font-lock-mode' for
830 how to do it.")
831
832 (defvar font-lock-use-fonts '(or (mono) (grayscale)) "\
833 *Specification for when Font Lock will set up non-color defaults.
834
835 Normally this should be '(or (mono) (grayscale)), meaning that Font
836 Lock will set up non-color defaults that are only used on either mono
837 or grayscale displays. Set this to nil if you don't want Font Lock to
838 set up non-color defaults at all. This should be one of
839
840 -- a list of valid tags, meaning that the non-color defaults will be used
841 when all of the tags apply. (e.g. '(grayscale x))
842 -- a list whose first element is 'or and whose remaining elements are
843 lists of valid tags, meaning that the defaults will be used when
844 any of the tag lists apply.
845 -- nil, meaning that the defaults should not be set up at all.
846
847 \(If you specify face values in your init file, they will override any
848 that Font Lock specifies, regardless of whether you specify the face
849 values before or after loading Font Lock.)
850
851 See also `font-lock-use-colors'. If you want more control over the faces
852 used for fontification, see the documentation of `font-lock-mode' for
853 how to do it.")
854
855 (defvar font-lock-maximum-decoration nil "\
856 *If non-nil, the maximum decoration level for fontifying.
857 If nil, use the minimum decoration (equivalent to level 0).
858 If t, use the maximum decoration available.
859 If a number, use that level of decoration (or if not available the maximum).
860 If a list, each element should be a cons pair of the form (MAJOR-MODE . LEVEL),
861 where MAJOR-MODE is a symbol or t (meaning the default). For example:
862 ((c++-mode . 2) (c-mode . t) (t . 1))
863 means use level 2 decoration for buffers in `c++-mode', the maximum decoration
864 available for buffers in `c-mode', and level 1 decoration otherwise.")
865
866 (define-obsolete-variable-alias 'font-lock-use-maximal-decoration 'font-lock-maximum-decoration)
867
868 (defvar font-lock-maximum-size (* 250 1024) "\
869 *If non-nil, the maximum size for buffers for fontifying.
870 Only buffers less than this can be fontified when Font Lock mode is turned on.
871 If nil, means size is irrelevant.
872 If a list, each element should be a cons pair of the form (MAJOR-MODE . SIZE),
873 where MAJOR-MODE is a symbol or t (meaning the default). For example:
874 ((c++-mode . 256000) (c-mode . 256000) (rmail-mode . 1048576))
875 means that the maximum size is 250K for buffers in `c++-mode' or `c-mode', one
876 megabyte for buffers in `rmail-mode', and size is irrelevant otherwise.")
877
878 (defvar font-lock-keywords nil "\
879 *A list of the keywords to highlight.
880 Each element should be of the form:
881
882 MATCHER
883 (MATCHER . MATCH)
884 (MATCHER . FACENAME)
885 (MATCHER . HIGHLIGHT)
886 (MATCHER HIGHLIGHT ...)
887 (eval . FORM)
888
889 where HIGHLIGHT should be either MATCH-HIGHLIGHT or MATCH-ANCHORED.
890
891 FORM is an expression, whose value should be a keyword element,
892 evaluated when the keyword is (first) used in a buffer. This feature
893 can be used to provide a keyword that can only be generated when Font
894 Lock mode is actually turned on.
895
896 For highlighting single items, typically only MATCH-HIGHLIGHT is required.
897 However, if an item or (typically) items is to be highlighted following the
898 instance of another item (the anchor) then MATCH-ANCHORED may be required.
899
900 MATCH-HIGHLIGHT should be of the form:
901
902 (MATCH FACENAME OVERRIDE LAXMATCH)
903
904 Where MATCHER can be either the regexp to search for, a variable
905 containing the regexp to search for, or the function to call to make
906 the search (called with one argument, the limit of the search). MATCH
907 is the subexpression of MATCHER to be highlighted. FACENAME is either
908 a symbol naming a face, or an expression whose value is the face name
909 to use. If you want FACENAME to be a symbol that evaluates to a face,
910 use a form like \"(progn sym)\".
911
912 OVERRIDE and LAXMATCH are flags. If OVERRIDE is t, existing fontification may
913 be overwritten. If `keep', only parts not already fontified are highlighted.
914 If `prepend' or `append', existing fontification is merged with the new, in
915 which the new or existing fontification, respectively, takes precedence.
916 If LAXMATCH is non-nil, no error is signalled if there is no MATCH in MATCHER.
917
918 For example, an element of the form highlights (if not already highlighted):
919
920 \"\\\\\\=<foo\\\\\\=>\" Discrete occurrences of \"foo\" in the value of the
921 variable `font-lock-keyword-face'.
922 (\"fu\\\\(bar\\\\)\" . 1) Substring \"bar\" within all occurrences of \"fubar\" in
923 the value of `font-lock-keyword-face'.
924 (\"fubar\" . fubar-face) Occurrences of \"fubar\" in the value of `fubar-face'.
925 (\"foo\\\\|bar\" 0 foo-bar-face t)
926 Occurrences of either \"foo\" or \"bar\" in the value
927 of `foo-bar-face', even if already highlighted.
928
929 MATCH-ANCHORED should be of the form:
930
931 (MATCHER PRE-MATCH-FORM POST-MATCH-FORM MATCH-HIGHLIGHT ...)
932
933 Where MATCHER is as for MATCH-HIGHLIGHT with one exception; see below.
934 PRE-MATCH-FORM and POST-MATCH-FORM are evaluated before the first, and after
935 the last, instance MATCH-ANCHORED's MATCHER is used. Therefore they can be
936 used to initialise before, and cleanup after, MATCHER is used. Typically,
937 PRE-MATCH-FORM is used to move to some position relative to the original
938 MATCHER, before starting with MATCH-ANCHORED's MATCHER. POST-MATCH-FORM might
939 be used to move, before resuming with MATCH-ANCHORED's parent's MATCHER.
940
941 For example, an element of the form highlights (if not already highlighted):
942
943 (\"\\\\\\=<anchor\\\\\\=>\" (0 anchor-face) (\"\\\\\\=<item\\\\\\=>\" nil nil (0 item-face)))
944
945 Discrete occurrences of \"anchor\" in the value of `anchor-face', and subsequent
946 discrete occurrences of \"item\" (on the same line) in the value of `item-face'.
947 (Here PRE-MATCH-FORM and POST-MATCH-FORM are nil. Therefore \"item\" is
948 initially searched for starting from the end of the match of \"anchor\", and
949 searching for subsequent instance of \"anchor\" resumes from where searching
950 for \"item\" concluded.)
951
952 The above-mentioned exception is as follows. The limit of the MATCHER search
953 defaults to the end of the line after PRE-MATCH-FORM is evaluated.
954 However, if PRE-MATCH-FORM returns a position greater than the position after
955 PRE-MATCH-FORM is evaluated, that position is used as the limit of the search.
956 It is generally a bad idea to return a position greater than the end of the
957 line, i.e., cause the MATCHER search to span lines.
958
959 Note that the MATCH-ANCHORED feature is experimental; in the future, we may
960 replace it with other ways of providing this functionality.
961
962 These regular expressions should not match text which spans lines. While
963 \\[font-lock-fontify-buffer] handles multi-line patterns correctly, updating
964 when you edit the buffer does not, since it considers text one line at a time.
965
966 Be very careful composing regexps for this list;
967 the wrong pattern can dramatically slow things down!")
968
969 (make-variable-buffer-local 'font-lock-keywords)
970
971 (defvar font-lock-mode nil)
972
973 (defvar font-lock-mode-hook nil "\
974 Function or functions to run on entry to font-lock-mode.")
975
976 (autoload 'font-lock-mode "font-lock" "\
977 Toggle Font Lock Mode.
978 With arg, turn font-lock mode on if and only if arg is positive.
979
980 When Font Lock mode is enabled, text is fontified as you type it:
981
982 - Comments are displayed in `font-lock-comment-face';
983 - Strings are displayed in `font-lock-string-face';
984 - Documentation strings (in Lisp-like languages) are displayed in
985 `font-lock-doc-string-face';
986 - Language keywords (\"reserved words\") are displayed in
987 `font-lock-keyword-face';
988 - Function names in their defining form are displayed in
989 `font-lock-function-name-face';
990 - Variable names in their defining form are displayed in
991 `font-lock-variable-name-face';
992 - Type names are displayed in `font-lock-type-face';
993 - References appearing in help files and the like are displayed
994 in `font-lock-reference-face';
995 - Preprocessor declarations are displayed in
996 `font-lock-preprocessor-face';
997
998 and
999
1000 - Certain other expressions are displayed in other faces according
1001 to the value of the variable `font-lock-keywords'.
1002
1003 Where modes support different levels of fontification, you can use the variable
1004 `font-lock-maximum-decoration' to specify which level you generally prefer.
1005 When you turn Font Lock mode on/off the buffer is fontified/defontified, though
1006 fontification occurs only if the buffer is less than `font-lock-maximum-size'.
1007 To fontify a buffer without turning on Font Lock mode, and regardless of buffer
1008 size, you can use \\[font-lock-fontify-buffer].
1009
1010 See the variable `font-lock-keywords' for customization." t nil)
1011
1012 (autoload 'turn-on-font-lock "font-lock" "\
1013 Unconditionally turn on Font Lock mode." nil nil)
1014
1015 (autoload 'turn-off-font-lock "font-lock" "\
1016 Unconditionally turn off Font Lock mode." nil nil)
1017
1018 (autoload 'font-lock-fontify-buffer "font-lock" "\
1019 Fontify the current buffer the way `font-lock-mode' would.
1020 See `font-lock-mode' for details.
1021
1022 This can take a while for large buffers." t nil)
1023
1024 (autoload 'font-lock-set-defaults-1 "font-lock" nil nil nil)
1025
1026 (add-minor-mode 'font-lock-mode " Font")
1027
1028 ;;;***
1029
1030 ;;;### (autoloads (x-font-build-cache font-default-size-for-device font-default-encoding-for-device font-default-registry-for-device font-default-family-for-device font-default-object-for-device font-default-font-for-device font-create-object) "font" "lisp/font.el")
1031
1032 (autoload 'font-create-object "font" nil nil nil)
1033
1034 (autoload 'font-default-font-for-device "font" nil nil nil)
1035
1036 (autoload 'font-default-object-for-device "font" nil nil nil)
1037
1038 (autoload 'font-default-family-for-device "font" nil nil nil)
1039
1040 (autoload 'font-default-registry-for-device "font" nil nil nil)
1041
1042 (autoload 'font-default-encoding-for-device "font" nil nil nil)
1043
1044 (autoload 'font-default-size-for-device "font" nil nil nil)
1045
1046 (autoload 'x-font-build-cache "font" nil nil nil)
1047
1048 ;;;***
1049
1050 ;;;### (autoloads (gnuserv-start gnuserv-running-p) "gnuserv" "lisp/gnuserv.el")
1051
1052 (defcustom gnuserv-frame nil "*The frame to be used to display all edited files.\nIf nil, then a new frame is created for each file edited.\nIf t, then the currently selected frame will be used.\nIf a function, then this will be called with a symbol `x' or `tty' as the\nonly argument, and its return value will be interpreted as above." :tag "Gnuserv Frame" :type '(radio (const :tag "Create new frame each time" nil) (const :tag "Use selected frame" t) (function-item :tag "Use main Emacs frame" gnuserv-main-frame-function) (function-item :tag "Use visible frame, otherwise create new" gnuserv-visible-frame-function) (function-item :tag "Create special Gnuserv frame and use it" gnuserv-special-frame-function) (function :tag "Other")) :group 'gnuserv :group 'frames)
1053
1054 (autoload 'gnuserv-running-p "gnuserv" "\
1055 Return non-nil if a gnuserv process is running from this XEmacs session." nil nil)
1056
1057 (autoload 'gnuserv-start "gnuserv" "\
1058 Allow this Emacs process to be a server for client processes.
1059 This starts a gnuserv communications subprocess through which
1060 client \"editors\" (gnuclient and gnudoit) can send editing commands to
1061 this Emacs job. See the gnuserv(1) manual page for more details.
1062
1063 Prefix arg means just kill any existing server communications subprocess." t nil)
1064
1065 ;;;***
1066
1067 ;;;### (autoloads nil "help-macro" "lisp/help-macro.el")
1068
1069 (defcustom three-step-help t "*Non-nil means give more info about Help command in three steps.\nThe three steps are simple prompt, prompt with all options,\nand window listing and describing the options.\nA value of nil means skip the middle step, so that\n\\[help-command] \\[help-command] gives the window that lists the options." :type 'boolean :group 'help-appearance)
1070
1071 ;;;***
1072
1073 ;;;### (autoloads (hyper-apropos-popup-menu hyper-apropos-set-variable hyper-set-variable hyper-apropos-read-variable-symbol hyper-describe-function hyper-describe-variable hyper-describe-face hyper-describe-key-briefly hyper-describe-key hyper-apropos) "hyper-apropos" "lisp/hyper-apropos.el")
1074
1075 (autoload 'hyper-apropos "hyper-apropos" "\
1076 Display lists of functions and variables matching REGEXP
1077 in buffer \"*Hyper Apropos*\". If optional prefix arg is given, then the
1078 value of `hyper-apropos-programming-apropos' is toggled for this search.
1079 See also `hyper-apropos-mode'." t nil)
1080
1081 (autoload 'hyper-describe-key "hyper-apropos" nil t nil)
1082
1083 (autoload 'hyper-describe-key-briefly "hyper-apropos" nil t nil)
1084
1085 (autoload 'hyper-describe-face "hyper-apropos" "\
1086 Describe face..
1087 See also `hyper-apropos' and `hyper-describe-function'." t nil)
1088
1089 (autoload 'hyper-describe-variable "hyper-apropos" "\
1090 Hypertext drop-in replacement for `describe-variable'.
1091 See also `hyper-apropos' and `hyper-describe-function'." t nil)
1092
1093 (autoload 'hyper-describe-function "hyper-apropos" "\
1094 Hypertext replacement for `describe-function'. Unlike `describe-function'
1095 in that the symbol under the cursor is the default if it is a function.
1096 See also `hyper-apropos' and `hyper-describe-variable'." t nil)
1097
1098 (autoload 'hyper-apropos-read-variable-symbol "hyper-apropos" "\
1099 Hypertext drop-in replacement for `describe-variable'.
1100 See also `hyper-apropos' and `hyper-describe-function'." nil nil)
1101
1102 (define-obsolete-function-alias 'hypropos-read-variable-symbol 'hyper-apropos-read-variable-symbol)
1103
1104 (define-obsolete-function-alias 'hypropos-get-doc 'hyper-apropos-get-doc)
1105
1106 (autoload 'hyper-set-variable "hyper-apropos" nil t nil)
1107
1108 (autoload 'hyper-apropos-set-variable "hyper-apropos" "\
1109 Interactively set the variable on the current line." t nil)
1110
1111 (define-obsolete-function-alias 'hypropos-set-variable 'hyper-apropos-set-variable)
1112
1113 (autoload 'hyper-apropos-popup-menu "hyper-apropos" nil t nil)
1114
1115 (define-obsolete-function-alias 'hypropos-popup-menu 'hyper-apropos-popup-menu)
1116
1117 ;;;***
1118
1119 ;;;### (autoloads (Info-elisp-ref Info-emacs-key Info-goto-emacs-key-command-node Info-goto-emacs-command-node Info-emacs-command Info-search Info-visit-file Info-goto-node Info-query info) "info" "lisp/info.el")
1120
1121 (autoload 'info "info" "\
1122 Enter Info, the documentation browser.
1123 Optional argument FILE specifies the file to examine;
1124 the default is the top-level directory of Info.
1125
1126 In interactive use, a prefix argument directs this command
1127 to read a file name from the minibuffer." t nil)
1128
1129 (autoload 'Info-query "info" "\
1130 Enter Info, the documentation browser. Prompt for name of Info file." t nil)
1131
1132 (autoload 'Info-goto-node "info" "\
1133 Go to info node named NAME. Give just NODENAME or (FILENAME)NODENAME.
1134 Actually, the following interpretations of NAME are tried in order:
1135 (FILENAME)NODENAME
1136 (FILENAME) (using Top node)
1137 NODENAME (in current file)
1138 TAGNAME (see below)
1139 FILENAME (using Top node)
1140 where TAGNAME is a string that appears in quotes: \"TAGNAME\", in an
1141 annotation for any node of any file. (See `a' and `x' commands.)" t nil)
1142
1143 (autoload 'Info-visit-file "info" "\
1144 Directly visit an info file." t nil)
1145
1146 (autoload 'Info-search "info" "\
1147 Search for REGEXP, starting from point, and select node it's found in." t nil)
1148
1149 (autoload 'Info-emacs-command "info" "\
1150 Look up an Emacs command in the Emacs manual in the Info system.
1151 This command is designed to be used whether you are already in Info or not." t nil)
1152
1153 (autoload 'Info-goto-emacs-command-node "info" "\
1154 Look up an Emacs command in the Emacs manual in the Info system.
1155 This command is designed to be used whether you are already in Info or not." t nil)
1156
1157 (autoload 'Info-goto-emacs-key-command-node "info" "\
1158 Look up an Emacs key sequence in the Emacs manual in the Info system.
1159 This command is designed to be used whether you are already in Info or not." t nil)
1160
1161 (autoload 'Info-emacs-key "info" "\
1162 Look up an Emacs key sequence in the Emacs manual in the Info system.
1163 This command is designed to be used whether you are already in Info or not." t nil)
1164
1165 (autoload 'Info-elisp-ref "info" "\
1166 Look up an Emacs Lisp function in the Elisp manual in the Info system.
1167 This command is designed to be used whether you are already in Info or not." t nil)
1168
1169 ;;;***
1170
1171 ;;;### (autoloads nil "itimer-autosave" "lisp/itimer-autosave.el")
1172
1173 ;;;***
1174
1175 ;;;### (autoloads nil "loaddefs" "lisp/loaddefs.el")
1176
1177 ;;;***
1178
1179 ;;;### (autoloads (package-admin-add-binary-package package-admin-add-single-file-package) "package-admin" "lisp/package-admin.el")
1180
1181 (autoload 'package-admin-add-single-file-package "package-admin" "\
1182 Install a single file Lisp package into XEmacs package hierarchy.
1183 `file' should be the full path to the lisp file to install.
1184 `destdir' should be a simple directory name.
1185 The optional `pkg-dir' can be used to override the default package hiearchy
1186 \(last package-path)." t nil)
1187
1188 (autoload 'package-admin-add-binary-package "package-admin" "\
1189 Install a pre-bytecompiled XEmacs package into package hierarchy." t nil)
1190
1191 ;;;***
1192
1193 ;;;### (autoloads (list-load-path-shadows) "shadow" "lisp/shadow.el")
1194
1195 (autoload 'list-load-path-shadows "shadow" "\
1196 Display a list of Emacs Lisp files that shadow other files.
1197
1198 This function lists potential load-path problems. Directories in the
1199 `load-path' variable are searched, in order, for Emacs Lisp
1200 files. When a previously encountered file name is found again, a
1201 message is displayed indicating that the later file is \"hidden\" by
1202 the earlier.
1203
1204 For example, suppose `load-path' is set to
1205
1206 \(\"/usr/gnu/emacs/site-lisp\" \"/usr/gnu/emacs/share/emacs/19.30/lisp\")
1207
1208 and that each of these directories contains a file called XXX.el. Then
1209 XXX.el in the site-lisp directory is referred to by all of:
1210 \(require 'XXX), (autoload .... \"XXX\"), (load-library \"XXX\") etc.
1211
1212 The first XXX.el file prevents emacs from seeing the second (unless
1213 the second is loaded explicitly via load-file).
1214
1215 When not intended, such shadowings can be the source of subtle
1216 problems. For example, the above situation may have arisen because the
1217 XXX package was not distributed with versions of emacs prior to
1218 19.30. An emacs maintainer downloaded XXX from elsewhere and installed
1219 it. Later, XXX was updated and included in the emacs distribution.
1220 Unless the emacs maintainer checks for this, the new version of XXX
1221 will be hidden behind the old (which may no longer work with the new
1222 emacs version).
1223
1224 This function performs these checks and flags all possible
1225 shadowings. Because a .el file may exist without a corresponding .elc
1226 \(or vice-versa), these suffixes are essentially ignored. A file
1227 XXX.elc in an early directory (that does not contain XXX.el) is
1228 considered to shadow a later file XXX.el, and vice-versa.
1229
1230 When run interactively, the shadowings (if any) are displayed in a
1231 buffer called `*Shadows*'. Shadowings are located by calling the
1232 \(non-interactive) companion function, `find-emacs-lisp-shadows'." t nil)
1233
1234 ;;;***
1235
1236 ;;;### (autoloads (load-default-sounds load-sound-file) "sound" "lisp/sound.el")
1237
1238 (or sound-alist (setq sound-alist '((ready nil) (warp nil))))
1239
1240 (autoload 'load-sound-file "sound" "\
1241 Read in an audio-file and add it to the sound-alist.
1242
1243 You can only play sound files if you are running on display 0 of the
1244 console of a machine with native sound support or running a NetAudio
1245 server and XEmacs has the necessary sound support compiled in.
1246
1247 The sound file must be in the Sun/NeXT U-LAW format, except on Linux,
1248 where .wav files are also supported by the sound card drivers." t nil)
1249
1250 (autoload 'load-default-sounds "sound" "\
1251 Load and install some sound files as beep-types, using
1252 `load-sound-file'. This only works if you're on display 0 of the
1253 console of a machine with native sound support or running a NetAudio
1254 server and XEmacs has the necessary sound support compiled in." t nil)
1255
1256 ;;;***
1257
1258 ;;;### (autoloads (auto-view-mode view-major-mode view-mode view-minor-mode view-buffer-other-window view-file-other-window view-buffer view-file) "view-less" "lisp/view-less.el")
1259
1260 (defvar view-minor-mode-map (let ((map (make-keymap))) (set-keymap-name map 'view-minor-mode-map) (suppress-keymap map) (define-key map "-" 'negative-argument) (define-key map " " 'scroll-up) (define-key map "f" 'scroll-up) (define-key map "b" 'scroll-down) (define-key map 'backspace 'scroll-down) (define-key map 'delete 'scroll-down) (define-key map "
1261 " 'view-scroll-lines-up) (define-key map "\n" 'view-scroll-lines-up) (define-key map "e" 'view-scroll-lines-up) (define-key map "j" 'view-scroll-lines-up) (define-key map "y" 'view-scroll-lines-down) (define-key map "k" 'view-scroll-lines-down) (define-key map "d" 'view-scroll-some-lines-up) (define-key map "u" 'view-scroll-some-lines-down) (define-key map "r" 'recenter) (define-key map "t" 'toggle-truncate-lines) (define-key map "N" 'view-buffer) (define-key map "E" 'view-file) (define-key map "P" 'view-buffer) (define-key map "!" 'shell-command) (define-key map "|" 'shell-command-on-region) (define-key map "=" 'what-line) (define-key map "?" 'view-search-backward) (define-key map "h" 'view-mode-describe) (define-key map "s" 'view-repeat-search) (define-key map "n" 'view-repeat-search) (define-key map "/" 'view-search-forward) (define-key map "\\" 'view-search-backward) (define-key map "g" 'view-goto-line) (define-key map "G" 'view-last-windowful) (define-key map "%" 'view-goto-percent) (define-key map "p" 'view-goto-percent) (define-key map "m" 'point-to-register) (define-key map "'" 'register-to-point) (define-key map "C" 'view-cleanup-backspaces) (define-key map "" 'view-quit) (define-key map "" 'view-quit-toggle-ro) (define-key map "q" 'view-quit) map))
1262
1263 (defvar view-mode-map (let ((map (copy-keymap view-minor-mode-map))) (set-keymap-name map 'view-mode-map) map))
1264
1265 (autoload 'view-file "view-less" "\
1266 Find FILE, enter view mode. With prefix arg OTHER-P, use other window." t nil)
1267
1268 (autoload 'view-buffer "view-less" "\
1269 Switch to BUF, enter view mode. With prefix arg use other window." t nil)
1270
1271 (autoload 'view-file-other-window "view-less" "\
1272 Find FILE in other window, and enter view mode." t nil)
1273
1274 (autoload 'view-buffer-other-window "view-less" "\
1275 Switch to BUFFER in another window, and enter view mode." t nil)
1276
1277 (autoload 'view-minor-mode "view-less" "\
1278 Minor mode for viewing text, with bindings like `less'.
1279 Commands are:
1280 \\<view-minor-mode-map>
1281 0..9 prefix args
1282 - prefix minus
1283 \\[scroll-up] page forward
1284 \\[scroll-down] page back
1285 \\[view-scroll-lines-up] scroll prefix-arg lines forward, default 1.
1286 \\[view-scroll-lines-down] scroll prefix-arg lines backward, default 1.
1287 \\[view-scroll-some-lines-down] scroll prefix-arg lines backward, default 10.
1288 \\[view-scroll-some-lines-up] scroll prefix-arg lines forward, default 10.
1289 \\[what-line] print line number
1290 \\[view-mode-describe] print this help message
1291 \\[view-search-forward] regexp search, uses previous string if you just hit RET
1292 \\[view-search-backward] as above but searches backward
1293 \\[view-repeat-search] repeat last search
1294 \\[view-goto-line] goto line prefix-arg, default 1
1295 \\[view-last-windowful] goto line prefix-arg, default last line
1296 \\[view-goto-percent] goto a position by percentage
1297 \\[toggle-truncate-lines] toggle truncate-lines
1298 \\[view-file] view another file
1299 \\[view-buffer] view another buffer
1300 \\[view-cleanup-backspaces] cleanup backspace constructions
1301 \\[shell-command] execute a shell command
1302 \\[shell-command-on-region] execute a shell command with the region as input
1303 \\[view-quit] exit view-mode, and bury the current buffer.
1304
1305 If invoked with the optional (prefix) arg non-nil, view-mode cleans up
1306 backspace constructions.
1307
1308 More precisely:
1309 \\{view-minor-mode-map}" t nil)
1310
1311 (autoload 'view-mode "view-less" "\
1312 View the current buffer using view-minor-mode. This exists to be 99.9%
1313 compatible with the implementations of `view-mode' in view.el and older
1314 versions of view-less.el." t nil)
1315
1316 (autoload 'view-major-mode "view-less" "\
1317 View the current buffer using view-mode, as a major mode.
1318 This function has a nonstandard name because `view-mode' is wrongly
1319 named but is like this for compatibility reasons." t nil)
1320
1321 (autoload 'auto-view-mode "view-less" "\
1322 If the file of the current buffer is not writable, call view-mode.
1323 This is meant to be added to `find-file-hooks'." nil nil)
579 1324
580 ;;;*** 1325 ;;;***
581 1326
582 ;;;### (autoloads (widget-minor-mode widget-browse-other-window widget-browse widget-browse-at) "wid-browse" "lisp/wid-browse.el") 1327 ;;;### (autoloads (widget-minor-mode widget-browse-other-window widget-browse widget-browse-at) "wid-browse" "lisp/wid-browse.el")
583 1328
633 1378
634 (autoload 'font-menu-weight-constructor "x-font-menu" nil nil nil) 1379 (autoload 'font-menu-weight-constructor "x-font-menu" nil nil nil)
635 1380
636 ;;;*** 1381 ;;;***
637 1382
638 (provide 'TopLevel-autoloads) 1383 (provide 'Standard-autoloads)