Mercurial > hg > xemacs-beta

comparison lisp/auto-autoloads.el @ 371:cc15677e0335 r21-2b1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2b1
author cvs
date Mon, 13 Aug 2007 11:03:08 +0200
parents 1d62742628b6
children 6240c7796c7a
comparison
equal deleted inserted replaced
370:bd866891f083 371:cc15677e0335
7 7
8 ;;;### (autoloads (about-xemacs) "about" "lisp/about.el") 8 ;;;### (autoloads (about-xemacs) "about" "lisp/about.el")
9 9
10 (autoload 'about-xemacs "about" "\ 10 (autoload 'about-xemacs "about" "\
11 Describe the True Editor and its minions." t nil) 11 Describe the True Editor and its minions." t nil)
12
13 ;;;***
14
15 ;;;### (autoloads (set-modified-alist modify-alist remove-alist set-alist del-alist put-alist) "alist" "lisp/alist.el")
16
17 (autoload 'put-alist "alist" "\
18 Modify ALIST to set VALUE to ITEM.
19 If there is a pair whose car is ITEM, replace its cdr by VALUE.
20 If there is not such pair, create new pair (ITEM . VALUE) and
21 return new alist whose car is the new pair and cdr is ALIST.
22 [tomo's ELIS like function]" nil nil)
23
24 (autoload 'del-alist "alist" "\
25 If there is a pair whose key is ITEM, delete it from ALIST.
26 [tomo's ELIS emulating function]" nil nil)
27
28 (autoload 'set-alist "alist" "\
29 Modify a alist indicated by SYMBOL to set VALUE to ITEM." nil nil)
30
31 (autoload 'remove-alist "alist" "\
32 Remove ITEM from the alist indicated by SYMBOL." nil nil)
33
34 (autoload 'modify-alist "alist" "\
35 Modify alist DEFAULT into alist MODIFIER." nil nil)
36
37 (autoload 'set-modified-alist "alist" "\
38 Modify a value of a symbol SYM into alist MODIFIER.
39 The symbol SYM should be alist. If it is not bound,
40 its value regard as nil." nil nil)
41 12
42 ;;;*** 13 ;;;***
43 14
44 ;;;### (autoloads (apropos-documentation apropos-value apropos apropos-command) "apropos" "lisp/apropos.el") 15 ;;;### (autoloads (apropos-documentation apropos-value apropos apropos-command) "apropos" "lisp/apropos.el")
45 16
81 are used." t nil) 52 are used." t nil)
82 53
83 (autoload 'update-file-autoloads "autoload" "\ 54 (autoload 'update-file-autoloads "autoload" "\
84 Update the autoloads for FILE in `generated-autoload-file' 55 Update the autoloads for FILE in `generated-autoload-file'
85 \(which FILE might bind in its local variables). 56 \(which FILE might bind in its local variables).
86 This function refuses to update autoloads files." t nil) 57 This functions refuses to update autoloads files." t nil)
87 58
88 (autoload 'update-autoloads-here "autoload" "\ 59 (autoload 'update-autoloads-here "autoload" "\
89 Update sections of the current buffer generated by `update-file-autoloads'." t nil) 60 Update sections of the current buffer generated by `update-file-autoloads'." t nil)
90 61
91 (autoload 'update-autoloads-from-directory "autoload" "\ 62 (autoload 'update-autoloads-from-directory "autoload" "\
692 Otherwise the menu will be named `Customize'. 663 Otherwise the menu will be named `Customize'.
693 The format is suitable for use with `easy-menu-define'." nil nil) 664 The format is suitable for use with `easy-menu-define'." nil nil)
694 665
695 ;;;*** 666 ;;;***
696 667
697 ;;;### (autoloads (custom-set-faces custom-set-face-update-spec custom-declare-face) "cus-face" "lisp/cus-face.el") 668 ;;;### (autoloads (custom-set-faces custom-declare-face) "cus-face" "lisp/cus-face.el")
698 669
699 (autoload 'custom-declare-face "cus-face" "\ 670 (autoload 'custom-declare-face "cus-face" "\
700 Like `defface', but FACE is evaluated as a normal argument." nil nil) 671 Like `defface', but FACE is evaluated as a normal argument." nil nil)
701
702 (autoload 'custom-set-face-update-spec "cus-face" "\
703 Customize the FACE for display types matching DISPLAY, merging
704 in the new items from PLIST" nil nil)
705 672
706 (autoload 'custom-set-faces "cus-face" "\ 673 (autoload 'custom-set-faces "cus-face" "\
707 Initialize faces according to user preferences. 674 Initialize faces according to user preferences.
708 The arguments should be a list where each entry has the form: 675 The arguments should be a list where each entry has the form:
709 676
767 734
768 ;;;### (autoloads nil "easymenu" "lisp/easymenu.el") 735 ;;;### (autoloads nil "easymenu" "lisp/easymenu.el")
769 736
770 ;;;*** 737 ;;;***
771 738
772 ;;;### (autoloads (pop-tag-mark tags-apropos list-tags tags-query-replace tags-search tags-loop-continue next-file tag-complete-symbol find-tag-other-window find-tag visit-tags-table) "etags" "lisp/etags.el") 739 ;;;### (autoloads (tags-apropos list-tags tags-query-replace tags-search tags-loop-continue next-file tag-complete-symbol find-tag-other-window find-tag visit-tags-table) "etags" "lisp/etags.el")
773 740
774 (autoload 'visit-tags-table "etags" "\ 741 (autoload 'visit-tags-table "etags" "\
775 Tell tags commands to use tags table file FILE when all else fails. 742 Tell tags commands to use tags table file FILE when all else fails.
776 FILE should be the name of a file created with the `etags' program. 743 FILE should be the name of a file created with the `etags' program.
777 A directory name is ok too; it means file TAGS in that directory." t nil) 744 A directory name is ok too; it means file TAGS in that directory." t nil)
866 Display list of tags in FILE." t nil) 833 Display list of tags in FILE." t nil)
867 834
868 (autoload 'tags-apropos "etags" "\ 835 (autoload 'tags-apropos "etags" "\
869 Display list of all tags in tag table REGEXP matches." t nil) 836 Display list of all tags in tag table REGEXP matches." t nil)
870 (define-key esc-map "*" 'pop-tag-mark) 837 (define-key esc-map "*" 'pop-tag-mark)
871
872 (autoload 'pop-tag-mark "etags" "\
873 Go to last tag position.
874 `find-tag' maintains a mark-stack seperate from the \\[set-mark-command] mark-stack.
875 This function pops (and moves to) the tag at the top of this stack." t nil)
876 838
877 ;;;*** 839 ;;;***
878 840
879 ;;;### (autoloads (finder-by-keyword) "finder" "lisp/finder.el") 841 ;;;### (autoloads (finder-by-keyword) "finder" "lisp/finder.el")
880 842
1034 size, you can use \\[font-lock-fontify-buffer]. 996 size, you can use \\[font-lock-fontify-buffer].
1035 997
1036 See the variable `font-lock-keywords' for customization." t nil) 998 See the variable `font-lock-keywords' for customization." t nil)
1037 999
1038 (autoload 'turn-on-font-lock "font-lock" "\ 1000 (autoload 'turn-on-font-lock "font-lock" "\
1039 Unconditionally turn on Font Lock mode." t nil) 1001 Unconditionally turn on Font Lock mode." nil nil)
1040 1002
1041 (autoload 'turn-off-font-lock "font-lock" "\ 1003 (autoload 'turn-off-font-lock "font-lock" "\
1042 Unconditionally turn off Font Lock mode." t nil) 1004 Unconditionally turn off Font Lock mode." nil nil)
1043 1005
1044 (autoload 'font-lock-fontify-buffer "font-lock" "\ 1006 (autoload 'font-lock-fontify-buffer "font-lock" "\
1045 Fontify the current buffer the way `font-lock-mode' would. 1007 Fontify the current buffer the way `font-lock-mode' would.
1046 See `font-lock-mode' for details. 1008 See `font-lock-mode' for details.
1047 1009
1094 1056
1095 (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) 1057 (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)
1096 1058
1097 ;;;*** 1059 ;;;***
1098 1060
1099 ;;;### (autoloads (hyper-apropos-popup-menu hyper-apropos-set-variable hyper-set-variable hyper-apropos-read-variable-symbol hyper-describe-function hyper-where-is hyper-describe-variable hyper-describe-face hyper-describe-key-briefly hyper-describe-key hyper-apropos) "hyper-apropos" "lisp/hyper-apropos.el") 1061 ;;;### (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")
1100 1062
1101 (autoload 'hyper-apropos "hyper-apropos" "\ 1063 (autoload 'hyper-apropos "hyper-apropos" "\
1102 Display lists of functions and variables matching REGEXP 1064 Display lists of functions and variables matching REGEXP
1103 in buffer \"*Hyper Apropos*\". If optional prefix arg is given, then the 1065 in buffer \"*Hyper Apropos*\". If optional prefix arg is given, then the
1104 value of `hyper-apropos-programming-apropos' is toggled for this search. 1066 value of `hyper-apropos-programming-apropos' is toggled for this search.
1114 1076
1115 (autoload 'hyper-describe-variable "hyper-apropos" "\ 1077 (autoload 'hyper-describe-variable "hyper-apropos" "\
1116 Hypertext drop-in replacement for `describe-variable'. 1078 Hypertext drop-in replacement for `describe-variable'.
1117 See also `hyper-apropos' and `hyper-describe-function'." t nil) 1079 See also `hyper-apropos' and `hyper-describe-function'." t nil)
1118 1080
1119 (autoload 'hyper-where-is "hyper-apropos" "\
1120 Print message listing key sequences that invoke specified command." t nil)
1121
1122 (autoload 'hyper-describe-function "hyper-apropos" "\ 1081 (autoload 'hyper-describe-function "hyper-apropos" "\
1123 Hypertext replacement for `describe-function'. Unlike `describe-function' 1082 Hypertext replacement for `describe-function'. Unlike `describe-function'
1124 in that the symbol under the cursor is the default if it is a function. 1083 in that the symbol under the cursor is the default if it is a function.
1125 See also `hyper-apropos' and `hyper-describe-variable'." t nil) 1084 See also `hyper-apropos' and `hyper-describe-variable'." t nil)
1126 1085
1149 1108
1150 (defvar Info-directory-list nil "\ 1109 (defvar Info-directory-list nil "\
1151 List of directories to search for Info documentation files. 1110 List of directories to search for Info documentation files.
1152 1111
1153 The first directory in this list, the \"dir\" file there will become 1112 The first directory in this list, the \"dir\" file there will become
1154 the (dir)Top node of the Info documentation tree. 1113 the (dir)Top node of the Info documentation tree. If you wish to
1155 1114 modify the info search path, use `M-x customize-variable,
1156 Note: DO NOT use the `customize' interface to change the value of this 1115 Info-directory-list' to do so.")
1157 variable. Its value is created dynamically on each startup, depending
1158 on XEmacs packages installed on the system. If you want to change the
1159 search path, make the needed modifications on the variable's value
1160 from .emacs. For instance:
1161
1162 (setq Info-directory-list (cons \"~/info\" Info-directory-list))")
1163 1116
1164 (autoload 'info "info" "\ 1117 (autoload 'info "info" "\
1165 Enter Info, the documentation browser. 1118 Enter Info, the documentation browser.
1166 Optional argument FILE specifies the file to examine; 1119 Optional argument FILE specifies the file to examine;
1167 the default is the top-level directory of Info. 1120 the default is the top-level directory of Info.
1171 1124
1172 (autoload 'Info-query "info" "\ 1125 (autoload 'Info-query "info" "\
1173 Enter Info, the documentation browser. Prompt for name of Info file." t nil) 1126 Enter Info, the documentation browser. Prompt for name of Info file." t nil)
1174 1127
1175 (autoload 'Info-batch-rebuild-dir "info" "\ 1128 (autoload 'Info-batch-rebuild-dir "info" "\
1176 (Re)build `dir' files in the directories remaining on the command line. 1129 (Re)build info `dir' files in the directories remaining on the command line.
1177 Use this from the command line, with `-batch', it won't work in an 1130 Use this from the command line, with `-batch';
1178 interactive XEmacs. 1131 it won't work in an interactive Emacs.
1179 1132 Each file is processed even if an error occurred previously.
1180 Each file is processed even if an error occurred previously. For example, 1133 For example, invoke \"xemacs -batch -f Info-batch-rebuild-dir /usr/local/info\"" nil nil)
1181 invoke \"xemacs -batch -f Info-batch-rebuild-dir /usr/local/info\"" nil nil)
1182 1134
1183 (autoload 'Info-goto-node "info" "\ 1135 (autoload 'Info-goto-node "info" "\
1184 Go to info node named NAME. Give just NODENAME or (FILENAME)NODENAME. 1136 Go to info node named NAME. Give just NODENAME or (FILENAME)NODENAME.
1185 Actually, the following interpretations of NAME are tried in order: 1137 Actually, the following interpretations of NAME are tried in order:
1186 (FILENAME)NODENAME 1138 (FILENAME)NODENAME
1232 ;;;*** 1184 ;;;***
1233 1185
1234 ;;;### (autoloads (mwheel-install) "mwheel" "lisp/mwheel.el") 1186 ;;;### (autoloads (mwheel-install) "mwheel" "lisp/mwheel.el")
1235 1187
1236 (autoload 'mwheel-install "mwheel" "\ 1188 (autoload 'mwheel-install "mwheel" "\
1237 Enable mouse wheel support." t nil) 1189 Enable mouse wheel support." nil nil)
1238 1190
1239 ;;;*** 1191 ;;;***
1240 1192
1241 ;;;### (autoloads (package-admin-add-binary-package package-admin-add-single-file-package) "package-admin" "lisp/package-admin.el") 1193 ;;;### (autoloads (package-admin-add-binary-package package-admin-add-single-file-package) "package-admin" "lisp/package-admin.el")
1242 1194
1250 (autoload 'package-admin-add-binary-package "package-admin" "\ 1202 (autoload 'package-admin-add-binary-package "package-admin" "\
1251 Install a pre-bytecompiled XEmacs package into package hierarchy." t nil) 1203 Install a pre-bytecompiled XEmacs package into package hierarchy." t nil)
1252 1204
1253 ;;;*** 1205 ;;;***
1254 1206
1255 ;;;### (autoloads (package-get-custom package-get-package-provider package-get package-get-dependencies package-get-all package-get-update-all package-get-delete-package package-get-save-base package-get-update-base-from-buffer package-get-update-base package-get-update-base-entry package-get-require-base package-get-download-menu) "package-get" "lisp/package-get.el") 1207 ;;;### (autoloads (package-get-custom package-get-package-provider package-get package-get-all package-get-update-all) "package-get" "lisp/package-get.el")
1256
1257 (defvar package-get-base nil "\
1258 List of packages that are installed at this site.
1259 For each element in the alist, car is the package name and the cdr is
1260 a plist containing information about the package. Typical fields
1261 kept in the plist are:
1262
1263 version - version of this package
1264 provides - list of symbols provided
1265 requires - list of symbols that are required.
1266 These in turn are provided by other packages.
1267 filename - name of the file.
1268 size - size of the file (aka the bundled package)
1269 md5sum - computed md5 checksum
1270 description - What this package is for.
1271 type - Whether this is a 'binary (default) or 'single file package
1272
1273 More fields may be added as needed. An example:
1274
1275 '(
1276 (name
1277 (version \"<version 2>\"
1278 file \"filename\"
1279 description \"what this package is about.\"
1280 provides (<list>)
1281 requires (<list>)
1282 size <integer-bytes>
1283 md5sum \"<checksum\"
1284 type single
1285 )
1286 (version \"<version 1>\"
1287 file \"filename\"
1288 description \"what this package is about.\"
1289 provides (<list>)
1290 requires (<list>)
1291 size <integer-bytes>
1292 md5sum \"<checksum\"
1293 type single
1294 )
1295 ...
1296 ))
1297
1298 For version information, it is assumed things are listed in most
1299 recent to least recent -- in other words, the version names don't have to
1300 be lexically ordered. It is debatable if it makes sense to have more than
1301 one version of a package available.")
1302
1303 (defcustom package-get-download-sites '(("Pre-Releases" "ftp.xemacs.org" "pub/xemacs/beta/experimental/packages") ("xemacs.org" "ftp.xemacs.org" "pub/xemacs/packages") ("crc.ca (Canada)" "ftp.crc.ca" "pub/packages/editors/xemacs/packages") ("ualberta.ca (Canada)" "sunsite.ualberta.ca" "pub/Mirror/xemacs/packages") ("uiuc.edu (United States)" "uiarchive.uiuc.edu" "pub/packages/xemacs/packages") ("unc.edu (United States)" "metalab.unc.edu" "pub/packages/editors/xemacs/packages") ("utk.edu (United States)" "ftp.sunsite.utk.edu" "pub/xemacs/packages") ("unicamp.br (Brazil)" "ftp.unicamp.br" "pub/xemacs/packages") ("tuwien.ac.at (Austria)" "gd.tuwien.ac.at" "editors/xemacs/packages") ("auc.dk (Denmark)" "sunsite.auc.dk" "pub/emacs/xemacs/packages") ("doc.ic.ac.uk (England)" "sunsite.doc.ic.ac.uk" "packages/xemacs/packages") ("mirror.ac.uk (England)" "ftp.mirror.ac.uk" "sites/ftp.xemacs.org/pub/xemacs/packages") ("funet.fi (Finland)" "ftp.funet.fi" "pub/mirrors/ftp.xemacs.org/pub/tux/xemacs/packages") ("pasteur.fr (France)" "ftp.pasteur.fr" "pub/computing/xemacs/packages") ("tls.cena.fr (France)" "ftp.tls.cena.fr" "Emacs/xemacs/packages") ("freenet.de (Germany)" "ftp.freenet.de" "pub/ftp.xemacs.org/tux/xemacs/packages") ("tu-darmstadt.de (Germany)" "ftp.tu-darmstadt.de" "pub/editors/xemacs/packages") ("kfki.hu (Hungary)" "ftp.kfki.hu" "pub/packages/xemacs/packages") ("eunet.ie (Ireland)" "ftp.eunet.ie" "mirrors/ftp.xemacs.org/pub/xemacs/packages") ("uniroma2.it (Italy)" "ftp.uniroma2.it" "unix/misc/dist/XEMACS/packages") ("uio.no (Norway)" "sunsite.uio.no" "pub/xemacs/packages") ("icm.edu.pl (Poland)" "ftp.icm.edu.pl" "pub/unix/editors/xemacs/packages") ("srcc.msu.su (Russia)" "ftp.srcc.msu.su" "mirror/ftp.xemacs.org/packages") ("sunet.se (Sweden)" "ftp.sunet.se" "pub/gnu/xemacs/packages") ("cnlab-switch.ch (Switzerland)" "sunsite.cnlab-switch.ch" "mirror/xemacs/packages") ("aist.go.jp (Japan)" "ring.aist.go.jp" "pub/text/xemacs/packages") ("asahi-net.or.jp (Japan)" "ring.asahi-net.or.jp" "pub/text/xemacs/packages") ("dti.ad.jp (Japan)" "ftp.dti.ad.jp" "pub/unix/editor/xemacs/packages") ("jaist.ac.jp (Japan)" "ftp.jaist.ac.jp" "pub/GNU/xemacs/packages") ("nucba.ac.jp (Japan)" "mirror.nucba.ac.jp" "mirror/xemacs/packages") ("sut.ac.jp (Japan)" "sunsite.sut.ac.jp" "pub/archives/packages/xemacs/packages") ("tsukuba.ac.jp (Japan)" "ftp.netlab.is.tsukuba.ac.jp" "pub/GNU/xemacs/packages") ("kreonet.re.kr (Korea)" "ftp.kreonet.re.kr" "pub/tools/emacs/xemacs/packages") ("nctu.edu.tw (Taiwan)" "coda.nctu.edu.tw" "Editors/xemacs/packages") ("sun.ac.za (South Africa)" "ftp.sun.ac.za" "xemacs/packages") ("isu.net.sa (Saudi Arabia)" "ftp.isu.net.sa" "pub/mirrors/ftp.xemacs.org/packages") ("aarnet.edu.au (Australia)" "mirror.aarnet.edu.au" "pub/xemacs/packages")) "*List of remote sites available for downloading packages.\nList format is '(site-description site-name directory-on-site).\nSITE-DESCRIPTION is a textual description of the site. SITE-NAME\nis the internet address of the download site. DIRECTORY-ON-SITE\nis the directory on the site in which packages may be found.\nThis variable is used to initialize `package-get-remote', the\nvariable actually used to specify package download sites." :tag "Package download sites" :type '(repeat (list (string :tag "Name") host-name directory)) :group 'package-get)
1304
1305 (autoload 'package-get-download-menu "package-get" "\
1306 Build the `Add Download Site' menu." nil nil)
1307
1308 (autoload 'package-get-require-base "package-get" "\
1309 Require that a package-get database has been loaded.
1310 If the optional FORCE-CURRENT argument or the value of
1311 `package-get-always-update' is Non-nil, try to update the database
1312 from a location in `package-get-remote'. Otherwise a local copy is used
1313 if available and remote access is never done.
1314
1315 Please use FORCE-CURRENT only when the user is explictly dealing with packages
1316 and remote access is likely in the near future." nil nil)
1317
1318 (autoload 'package-get-update-base-entry "package-get" "\
1319 Update an entry in `package-get-base'." nil nil)
1320
1321 (autoload 'package-get-update-base "package-get" "\
1322 Update the package-get database file with entries from DB-FILE.
1323 Unless FORCE-CURRENT is non-nil never try to update the database." t nil)
1324
1325 (autoload 'package-get-update-base-from-buffer "package-get" "\
1326 Update the package-get database with entries from BUFFER.
1327 BUFFER defaults to the current buffer. This command can be
1328 used interactively, for example from a mail or news buffer." t nil)
1329
1330 (autoload 'package-get-save-base "package-get" "\
1331 Write the package-get database to FILE.
1332
1333 Note: This database will be unsigned of course." t nil)
1334
1335 (autoload 'package-get-delete-package "package-get" "\
1336 Delete an installation of PACKAGE below directory PKG-TOPDIR.
1337 PACKAGE is a symbol, not a string.
1338 This is just an interactive wrapper for `package-admin-delete-binary-package'." t nil)
1339 1208
1340 (autoload 'package-get-update-all "package-get" "\ 1209 (autoload 'package-get-update-all "package-get" "\
1341 Fetch and install the latest versions of all currently installed packages." t nil) 1210 Fetch and install the latest versions of all currently installed packages." t nil)
1342 1211
1343 (autoload 'package-get-all "package-get" "\ 1212 (autoload 'package-get-all "package-get" "\
1344 Fetch PACKAGE with VERSION and all other required packages. 1213 Fetch PACKAGE with VERSION and all other required packages.
1345 Uses `package-get-base' to determine just what is required and what 1214 Uses `package-get-base' to determine just what is required and what
1346 package provides that functionality. If VERSION is nil, retrieves 1215 package provides that functionality. If VERSION is nil, retrieves
1347 latest version. Optional argument FETCHED-PACKAGES is used to keep 1216 latest version. Optional argument FETCHED-PACKAGES is used to keep
1348 track of packages already fetched. Optional argument INSTALL-DIR, 1217 track of packages already fetched." t nil)
1349 if non-nil, specifies the package directory where fetched packages
1350 should be installed.
1351
1352 Returns nil upon error." t nil)
1353
1354 (autoload 'package-get-dependencies "package-get" "\
1355 Compute dependencies for PACKAGES.
1356 Uses `package-get-base' to determine just what is required and what
1357 package provides that functionality. Returns the list of packages
1358 required by PACKAGES." nil nil)
1359 1218
1360 (autoload 'package-get "package-get" "\ 1219 (autoload 'package-get "package-get" "\
1361 Fetch PACKAGE from remote site. 1220 Fetch PACKAGE from remote site.
1362 Optional arguments VERSION indicates which version to retrieve, nil 1221 Optional arguments VERSION indicates which version to retrieve, nil
1363 means most recent version. CONFLICT indicates what happens if the 1222 means most recent version. CONFLICT indicates what happens if the
1364 package is already installed. Valid values for CONFLICT are: 1223 package is already installed. Valid values for CONFLICT are:
1365 'always always retrieve the package even if it is already installed 1224 'always always retrieve the package even if it is already installed
1366 'never do not retrieve the package if it is installed. 1225 'never do not retrieve the package if it is installed.
1367 INSTALL-DIR, if non-nil, specifies the package directory where
1368 fetched packages should be installed.
1369 1226
1370 The value of `package-get-base' is used to determine what files should 1227 The value of `package-get-base' is used to determine what files should
1371 be retrieved. The value of `package-get-remote' is used to determine 1228 be retrieved. The value of `package-get-remote' is used to determine
1372 where a package should be retrieved from. The sites are tried in 1229 where a package should be retrieved from. The sites are tried in
1373 order so one is better off listing easily reached sites first. 1230 order so one is better off listing easily reached sites first.
1374 1231
1375 Once the package is retrieved, its md5 checksum is computed. If that 1232 Once the package is retrieved, its md5 checksum is computed. If that
1376 sum does not match that stored in `package-get-base' for this version 1233 sum does not match that stored in `package-get-base' for this version
1377 of the package, an error is signalled. 1234 of the package, an error is signalled." t nil)
1378
1379 Returns `t' upon success, the symbol `error' if the package was
1380 successfully installed but errors occurred during initialization, or
1381 `nil' upon error." t nil)
1382 1235
1383 (autoload 'package-get-package-provider "package-get" "\ 1236 (autoload 'package-get-package-provider "package-get" "\
1384 Search for a package that provides SYM and return the name and 1237 Search for a package that provides SYM and return the name and
1385 version. Searches in `package-get-base' for SYM. If SYM is a 1238 version. Searches in `package-get-base' for SYM. If SYM is a
1386 consp, then it must match a corresponding (provide (SYM VERSION)) from 1239 consp, then it must match a corresponding (provide (SYM VERSION)) from
1387 the package. 1240 the package." t nil)
1388
1389 If FORCE-CURRENT is non-nil make sure the database is up to date. This might
1390 lead to Emacs accessing remote sites." t nil)
1391 1241
1392 (autoload 'package-get-custom "package-get" "\ 1242 (autoload 'package-get-custom "package-get" "\
1393 Fetch and install the latest versions of all customized packages." t nil) 1243 Fetch and install the latest versions of all customized packages." t nil)
1394
1395 ;;;***
1396
1397 ;;;### (autoloads (pui-list-packages pui-add-install-directory package-ui-add-site) "package-ui" "lisp/package-ui.el")
1398
1399 (autoload 'package-ui-add-site "package-ui" "\
1400 Add site to package-get-remote and possibly offer to update package list." nil nil)
1401
1402 (autoload 'pui-add-install-directory "package-ui" "\
1403 Add a new package binary directory to the head of `package-get-remote'.
1404 Note that no provision is made for saving any changes made by this function.
1405 It exists mainly as a convenience for one-time package installations from
1406 disk." t nil)
1407
1408 (autoload 'pui-list-packages "package-ui" "\
1409 List all packages and package information.
1410 The package name, version, and description are displayed. From the displayed
1411 buffer, the user can see which packages are installed, which are not, and
1412 which are out-of-date (a newer version is available). The user can then
1413 select packages for installation via the keyboard or mouse." t nil)
1414
1415 (defalias 'list-packages 'pui-list-packages)
1416 1244
1417 ;;;*** 1245 ;;;***
1418 1246
1419 ;;;### (autoloads (picture-mode) "picture" "lisp/picture.el") 1247 ;;;### (autoloads (picture-mode) "picture" "lisp/picture.el")
1420 1248
1618 You can rewrite this to use any criterion you like to choose which one to do. 1446 You can rewrite this to use any criterion you like to choose which one to do.
1619 The buffer in question is current when this function is called." nil nil) 1447 The buffer in question is current when this function is called." nil nil)
1620 1448
1621 ;;;*** 1449 ;;;***
1622 1450
1623 ;;;### (autoloads (toggle-truncate-lines 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") 1451 ;;;### (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")
1624 1452
1625 (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 " 1453 (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 "
1626 " '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)) 1454 " '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))
1627 1455
1628 (defvar view-mode-map (let ((map (copy-keymap view-minor-mode-map))) (set-keymap-name map 'view-mode-map) map)) 1456 (defvar view-mode-map (let ((map (copy-keymap view-minor-mode-map))) (set-keymap-name map 'view-mode-map) map))
1685 1513
1686 (autoload 'auto-view-mode "view-less" "\ 1514 (autoload 'auto-view-mode "view-less" "\
1687 If the file of the current buffer is not writable, call view-mode. 1515 If the file of the current buffer is not writable, call view-mode.
1688 This is meant to be added to `find-file-hooks'." nil nil) 1516 This is meant to be added to `find-file-hooks'." nil nil)
1689 1517
1690 (autoload 'toggle-truncate-lines "view-less" "\
1691 Toggles the values of truncate-lines.
1692 Positive prefix arg sets, negative disables." t nil)
1693
1694 ;;;*** 1518 ;;;***
1695 1519
1696 ;;;### (autoloads (widget-minor-mode widget-browse-other-window widget-browse widget-browse-at) "wid-browse" "lisp/wid-browse.el") 1520 ;;;### (autoloads (widget-minor-mode widget-browse-other-window widget-browse widget-browse-at) "wid-browse" "lisp/wid-browse.el")
1697 1521
1698 (autoload 'widget-browse-at "wid-browse" "\ 1522 (autoload 'widget-browse-at "wid-browse" "\
1725 1549
1726 ;;;*** 1550 ;;;***
1727 1551
1728 ;;;### (autoloads (font-menu-weight-constructor font-menu-size-constructor font-menu-family-constructor reset-device-font-menus) "x-font-menu" "lisp/x-font-menu.el") 1552 ;;;### (autoloads (font-menu-weight-constructor font-menu-size-constructor font-menu-family-constructor reset-device-font-menus) "x-font-menu" "lisp/x-font-menu.el")
1729 1553
1730 (defcustom font-menu-ignore-scaled-fonts t "*If non-nil, then the font menu will try to show only bitmap fonts." :type 'boolean :group 'font-menu) 1554 (defcustom font-menu-ignore-scaled-fonts t "*If non-nil, then the font menu will try to show only bitmap fonts." :type 'boolean :group 'x)
1731 1555
1732 (defcustom font-menu-this-frame-only-p nil "*If non-nil, then changing the default font from the font menu will only\naffect one frame instead of all frames." :type 'boolean :group 'font-menu) 1556 (defcustom font-menu-this-frame-only-p nil "*If non-nil, then changing the default font from the font menu will only\naffect one frame instead of all frames." :type 'boolean :group 'x)
1733 1557
1734 (fset 'install-font-menus 'reset-device-font-menus) 1558 (fset 'install-font-menus 'reset-device-font-menus)
1735 1559
1736 (autoload 'reset-device-font-menus "x-font-menu" "\ 1560 (autoload 'reset-device-font-menus "x-font-menu" "\
1737 Generates the `Font', `Size', and `Weight' submenus for the Options menu. 1561 Generates the `Font', `Size', and `Weight' submenus for the Options menu.
1746 (autoload 'font-menu-size-constructor "x-font-menu" nil nil nil) 1570 (autoload 'font-menu-size-constructor "x-font-menu" nil nil nil)
1747 1571
1748 (autoload 'font-menu-weight-constructor "x-font-menu" nil nil nil) 1572 (autoload 'font-menu-weight-constructor "x-font-menu" nil nil nil)
1749 1573
1750 ;;;*** 1574 ;;;***
1751
1752 ;;;### (autoloads (xpm-button-create) "xpm-button" "lisp/xpm-button.el")
1753
1754 (autoload 'xpm-button-create "xpm-button" "\
1755 Returns a list of XPM image instantiators for a button displaying TEXT.
1756 The list is of the form
1757 (UP DOWN DISABLED)
1758 where UP, DOWN, and DISABLED are the up, down and disabled image
1759 instantiators for the button.
1760
1761 SHADOW-THICKNESS specifies how many pixels should be used for the
1762 shadows on the edges of the buttons. It should be a positive integer,
1763 or 0 to mean no shadows on the edges.
1764 FG-COLOR is the color used to display the text. It should be a string.
1765 BG-COLOR is the background color the text will be displayed upon.
1766 It should be a string." nil nil)
1767
1768 ;;;***
1769 1575
1770 (provide 'Standard-autoloads) 1576 (provide 'Standard-autoloads)