aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorKenichi Handa2011-12-05 16:03:31 +0900
committerKenichi Handa2011-12-05 16:03:31 +0900
commit2ab04b956544fc24132cee405f93c1a757ebca56 (patch)
treef8ff3a51bac0430ed69b6497568de699f6d3b904 /lisp
parenta79703f53ccd12623371263d93baf0d1be928ec7 (diff)
parent58a70b943c3efcc25e1396c8e67bc440c43a3f0a (diff)
downloademacs-2ab04b956544fc24132cee405f93c1a757ebca56.tar.gz
emacs-2ab04b956544fc24132cee405f93c1a757ebca56.zip
merge trunk
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog118
-rw-r--r--lisp/ChangeLog.124
-rw-r--r--lisp/ChangeLog.132
-rw-r--r--lisp/ChangeLog.142
-rw-r--r--lisp/ChangeLog.154
-rw-r--r--lisp/ChangeLog.32
-rw-r--r--lisp/ChangeLog.72
-rw-r--r--lisp/align.el4
-rw-r--r--lisp/calc/calc-menu.el289
-rw-r--r--lisp/calc/calc-yank.el12
-rw-r--r--lisp/calculator.el2
-rw-r--r--lisp/calendar/appt.el4
-rw-r--r--lisp/cedet/inversion.el4
-rw-r--r--lisp/cedet/semantic.el2
-rw-r--r--lisp/cedet/semantic/edit.el2
-rw-r--r--lisp/cedet/semantic/idle.el2
-rw-r--r--lisp/cedet/semantic/lex.el4
-rw-r--r--lisp/cedet/semantic/tag-ls.el2
-rw-r--r--lisp/cedet/srecode/fields.el2
-rw-r--r--lisp/delim-col.el4
-rw-r--r--lisp/delsel.el2
-rw-r--r--lisp/descr-text.el2
-rw-r--r--lisp/dired-aux.el3
-rw-r--r--lisp/dired-x.el2
-rw-r--r--lisp/dired.el4
-rw-r--r--lisp/electric.el43
-rw-r--r--lisp/emacs-lisp/edebug.el2
-rw-r--r--lisp/emacs-lisp/eieio.el2
-rw-r--r--lisp/emulation/cua-base.el2
-rw-r--r--lisp/emulation/cua-gmrk.el2
-rw-r--r--lisp/emulation/vip.el4
-rw-r--r--lisp/emulation/viper-cmd.el16
-rw-r--r--lisp/emulation/viper-init.el2
-rw-r--r--lisp/emulation/viper-macs.el2
-rw-r--r--lisp/emulation/viper.el2
-rw-r--r--lisp/eshell/em-hist.el14
-rw-r--r--lisp/files.el4
-rw-r--r--lisp/follow.el4
-rw-r--r--lisp/gnus/ChangeLog27
-rw-r--r--lisp/gnus/compface.el3
-rw-r--r--lisp/gnus/gnus-art.el22
-rw-r--r--lisp/gnus/gnus-fun.el6
-rw-r--r--lisp/gnus/gnus-msg.el7
-rw-r--r--lisp/gnus/gnus-sum.el2
-rw-r--r--lisp/gnus/gnus.el2
-rw-r--r--lisp/gnus/message.el17
-rw-r--r--lisp/gnus/mml.el21
-rw-r--r--lisp/gnus/nndiary.el6
-rw-r--r--lisp/gnus/nnir.el4
-rw-r--r--lisp/gnus/nntp.el2
-rw-r--r--lisp/htmlfontify.el21
-rw-r--r--lisp/ibuffer.el4
-rw-r--r--lisp/info.el16
-rw-r--r--lisp/international/fontset.el4
-rw-r--r--lisp/international/mule.el2
-rw-r--r--lisp/international/quail.el2
-rw-r--r--lisp/international/titdic-cnv.el4
-rw-r--r--lisp/international/ucs-normalize.el2
-rw-r--r--lisp/isearch.el19
-rw-r--r--lisp/kmacro.el2
-rw-r--r--lisp/language/chinese.el14
-rw-r--r--lisp/language/viet-util.el4
-rw-r--r--lisp/ldefs-boot.el1675
-rw-r--r--lisp/man.el8
-rw-r--r--lisp/net/ange-ftp.el2
-rw-r--r--lisp/net/tramp-sh.el304
-rw-r--r--lisp/net/zeroconf.el2
-rw-r--r--lisp/nxml/rng-valid.el4
-rw-r--r--lisp/obsolete/pgg.el2
-rw-r--r--lisp/org/ChangeLog10
-rw-r--r--lisp/org/org-agenda.el4
-rw-r--r--lisp/org/org-clock.el4
-rw-r--r--lisp/org/org-list.el2
-rw-r--r--lisp/org/org-protocol.el4
-rw-r--r--lisp/org/org-publish.el4
-rw-r--r--lisp/org/org-taskjuggler.el2
-rw-r--r--lisp/pcmpl-gnu.el3
-rw-r--r--lisp/play/gametree.el2
-rw-r--r--lisp/progmodes/cc-cmds.el4
-rw-r--r--lisp/progmodes/dcl-mode.el4
-rw-r--r--lisp/progmodes/idlwave.el2
-rw-r--r--lisp/progmodes/js.el2
-rw-r--r--lisp/progmodes/prolog.el7
-rw-r--r--lisp/progmodes/verilog-mode.el2058
-rw-r--r--lisp/progmodes/vhdl-mode.el6
-rw-r--r--lisp/server.el18
-rw-r--r--lisp/ses.el2
-rw-r--r--lisp/simple.el6
-rw-r--r--lisp/speedbar.el2
-rw-r--r--lisp/term/x-win.el2
-rw-r--r--lisp/textmodes/artist.el6
-rw-r--r--lisp/textmodes/ispell.el4
-rw-r--r--lisp/textmodes/reftex-dcr.el2
-rw-r--r--lisp/textmodes/table.el4
-rw-r--r--lisp/textmodes/texinfmt.el8
-rw-r--r--lisp/time.el2
-rw-r--r--lisp/url/ChangeLog2
-rw-r--r--lisp/url/url-gw.el4
-rw-r--r--lisp/vc/ediff-init.el2
-rw-r--r--lisp/vc/pcvs.el2
-rw-r--r--lisp/vcursor.el2
-rw-r--r--lisp/view.el2
-rw-r--r--lisp/wid-edit.el6
-rw-r--r--lisp/window.el4
104 files changed, 3031 insertions, 1956 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index f9f53ce91ab..413a2947a58 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,26 +1,76 @@
12011-11-29 Ken Brown <kbrown@cornell.edu> 12011-12-05 Glenn Morris <rgm@gnu.org>
2 2
3 * progmodes/gdb-mi.el: Fix bug#9853, bug#9858, and bug#9878. 3 * align.el (align--set-marker): Add doc-string.
4 (gdb-version): Remove defvar. 4 Don't try to move something that is not a marker. (Bug#10216)
5 (gdb-supports-non-stop): New defvar, replacing `gdb-version'.
6 (gdb-gud-context-command, gdb-non-stop-handler)
7 (gdb-current-context-command, gdb-stopped): Use it.
8 (gdb-init-1): Enable pretty printing here.
9 (gdb-non-stop-handler): Don't enable pretty-printing here. Check
10 to see if the target supports non-stop mode; if not, turn off
11 non-stop mode. Use the following.
12 (gdb-check-target-async): New defun.
13 (gud-watch, gdb-stopped): Fix whitespace.
14 (gdb-get-source-file): Don't try to display the source file if
15 `gdb-main-file' is nil.
16 5
172011-11-29 Stefan Monnier <monnier@iro.umontreal.ca> 62011-12-04 Glenn Morris <rgm@gnu.org>
18 7
19 * align.el: Try to generate fewer markers (bug#10047). 8 * calendar/appt.el (appt-add): Rewrite the interactive-spec to avoid
20 (align--set-marker): New macro. 9 overly zealous deletion of trailing whitespace.
21 (align-region): Use it. 10
112011-12-04 Juanma Barranquero <lekktu@gmail.com>
12
13 * server.el (server-delete-client): On Windows, do not try to delete
14 the only terminal.
15 (server-process-filter): On Windows, treat requests for a tty frame as
16 if they were for a GUI frame if the running server is in GUI mode.
17
182011-12-03 Glenn Morris <rgm@gnu.org>
19
20 * textmodes/texinfmt.el (batch-texinfo-format): Doc fix. (Bug#10207)
21
222011-12-03 Stefan Monnier <monnier@iro.umontreal.ca>
23
24 * electric.el: Streamline electric-indent's hook.
25 (electric-indent-chars): Revert to simple list.
26 (electric-indent-functions): New var.
27 (electric-indent-post-self-insert-function): Use it.
28
29 * progmodes/prolog.el (prolog-find-value-by-system): Avoid error when
30 there's no inferior buffer (bug#10196).
31 (prolog-consult-compile): Don't use toggle-read-only.
32
332011-12-02 Michael Albinus <michael.albinus@gmx.de>
34
35 * net/tramp-sh.el (tramp-maybe-open-connection): Handle user
36 interrupt. (Bug#10187)
37
382011-12-02 Stefan Monnier <monnier@iro.umontreal.ca>
39
40 * pcmpl-gnu.el (pcomplete/tar): large-file-warn-threshold can be nil
41 (bug#9160).
42
43 * dired-aux.el (dired-query): Don't assume help-char is modifier-free
44 (bug#10191).
45
462011-12-02 Juri Linkov <juri@jurta.org>
47
48 * info.el (Info-search): Display "end of manual" when Isearch
49 reaches the end of single-file Info manual. (Bug#9918)
22 50
232011-11-29 Michael McNamara <mac@mail.brushroad.com> 512011-12-02 Eli Zaretskii <eliz@gnu.org>
52
53 * isearch.el (isearch-message-prefix): Run the input method part
54 of the prompt through bidi-string-mark-left-to-right. (Bug#10183)
55
562011-12-02 Juri Linkov <juri@jurta.org>
57
58 * isearch.el (isearch-occur): Use `word-search-regexp' for
59 `isearch-word'.
60 (isearch-search-and-update): Add condition for `isearch-word' and
61 call `word-search-regexp'. (Bug#10145)
62
632011-12-01 Glenn Morris <rgm@gnu.org>
64
65 * eshell/em-hist.el (eshell-hist-initialize):
66 Handle eshell-history-size nil and HISTSIZE set or unset.
67 (eshell-history-file-name, eshell-history-size): Fix custom type.
68
692011-12-01 Stefan Monnier <monnier@iro.umontreal.ca>
70
71 * man.el (Man-completion-table): Fix the lambda case (bug#10168).
72
732011-12-01 Michael McNamara <mac@mail.brushroad.com>
24 74
25 * progmodes/verilog-mode.el (verilog-pretty-expr): 75 * progmodes/verilog-mode.el (verilog-pretty-expr):
26 Rework verilog-pretty-expr to handle new assignment operators in system 76 Rework verilog-pretty-expr to handle new assignment operators in system
@@ -50,7 +100,7 @@
50 (verilog-sk-ovm-class): Add skeleton for OVM classes (reported 100 (verilog-sk-ovm-class): Add skeleton for OVM classes (reported
51 by Alain Mellan). 101 by Alain Mellan).
52 102
532011-11-29 Wilson Snyder <wsnyder@wsnyder.org> 1032011-12-01 Wilson Snyder <wsnyder@wsnyder.org>
54 104
55 * progmodes/verilog-mode.el (verilog-read-defines): Fix reading 105 * progmodes/verilog-mode.el (verilog-read-defines): Fix reading
56 parameters with embedded comments. Reported by Ray Stevens. 106 parameters with embedded comments. Reported by Ray Stevens.
@@ -175,6 +225,34 @@
175 (verilog-read-decls): Fix parsing of unsigned data types, bug302. 225 (verilog-read-decls): Fix parsing of unsigned data types, bug302.
176 Reported by Jan Frode Lonnum. 226 Reported by Jan Frode Lonnum.
177 227
2282011-11-30 Juanma Barranquero <lekktu@gmail.com>
229
230 * htmlfontify.el (hfy-page-header, hfy-post-html-hooks)
231 (hfy-shell-file-name, hfy-shell):
232 * international/fontset.el (x-decompose-font-name): Fix typos.
233
2342011-11-29 Ken Brown <kbrown@cornell.edu>
235
236 * progmodes/gdb-mi.el: Fix bug#9853, bug#9858, and bug#9878.
237 (gdb-version): Remove defvar.
238 (gdb-supports-non-stop): New defvar, replacing `gdb-version'.
239 (gdb-gud-context-command, gdb-non-stop-handler)
240 (gdb-current-context-command, gdb-stopped): Use it.
241 (gdb-init-1): Enable pretty printing here.
242 (gdb-non-stop-handler): Don't enable pretty-printing here.
243 Check to see if the target supports non-stop mode; if not, turn off
244 non-stop mode. Use the following.
245 (gdb-check-target-async): New defun.
246 (gud-watch, gdb-stopped): Fix whitespace.
247 (gdb-get-source-file): Don't try to display the source file if
248 `gdb-main-file' is nil.
249
2502011-11-29 Stefan Monnier <monnier@iro.umontreal.ca>
251
252 * align.el: Try to generate fewer markers (bug#10047).
253 (align--set-marker): New macro.
254 (align-region): Use it.
255
1782011-11-29 Stefan Monnier <monnier@iro.umontreal.ca> 2562011-11-29 Stefan Monnier <monnier@iro.umontreal.ca>
179 257
180 * isearch.el (isearch-yank-x-selection): Deactivate mark (bug#10022). 258 * isearch.el (isearch-yank-x-selection): Deactivate mark (bug#10022).
diff --git a/lisp/ChangeLog.12 b/lisp/ChangeLog.12
index 8721130ec50..2a5a20181e1 100644
--- a/lisp/ChangeLog.12
+++ b/lisp/ChangeLog.12
@@ -7177,7 +7177,7 @@
71772006-08-20 Chong Yidong <cyd@stupidchicken.com> 71772006-08-20 Chong Yidong <cyd@stupidchicken.com>
7178 7178
7179 * frame.el (blink-cursor-start): Set timer first. 7179 * frame.el (blink-cursor-start): Set timer first.
7180 (blink-cursor-end): Ignore timer cancelling errors. 7180 (blink-cursor-end): Ignore timer canceling errors.
7181 Suggested by Ken Manheimer. 7181 Suggested by Ken Manheimer.
7182 7182
71832006-08-20 Juanma Barranquero <lekktu@gmail.com> 71832006-08-20 Juanma Barranquero <lekktu@gmail.com>
@@ -15842,7 +15842,7 @@
15842 interactive spec from "p" to "P". 15842 interactive spec from "p" to "P".
15843 15843
15844 * progmodes/cc-styles.el: Amend the doc-string of c-set-style, in 15844 * progmodes/cc-styles.el: Amend the doc-string of c-set-style, in
15845 reponse to a report from Joseph Kiniry <kiniry@acm.org> that it 15845 response to a report from Joseph Kiniry <kiniry@acm.org> that it
15846 was difficult to understand. 15846 was difficult to understand.
15847 15847
158482005-12-08 Martin Stjernholm <bug-cc-mode@gnu.org> 158482005-12-08 Martin Stjernholm <bug-cc-mode@gnu.org>
diff --git a/lisp/ChangeLog.13 b/lisp/ChangeLog.13
index 12eadc6aadf..0e6a27e0776 100644
--- a/lisp/ChangeLog.13
+++ b/lisp/ChangeLog.13
@@ -8010,7 +8010,7 @@
80102007-10-31 Juanma Barranquero <lekktu@gmail.com> 80102007-10-31 Juanma Barranquero <lekktu@gmail.com>
8011 8011
8012 * help-at-pt.el (help-at-pt-unload-hook): Remove. 8012 * help-at-pt.el (help-at-pt-unload-hook): Remove.
8013 Timers are automatically cancelled by `unload-feature'. 8013 Timers are automatically canceled by `unload-feature'.
8014 8014
8015 * delsel.el (delsel-unload-hook): Remove function and variable. 8015 * delsel.el (delsel-unload-hook): Remove function and variable.
8016 (delsel-unload-function): New-style unload function, adapted 8016 (delsel-unload-function): New-style unload function, adapted
diff --git a/lisp/ChangeLog.14 b/lisp/ChangeLog.14
index 0348a0141a2..7063ed67b62 100644
--- a/lisp/ChangeLog.14
+++ b/lisp/ChangeLog.14
@@ -866,7 +866,7 @@
866 866
867 * calc/calc-embed.el (calc-embedded-restore-original-modes): 867 * calc/calc-embed.el (calc-embedded-restore-original-modes):
868 Add argument for Calculator buffer. 868 Add argument for Calculator buffer.
869 (calc-do-embedded): Use specific Calculator buffer when cancelling 869 (calc-do-embedded): Use specific Calculator buffer when canceling
870 embedded mode. 870 embedded mode.
871 871
872 * calc/calc.el (calc-buffer-list): New variable. 872 * calc/calc.el (calc-buffer-list): New variable.
diff --git a/lisp/ChangeLog.15 b/lisp/ChangeLog.15
index e0c244d5725..ab1eb3591cd 100644
--- a/lisp/ChangeLog.15
+++ b/lisp/ChangeLog.15
@@ -7086,7 +7086,7 @@
7086 (sql-mode-oracle-font-lock-keywords): Improve SQL*Plus REMARK 7086 (sql-mode-oracle-font-lock-keywords): Improve SQL*Plus REMARK
7087 syntax pattern. 7087 syntax pattern.
7088 (sql-mode-postgres-font-lock-keywords): Support Postgres V9. 7088 (sql-mode-postgres-font-lock-keywords): Support Postgres V9.
7089 (sql-mode-sqlite-font-lock-keywords): Hilight sqlite commands. 7089 (sql-mode-sqlite-font-lock-keywords): Highlight sqlite commands.
7090 7090
70912010-09-10 Lars Magne Ingebrigtsen <larsi@gnus.org> 70912010-09-10 Lars Magne Ingebrigtsen <larsi@gnus.org>
7092 7092
@@ -11908,7 +11908,7 @@
11908 Add new VC methods: vc-log-incoming and vc-log-outgoing. 11908 Add new VC methods: vc-log-incoming and vc-log-outgoing.
11909 * vc.el (vc-print-log-setup-buttons): New function split out from 11909 * vc.el (vc-print-log-setup-buttons): New function split out from
11910 vc-print-log-internal. 11910 vc-print-log-internal.
11911 (vc-log-internal-common): New function, a parametrized version of 11911 (vc-log-internal-common): New function, a parameterized version of
11912 vc-print-log-internal. 11912 vc-print-log-internal.
11913 (vc-print-log-internal): Just call vc-log-internal-common with the 11913 (vc-print-log-internal): Just call vc-log-internal-common with the
11914 right arguments. 11914 right arguments.
diff --git a/lisp/ChangeLog.3 b/lisp/ChangeLog.3
index cb39ca5997f..b97bcea89cc 100644
--- a/lisp/ChangeLog.3
+++ b/lisp/ChangeLog.3
@@ -6305,7 +6305,7 @@
6305 to "Non-echoed text: ". This conforms with the convention 6305 to "Non-echoed text: ". This conforms with the convention
6306 used by existing prompts, and gives more room to type stuff. 6306 used by existing prompts, and gives more room to type stuff.
6307 6307
6308 * comint.el (comint-last-input-start): New varible. In 6308 * comint.el (comint-last-input-start): New variable. In
6309 particular, this helps support subprocesses that insist on echoing 6309 particular, this helps support subprocesses that insist on echoing
6310 their input. Added comments to porting guide indicating that 6310 their input. Added comments to porting guide indicating that
6311 this should probably not be used for implementing history stuff. 6311 this should probably not be used for implementing history stuff.
diff --git a/lisp/ChangeLog.7 b/lisp/ChangeLog.7
index 934258ade67..25a80567069 100644
--- a/lisp/ChangeLog.7
+++ b/lisp/ChangeLog.7
@@ -884,7 +884,7 @@
8841998-07-21 Kenichi Handa <handa@etl.go.jp> 8841998-07-21 Kenichi Handa <handa@etl.go.jp>
885 885
886 * international/kkc.el (kkc-region): Handled the case that 886 * international/kkc.el (kkc-region): Handled the case that
887 conversion is cancelled. 887 conversion is canceled.
888 (kkc-terminate): Update kkc-overlay-head correctly. 888 (kkc-terminate): Update kkc-overlay-head correctly.
889 (kkc-cancel): Don't call kkc-terminate, but set kkc-converting to nil. 889 (kkc-cancel): Don't call kkc-terminate, but set kkc-converting to nil.
890 890
diff --git a/lisp/align.el b/lisp/align.el
index 0d9f351b9da..a386b7a82ba 100644
--- a/lisp/align.el
+++ b/lisp/align.el
@@ -1247,7 +1247,9 @@ have been aligned. No changes will be made to the buffer."
1247 (setq areas (cdr areas)))))) 1247 (setq areas (cdr areas))))))
1248 1248
1249(defmacro align--set-marker (marker-var pos &optional type) 1249(defmacro align--set-marker (marker-var pos &optional type)
1250 `(if ,marker-var 1250 "If MARKER-VAR is a marker, move it to position POS.
1251Otherwise, create a new marker at position POS, with type TYPE."
1252 `(if (markerp ,marker-var)
1251 (move-marker ,marker-var ,pos) 1253 (move-marker ,marker-var ,pos)
1252 (setq ,marker-var (copy-marker ,pos ,type)))) 1254 (setq ,marker-var (copy-marker ,pos ,type))))
1253 1255
diff --git a/lisp/calc/calc-menu.el b/lisp/calc/calc-menu.el
index d8099b0aadc..d8c01656784 100644
--- a/lisp/calc/calc-menu.el
+++ b/lisp/calc/calc-menu.el
@@ -24,19 +24,19 @@
24(defvar calc-arithmetic-menu 24(defvar calc-arithmetic-menu
25 (list "Arithmetic" 25 (list "Arithmetic"
26 (list "Basic" 26 (list "Basic"
27 ["-(1:)" calc-change-sign 27 ["-(1:)" calc-change-sign
28 :keys "n" :active (>= (calc-stack-size) 1)] 28 :keys "n" :active (>= (calc-stack-size) 1)]
29 ["(2:) + (1:)" calc-plus 29 ["(2:) + (1:)" calc-plus
30 :keys "+" :active (>= (calc-stack-size) 2)] 30 :keys "+" :active (>= (calc-stack-size) 2)]
31 ["(2:) - (1:)" calc-minus 31 ["(2:) - (1:)" calc-minus
32 :keys "-" :active (>= (calc-stack-size) 2)] 32 :keys "-" :active (>= (calc-stack-size) 2)]
33 ["(2:) * (1:)" calc-times 33 ["(2:) * (1:)" calc-times
34 :keys "*" :active (>= (calc-stack-size) 2)] 34 :keys "*" :active (>= (calc-stack-size) 2)]
35 ["(2:) / (1:)" calc-divide 35 ["(2:) / (1:)" calc-divide
36 :keys "/" :active (>= (calc-stack-size) 2)] 36 :keys "/" :active (>= (calc-stack-size) 2)]
37 ["(2:) ^ (1:)" calc-power 37 ["(2:) ^ (1:)" calc-power
38 :keys "^" :active (>= (calc-stack-size) 2)] 38 :keys "^" :active (>= (calc-stack-size) 2)]
39 ["(2:) ^ (1/(1:))" 39 ["(2:) ^ (1/(1:))"
40 (progn 40 (progn
41 (require 'calc-ext) 41 (require 'calc-ext)
42 (let ((calc-inverse-flag t)) 42 (let ((calc-inverse-flag t))
@@ -44,8 +44,8 @@
44 :keys "I ^" 44 :keys "I ^"
45 :active (>= (calc-stack-size) 2) 45 :active (>= (calc-stack-size) 2)
46 :help "The (1:)th root of (2:)"] 46 :help "The (1:)th root of (2:)"]
47 ["abs(1:)" 47 ["abs(1:)"
48 (progn 48 (progn
49 (require 'calc-arith) 49 (require 'calc-arith)
50 (call-interactively 'calc-abs)) 50 (call-interactively 'calc-abs))
51 :keys "A" 51 :keys "A"
@@ -57,7 +57,7 @@
57 (call-interactively 'calc-inv)) 57 (call-interactively 'calc-inv))
58 :keys "&" 58 :keys "&"
59 :active (>= (calc-stack-size) 1)] 59 :active (>= (calc-stack-size) 1)]
60 ["sqrt(1:)" 60 ["sqrt(1:)"
61 (progn 61 (progn
62 (require 'calc-math) 62 (require 'calc-math)
63 (call-interactively 'calc-sqrt)) 63 (call-interactively 'calc-sqrt))
@@ -70,7 +70,7 @@
70 :keys "\\" 70 :keys "\\"
71 :active (>= (calc-stack-size) 2) 71 :active (>= (calc-stack-size) 2)
72 :help "The integer quotient of (2:) over (1:)"] 72 :help "The integer quotient of (2:) over (1:)"]
73 ["(2:) mod (1:)" 73 ["(2:) mod (1:)"
74 (progn 74 (progn
75 (require 'calc-misc) 75 (require 'calc-misc)
76 (call-interactively 'calc-mod)) 76 (call-interactively 'calc-mod))
@@ -78,28 +78,28 @@
78 :active (>= (calc-stack-size) 2) 78 :active (>= (calc-stack-size) 2)
79 :help "The remainder when (2:) is divided by (1:)"]) 79 :help "The remainder when (2:) is divided by (1:)"])
80 (list "Rounding" 80 (list "Rounding"
81 ["floor(1:)" 81 ["floor(1:)"
82 (progn 82 (progn
83 (require 'calc-arith) 83 (require 'calc-arith)
84 (call-interactively 'calc-floor)) 84 (call-interactively 'calc-floor))
85 :keys "F" 85 :keys "F"
86 :active (>= (calc-stack-size) 1) 86 :active (>= (calc-stack-size) 1)
87 :help "The greatest integer less than or equal to (1:)"] 87 :help "The greatest integer less than or equal to (1:)"]
88 ["ceiling(1:)" 88 ["ceiling(1:)"
89 (progn 89 (progn
90 (require 'calc-arith) 90 (require 'calc-arith)
91 (call-interactively 'calc-ceiling)) 91 (call-interactively 'calc-ceiling))
92 :keys "I F" 92 :keys "I F"
93 :active (>= (calc-stack-size) 1) 93 :active (>= (calc-stack-size) 1)
94 :help "The smallest integer greater than or equal to (1:)"] 94 :help "The smallest integer greater than or equal to (1:)"]
95 ["round(1:)" 95 ["round(1:)"
96 (progn 96 (progn
97 (require 'calc-arith) 97 (require 'calc-arith)
98 (call-interactively 'calc-round)) 98 (call-interactively 'calc-round))
99 :keys "R" 99 :keys "R"
100 :active (>= (calc-stack-size) 1) 100 :active (>= (calc-stack-size) 1)
101 :help "The nearest integer to (1:)"] 101 :help "The nearest integer to (1:)"]
102 ["truncate(1:)" 102 ["truncate(1:)"
103 (progn 103 (progn
104 (require 'calc-arith) 104 (require 'calc-arith)
105 (call-interactively 'calc-trunc)) 105 (call-interactively 'calc-trunc))
@@ -140,32 +140,32 @@
140 :active (>= (calc-stack-size) 1) 140 :active (>= (calc-stack-size) 1)
141 :help "The argument (polar angle) of (1:)"]) 141 :help "The argument (polar angle) of (1:)"])
142 (list "Conversion" 142 (list "Conversion"
143 ["Convert (1:) to a float" 143 ["Convert (1:) to a float"
144 (progn 144 (progn
145 (require 'calc-ext) 145 (require 'calc-ext)
146 (call-interactively 'calc-float)) 146 (call-interactively 'calc-float))
147 :keys "c f" 147 :keys "c f"
148 :active (>= (calc-stack-size) 1)] 148 :active (>= (calc-stack-size) 1)]
149 ["Convert (1:) to a fraction" 149 ["Convert (1:) to a fraction"
150 (progn 150 (progn
151 (require 'calc-ext) 151 (require 'calc-ext)
152 (call-interactively 'calc-fraction)) 152 (call-interactively 'calc-fraction))
153 :keys "c F" 153 :keys "c F"
154 :active (>= (calc-stack-size) 1)]) 154 :active (>= (calc-stack-size) 1)])
155 (list "Binary" 155 (list "Binary"
156 ["Set word size" 156 ["Set word size"
157 (progn 157 (progn
158 (require 'calc-bin) 158 (require 'calc-bin)
159 (call-interactively 'calc-word-size)) 159 (call-interactively 'calc-word-size))
160 :keys "b w"] 160 :keys "b w"]
161 ["Clip (1:) to word size" 161 ["Clip (1:) to word size"
162 (progn 162 (progn
163 (require 'calc-bin) 163 (require 'calc-bin)
164 (call-interactively 'calc-clip)) 164 (call-interactively 'calc-clip))
165 :keys "b c" 165 :keys "b c"
166 :active (>= (calc-stack-size) 1) 166 :active (>= (calc-stack-size) 1)
167 :help "Reduce (1:) modulo 2^wordsize"] 167 :help "Reduce (1:) modulo 2^wordsize"]
168 ["(2:) and (1:)" 168 ["(2:) and (1:)"
169 (progn 169 (progn
170 (require 'calc-bin) 170 (require 'calc-bin)
171 (call-interactively 'calc-and)) 171 (call-interactively 'calc-and))
@@ -180,13 +180,13 @@
180 :active (>= (calc-stack-size) 2) 180 :active (>= (calc-stack-size) 2)
181 :help "Bitwise inclusive OR [modulo 2^wordsize]"] 181 :help "Bitwise inclusive OR [modulo 2^wordsize]"]
182 ["(2:) xor (1:)" 182 ["(2:) xor (1:)"
183 (progn 183 (progn
184 (require 'calc-bin) 184 (require 'calc-bin)
185 (call-interactively 'calc-xor)) 185 (call-interactively 'calc-xor))
186 :keys "b x" 186 :keys "b x"
187 :active (>= (calc-stack-size) 2) 187 :active (>= (calc-stack-size) 2)
188 :help "Bitwise exclusive OR [modulo 2^wordsize]"] 188 :help "Bitwise exclusive OR [modulo 2^wordsize]"]
189 ["diff(2:,1:)" 189 ["diff(2:,1:)"
190 (progn 190 (progn
191 (require 'calc-bin) 191 (require 'calc-bin)
192 (call-interactively 'calc-diff)) 192 (call-interactively 'calc-diff))
@@ -263,82 +263,82 @@
263 :keys "I P" 263 :keys "I P"
264 :help "Euler's constant"]) 264 :help "Euler's constant"])
265 (list "Logs and Exps" 265 (list "Logs and Exps"
266 ["ln(1:)" 266 ["ln(1:)"
267 (progn 267 (progn
268 (require 'calc-math) 268 (require 'calc-math)
269 (call-interactively 'calc-ln)) 269 (call-interactively 'calc-ln))
270 :keys "L" 270 :keys "L"
271 :active (>= (calc-stack-size) 1) 271 :active (>= (calc-stack-size) 1)
272 :help "The natural logarithm"] 272 :help "The natural logarithm"]
273 ["e^(1:)" 273 ["e^(1:)"
274 (progn 274 (progn
275 (require 'calc-math) 275 (require 'calc-math)
276 (call-interactively 'calc-exp)) 276 (call-interactively 'calc-exp))
277 :keys "E" 277 :keys "E"
278 :active (>= (calc-stack-size) 1)] 278 :active (>= (calc-stack-size) 1)]
279 ["log(1:) [base 10]" 279 ["log(1:) [base 10]"
280 (progn 280 (progn
281 (require 'calc-math) 281 (require 'calc-math)
282 (call-interactively 'calc-log10)) 282 (call-interactively 'calc-log10))
283 :keys "H L" 283 :keys "H L"
284 :active (>= (calc-stack-size) 1) 284 :active (>= (calc-stack-size) 1)
285 :help "The common logarithm"] 285 :help "The common logarithm"]
286 ["10^(1:)" 286 ["10^(1:)"
287 (progn 287 (progn
288 (require 'calc-math) 288 (require 'calc-math)
289 (let ((calc-inverse-flag t)) 289 (let ((calc-inverse-flag t))
290 (call-interactively 'calc-log10))) 290 (call-interactively 'calc-log10)))
291 :keys "I H L" 291 :keys "I H L"
292 :active (>= (calc-stack-size) 1)] 292 :active (>= (calc-stack-size) 1)]
293 ["log(2:) [base(1:)]" 293 ["log(2:) [base(1:)]"
294 (progn 294 (progn
295 (require 'calc-math) 295 (require 'calc-math)
296 (call-interactively 'calc-log)) 296 (call-interactively 'calc-log))
297 :keys "B" 297 :keys "B"
298 :active (>= (calc-stack-size) 2) 298 :active (>= (calc-stack-size) 2)
299 :help "The logarithm with an arbitrary base"] 299 :help "The logarithm with an arbitrary base"]
300 ["(2:) ^ (1:)" 300 ["(2:) ^ (1:)"
301 calc-power 301 calc-power
302 :keys "^" 302 :keys "^"
303 :active (>= (calc-stack-size) 2)]) 303 :active (>= (calc-stack-size) 2)])
304 (list "Trigonometric Functions" 304 (list "Trigonometric Functions"
305 ["sin(1:)" 305 ["sin(1:)"
306 (progn 306 (progn
307 (require 'calc-math) 307 (require 'calc-math)
308 (call-interactively 'calc-sin)) 308 (call-interactively 'calc-sin))
309 :keys "S" 309 :keys "S"
310 :active (>= (calc-stack-size) 1)] 310 :active (>= (calc-stack-size) 1)]
311 ["cos(1:)" 311 ["cos(1:)"
312 (progn 312 (progn
313 (require 'calc-math) 313 (require 'calc-math)
314 (call-interactively 'calc-cos)) 314 (call-interactively 'calc-cos))
315 :keys "C" 315 :keys "C"
316 :active (>= (calc-stack-size) 1)] 316 :active (>= (calc-stack-size) 1)]
317 ["tan(1:)" 317 ["tan(1:)"
318 (progn 318 (progn
319 (require 'calc-math) 319 (require 'calc-math)
320 (call-interactively 'calc-tan)) 320 (call-interactively 'calc-tan))
321 :keys "T" 321 :keys "T"
322 :active (>= (calc-stack-size) 1)] 322 :active (>= (calc-stack-size) 1)]
323 ["arcsin(1:)" 323 ["arcsin(1:)"
324 (progn 324 (progn
325 (require 'calc-math) 325 (require 'calc-math)
326 (call-interactively 'calc-arcsin)) 326 (call-interactively 'calc-arcsin))
327 :keys "I S" 327 :keys "I S"
328 :active (>= (calc-stack-size) 1)] 328 :active (>= (calc-stack-size) 1)]
329 ["arccos(1:)" 329 ["arccos(1:)"
330 (progn 330 (progn
331 (require 'calc-math) 331 (require 'calc-math)
332 (call-interactively 'calc-arccos)) 332 (call-interactively 'calc-arccos))
333 :keys "I C" 333 :keys "I C"
334 :active (>= (calc-stack-size) 1)] 334 :active (>= (calc-stack-size) 1)]
335 ["arctan(1:)" 335 ["arctan(1:)"
336 (progn 336 (progn
337 (require 'calc-math) 337 (require 'calc-math)
338 (call-interactively 'calc-arctan)) 338 (call-interactively 'calc-arctan))
339 :keys "I T" 339 :keys "I T"
340 :active (>= (calc-stack-size) 1)] 340 :active (>= (calc-stack-size) 1)]
341 ["arctan2(2:,1:)" 341 ["arctan2(2:,1:)"
342 (progn 342 (progn
343 (require 'calc-math) 343 (require 'calc-math)
344 (call-interactively 'calc-arctan2)) 344 (call-interactively 'calc-arctan2))
@@ -367,65 +367,65 @@
367 :style radio 367 :style radio
368 :selected (eq calc-angle-mode 'hms)]) 368 :selected (eq calc-angle-mode 'hms)])
369 (list "Hyperbolic Functions" 369 (list "Hyperbolic Functions"
370 ["sinh(1:)" 370 ["sinh(1:)"
371 (progn 371 (progn
372 (require 'calc-math) 372 (require 'calc-math)
373 (call-interactively 'calc-sinh)) 373 (call-interactively 'calc-sinh))
374 :keys "H S" 374 :keys "H S"
375 :active (>= (calc-stack-size) 1)] 375 :active (>= (calc-stack-size) 1)]
376 ["cosh(1:)" 376 ["cosh(1:)"
377 (progn 377 (progn
378 (require 'calc-math) 378 (require 'calc-math)
379 (call-interactively 'calc-cosh)) 379 (call-interactively 'calc-cosh))
380 :keys "H C" 380 :keys "H C"
381 :active (>= (calc-stack-size) 1)] 381 :active (>= (calc-stack-size) 1)]
382 ["tanh(1:)" 382 ["tanh(1:)"
383 (progn 383 (progn
384 (require 'calc-math) 384 (require 'calc-math)
385 (call-interactively 'calc-tanh)) 385 (call-interactively 'calc-tanh))
386 :keys "H T" 386 :keys "H T"
387 :active (>= (calc-stack-size) 1)] 387 :active (>= (calc-stack-size) 1)]
388 ["arcsinh(1:)" 388 ["arcsinh(1:)"
389 (progn 389 (progn
390 (require 'calc-math) 390 (require 'calc-math)
391 (call-interactively 'calc-arcsinh)) 391 (call-interactively 'calc-arcsinh))
392 :keys "I H S" 392 :keys "I H S"
393 :active (>= (calc-stack-size) 1)] 393 :active (>= (calc-stack-size) 1)]
394 ["arccosh(1:)" 394 ["arccosh(1:)"
395 (progn 395 (progn
396 (require 'calc-math) 396 (require 'calc-math)
397 (call-interactively 'calc-arccosh)) 397 (call-interactively 'calc-arccosh))
398 :keys "I H C" 398 :keys "I H C"
399 :active (>= (calc-stack-size) 1)] 399 :active (>= (calc-stack-size) 1)]
400 ["arctanh(1:)" 400 ["arctanh(1:)"
401 (progn 401 (progn
402 (require 'calc-math) 402 (require 'calc-math)
403 (call-interactively 'calc-arctanh)) 403 (call-interactively 'calc-arctanh))
404 :keys "I H T" 404 :keys "I H T"
405 :active (>= (calc-stack-size) 1)]) 405 :active (>= (calc-stack-size) 1)])
406 (list "Advanced Math Functions" 406 (list "Advanced Math Functions"
407 ["Gamma(1:)" 407 ["Gamma(1:)"
408 (progn 408 (progn
409 (require 'calc-comb) 409 (require 'calc-comb)
410 (call-interactively 'calc-gamma)) 410 (call-interactively 'calc-gamma))
411 :keys "f g" 411 :keys "f g"
412 :active (>= (calc-stack-size) 1) 412 :active (>= (calc-stack-size) 1)
413 :help "The Euler Gamma function"] 413 :help "The Euler Gamma function"]
414 ["GammaP(2:,1:)" 414 ["GammaP(2:,1:)"
415 (progn 415 (progn
416 (require 'calc-funcs) 416 (require 'calc-funcs)
417 (call-interactively 'calc-inc-gamma)) 417 (call-interactively 'calc-inc-gamma))
418 :keys "f G" 418 :keys "f G"
419 :active (>= (calc-stack-size) 2) 419 :active (>= (calc-stack-size) 2)
420 :help "The lower incomplete Gamma function"] 420 :help "The lower incomplete Gamma function"]
421 ["Beta(2:,1:)" 421 ["Beta(2:,1:)"
422 (progn 422 (progn
423 (require 'calc-funcs) 423 (require 'calc-funcs)
424 (call-interactively 'calc-beta)) 424 (call-interactively 'calc-beta))
425 :keys "f b" 425 :keys "f b"
426 :active (>= (calc-stack-size) 2) 426 :active (>= (calc-stack-size) 2)
427 :help "The Euler Beta function"] 427 :help "The Euler Beta function"]
428 ["BetaI(3:,2:,1:)" 428 ["BetaI(3:,2:,1:)"
429 (progn 429 (progn
430 (require 'calc-funcs) 430 (require 'calc-funcs)
431 (call-interactively 'calc-inc-beta)) 431 (call-interactively 'calc-inc-beta))
@@ -439,14 +439,14 @@
439 :keys "f e" 439 :keys "f e"
440 :active (>= (calc-stack-size) 1) 440 :active (>= (calc-stack-size) 1)
441 :help "The error function"] 441 :help "The error function"]
442 ["BesselJ(2:,1:)" 442 ["BesselJ(2:,1:)"
443 (progn 443 (progn
444 (require 'calc-funcs) 444 (require 'calc-funcs)
445 (call-interactively 'calc-bessel-J)) 445 (call-interactively 'calc-bessel-J))
446 :keys "f j" 446 :keys "f j"
447 :active (>= (calc-stack-size) 2) 447 :active (>= (calc-stack-size) 2)
448 :help "The Bessel function of the first kind (of order (2:))"] 448 :help "The Bessel function of the first kind (of order (2:))"]
449 ["BesselY(2:,1:)" 449 ["BesselY(2:,1:)"
450 (progn 450 (progn
451 (require 'calc-funcs) 451 (require 'calc-funcs)
452 (call-interactively 'calc-bessel-Y)) 452 (call-interactively 'calc-bessel-Y))
@@ -454,44 +454,44 @@
454 :active (>= (calc-stack-size) 2) 454 :active (>= (calc-stack-size) 2)
455 :help "The Bessel function of the second kind (of order (2:))"]) 455 :help "The Bessel function of the second kind (of order (2:))"])
456 (list "Combinatorial Functions" 456 (list "Combinatorial Functions"
457 ["gcd(2:,1:)" 457 ["gcd(2:,1:)"
458 (progn 458 (progn
459 (require 'calc-comb) 459 (require 'calc-comb)
460 (call-interactively 'calc-gcd)) 460 (call-interactively 'calc-gcd))
461 :keys "k g" 461 :keys "k g"
462 :active (>= (calc-stack-size) 2)] 462 :active (>= (calc-stack-size) 2)]
463 ["lcm(2:,1:)" 463 ["lcm(2:,1:)"
464 (progn 464 (progn
465 (require 'calc-comb) 465 (require 'calc-comb)
466 (call-interactively 'calc-lcm)) 466 (call-interactively 'calc-lcm))
467 :keys "k l" 467 :keys "k l"
468 :active (>= (calc-stack-size) 2)] 468 :active (>= (calc-stack-size) 2)]
469 ["factorial(1:)" 469 ["factorial(1:)"
470 (progn 470 (progn
471 (require 'calc-comb) 471 (require 'calc-comb)
472 (call-interactively 'calc-factorial)) 472 (call-interactively 'calc-factorial))
473 :keys "!" 473 :keys "!"
474 :active (>= (calc-stack-size) 1)] 474 :active (>= (calc-stack-size) 1)]
475 ["(2:) choose (1:)" 475 ["(2:) choose (1:)"
476 (progn 476 (progn
477 (require 'calc-comb) 477 (require 'calc-comb)
478 (call-interactively 'calc-choose)) 478 (call-interactively 'calc-choose))
479 :keys "k c" 479 :keys "k c"
480 :active (>= (calc-stack-size) 2)] 480 :active (>= (calc-stack-size) 2)]
481 ["permutations(2:,1:)" 481 ["permutations(2:,1:)"
482 (progn 482 (progn
483 (require 'calc-comb) 483 (require 'calc-comb)
484 (call-interactively 'calc-perm)) 484 (call-interactively 'calc-perm))
485 :keys "H k c" 485 :keys "H k c"
486 :active (>= (calc-stack-size) 2)] 486 :active (>= (calc-stack-size) 2)]
487 ["Primality test for (1:)" 487 ["Primality test for (1:)"
488 (progn 488 (progn
489 (require 'calc-comb) 489 (require 'calc-comb)
490 (call-interactively 'calc-prime-test)) 490 (call-interactively 'calc-prime-test))
491 :keys "k p" 491 :keys "k p"
492 :active (>= (calc-stack-size) 1) 492 :active (>= (calc-stack-size) 1)
493 :help "For large (1:), a probabilistic test"] 493 :help "For large (1:), a probabilistic test"]
494 ["Factor (1:) into primes" 494 ["Factor (1:) into primes"
495 (progn 495 (progn
496 (require 'calc-comb) 496 (require 'calc-comb)
497 (call-interactively 'calc-prime-factors)) 497 (call-interactively 'calc-prime-factors))
@@ -527,17 +527,17 @@
527 ["Help on Scientific Functions" 527 ["Help on Scientific Functions"
528 (calc-info-goto-node "Scientific Functions")]) 528 (calc-info-goto-node "Scientific Functions")])
529 "Menu for Calc's scientific functions.") 529 "Menu for Calc's scientific functions.")
530 530
531(defvar calc-algebra-menu 531(defvar calc-algebra-menu
532 (list "Algebra" 532 (list "Algebra"
533 (list "Simplification" 533 (list "Simplification"
534 ["Simplify (1:)" 534 ["Simplify (1:)"
535 (progn 535 (progn
536 (require 'calc-alg) 536 (require 'calc-alg)
537 (call-interactively 'calc-simplify)) 537 (call-interactively 'calc-simplify))
538 :keys "a s" 538 :keys "a s"
539 :active (>= (calc-stack-size) 1)] 539 :active (>= (calc-stack-size) 1)]
540 ["Simplify (1:) with extended rules" 540 ["Simplify (1:) with extended rules"
541 (progn 541 (progn
542 (require 'calc-alg) 542 (require 'calc-alg)
543 (call-interactively 'calc-simplify-extended)) 543 (call-interactively 'calc-simplify-extended))
@@ -545,72 +545,72 @@
545 :active (>= (calc-stack-size) 1) 545 :active (>= (calc-stack-size) 1)
546 :help "Apply possibly unsafe simplifications"]) 546 :help "Apply possibly unsafe simplifications"])
547 (list "Manipulation" 547 (list "Manipulation"
548 ["Expand formula (1:)" 548 ["Expand formula (1:)"
549 (progn 549 (progn
550 (require 'calc-alg) 550 (require 'calc-alg)
551 (call-interactively 'calc-expand-formula)) 551 (call-interactively 'calc-expand-formula))
552 :keys "a \"" 552 :keys "a \""
553 :active (>= (calc-stack-size) 1) 553 :active (>= (calc-stack-size) 1)
554 :help "Expand (1:) into its defining formula, if possible"] 554 :help "Expand (1:) into its defining formula, if possible"]
555 ["Evaluate variables in (1:)" 555 ["Evaluate variables in (1:)"
556 (progn 556 (progn
557 (require 'calc-ext) 557 (require 'calc-ext)
558 (call-interactively 'calc-evaluate)) 558 (call-interactively 'calc-evaluate))
559 :keys "=" 559 :keys "="
560 :active (>= (calc-stack-size) 1)] 560 :active (>= (calc-stack-size) 1)]
561 ["Make substitution in (1:)" 561 ["Make substitution in (1:)"
562 (progn 562 (progn
563 (require 'calc-alg) 563 (require 'calc-alg)
564 (call-interactively 'calc-substitute)) 564 (call-interactively 'calc-substitute))
565 :keys "a b" 565 :keys "a b"
566 :active (>= (calc-stack-size) 1) 566 :active (>= (calc-stack-size) 1)
567 :help 567 :help
568 "Substitute all occurrences of a sub-expression with a new sub-expression"]) 568 "Substitute all occurrences of a sub-expression with a new sub-expression"])
569 (list "Polynomials" 569 (list "Polynomials"
570 ["Factor (1:)" 570 ["Factor (1:)"
571 (progn 571 (progn
572 (require 'calc-alg) 572 (require 'calc-alg)
573 (call-interactively 'calc-factor)) 573 (call-interactively 'calc-factor))
574 :keys "a f" 574 :keys "a f"
575 :active (>= (calc-stack-size) 1)] 575 :active (>= (calc-stack-size) 1)]
576 ["Collect terms in (1:)" 576 ["Collect terms in (1:)"
577 (progn 577 (progn
578 (require 'calc-alg) 578 (require 'calc-alg)
579 (call-interactively 'calc-collect)) 579 (call-interactively 'calc-collect))
580 :keys "a c" 580 :keys "a c"
581 :active (>= (calc-stack-size) 1) 581 :active (>= (calc-stack-size) 1)
582 :help "Arrange as a polynomial in a given variable"] 582 :help "Arrange as a polynomial in a given variable"]
583 ["Expand (1:)" 583 ["Expand (1:)"
584 (progn 584 (progn
585 (require 'calc-alg) 585 (require 'calc-alg)
586 (call-interactively 'calc-expand)) 586 (call-interactively 'calc-expand))
587 :keys "a x" 587 :keys "a x"
588 :active (>= (calc-stack-size) 1) 588 :active (>= (calc-stack-size) 1)
589 :help "Apply distributive law everywhere"] 589 :help "Apply distributive law everywhere"]
590 ["Find roots of (1:)" 590 ["Find roots of (1:)"
591 (progn 591 (progn
592 (require 'calcalg2) 592 (require 'calcalg2)
593 (call-interactively 'calc-poly-roots)) 593 (call-interactively 'calc-poly-roots))
594 :keys "a P" 594 :keys "a P"
595 :active (>= (calc-stack-size) 1)]) 595 :active (>= (calc-stack-size) 1)])
596 (list "Calculus" 596 (list "Calculus"
597 ["Differentiate (1:)" 597 ["Differentiate (1:)"
598 (progn 598 (progn
599 (require 'calcalg2) 599 (require 'calcalg2)
600 (call-interactively 'calc-derivative)) 600 (call-interactively 'calc-derivative))
601 :keys "a d" 601 :keys "a d"
602 :active (>= (calc-stack-size) 1)] 602 :active (>= (calc-stack-size) 1)]
603 ["Integrate (1:) [indefinite]" 603 ["Integrate (1:) [indefinite]"
604 (progn 604 (progn
605 (require 'calcalg2) 605 (require 'calcalg2)
606 (call-interactively 'calc-integral)) 606 (call-interactively 'calc-integral))
607 :keys "a i" 607 :keys "a i"
608 :active (>= (calc-stack-size) 1)] 608 :active (>= (calc-stack-size) 1)]
609 ["Integrate (1:) [definite]" 609 ["Integrate (1:) [definite]"
610 (progn 610 (progn
611 (require 'calcalg2) 611 (require 'calcalg2)
612 (let ((var (read-string "Integration variable: "))) 612 (let ((var (read-string "Integration variable: ")))
613 (calc-tabular-command 'calcFunc-integ "Integration" 613 (calc-tabular-command 'calcFunc-integ "Integration"
614 "intg" nil var nil nil))) 614 "intg" nil var nil nil)))
615 :keys "C-u a i" 615 :keys "C-u a i"
616 :active (>= (calc-stack-size) 1)] 616 :active (>= (calc-stack-size) 1)]
@@ -621,20 +621,20 @@
621 :keys "a I" 621 :keys "a I"
622 :active (>= (calc-stack-size) 1) 622 :active (>= (calc-stack-size) 1)
623 :help "Integrate using the open Romberg method"] 623 :help "Integrate using the open Romberg method"]
624 ["Taylor expand (1:)" 624 ["Taylor expand (1:)"
625 (progn 625 (progn
626 (require 'calcalg2) 626 (require 'calcalg2)
627 (call-interactively 'calc-taylor)) 627 (call-interactively 'calc-taylor))
628 :keys "a t" 628 :keys "a t"
629 :active (>= (calc-stack-size) 1)] 629 :active (>= (calc-stack-size) 1)]
630 ["Minimize (2:) [initial guess = (1:)]" 630 ["Minimize (2:) [initial guess = (1:)]"
631 (progn 631 (progn
632 (require 'calcalg3) 632 (require 'calcalg3)
633 (call-interactively 'calc-find-minimum)) 633 (call-interactively 'calc-find-minimum))
634 :keys "a N" 634 :keys "a N"
635 :active (>= (calc-stack-size) 2) 635 :active (>= (calc-stack-size) 2)
636 :help "Find a local minimum"] 636 :help "Find a local minimum"]
637 ["Maximize (2:) [initial guess = (1:)]" 637 ["Maximize (2:) [initial guess = (1:)]"
638 (progn 638 (progn
639 (require 'calcalg3) 639 (require 'calcalg3)
640 (call-interactively 'calc-find-maximum)) 640 (call-interactively 'calc-find-maximum))
@@ -642,26 +642,26 @@
642 :active (>= (calc-stack-size) 2) 642 :active (>= (calc-stack-size) 2)
643 :help "Find a local maximum"]) 643 :help "Find a local maximum"])
644 (list "Solving" 644 (list "Solving"
645 ["Solve equation (1:)" 645 ["Solve equation (1:)"
646 (progn 646 (progn
647 (require 'calcalg2) 647 (require 'calcalg2)
648 (call-interactively 'calc-solve-for)) 648 (call-interactively 'calc-solve-for))
649 :keys "a S" 649 :keys "a S"
650 :active (>= (calc-stack-size) 1)] 650 :active (>= (calc-stack-size) 1)]
651 ["Solve equation (2:) numerically [initial guess = (1:)]" 651 ["Solve equation (2:) numerically [initial guess = (1:)]"
652 (progn 652 (progn
653 (require 'calcalg3) 653 (require 'calcalg3)
654 (call-interactively 'calc-find-root)) 654 (call-interactively 'calc-find-root))
655 :keys "a R" 655 :keys "a R"
656 :active (>= (calc-stack-size) 2)] 656 :active (>= (calc-stack-size) 2)]
657 ["Find roots of polynomial (1:)" 657 ["Find roots of polynomial (1:)"
658 (progn 658 (progn
659 (require 'calcalg2) 659 (require 'calcalg2)
660 (call-interactively 'calc-poly-roots)) 660 (call-interactively 'calc-poly-roots))
661 :keys "a P" 661 :keys "a P"
662 :active (>= (calc-stack-size) 1)]) 662 :active (>= (calc-stack-size) 1)])
663 (list "Curve Fitting" 663 (list "Curve Fitting"
664 ["Fit (1:)=[x values, y values] to a curve" 664 ["Fit (1:)=[x values, y values] to a curve"
665 (progn 665 (progn
666 (require 'calcalg3) 666 (require 'calcalg3)
667 (call-interactively 'calc-curve-fit)) 667 (call-interactively 'calc-curve-fit))
@@ -675,13 +675,13 @@
675 675
676(defvar calc-graphics-menu 676(defvar calc-graphics-menu
677 (list "Graphics" 677 (list "Graphics"
678 ["Graph 2D [(1:)= y values, (2:)= x values]" 678 ["Graph 2D [(1:)= y values, (2:)= x values]"
679 (progn 679 (progn
680 (require 'calc-graph) 680 (require 'calc-graph)
681 (call-interactively 'calc-graph-fast)) 681 (call-interactively 'calc-graph-fast))
682 :keys "g f" 682 :keys "g f"
683 :active (>= (calc-stack-size) 2)] 683 :active (>= (calc-stack-size) 2)]
684 ["Graph 3D [(1:)= z values, (2:)= y values, (3:)= x values]" 684 ["Graph 3D [(1:)= z values, (2:)= y values, (3:)= x values]"
685 (progn 685 (progn
686 (require 'calc-graph) 686 (require 'calc-graph)
687 (call-interactively 'calc-graph-fast-3d)) 687 (call-interactively 'calc-graph-fast-3d))
@@ -696,11 +696,11 @@
696(defvar calc-vectors-menu 696(defvar calc-vectors-menu
697 (list "Matrices/Vectors" 697 (list "Matrices/Vectors"
698 (list "Matrices" 698 (list "Matrices"
699 ["(2:) + (1:)" calc-plus 699 ["(2:) + (1:)" calc-plus
700 :keys "+" :active (>= (calc-stack-size) 2)] 700 :keys "+" :active (>= (calc-stack-size) 2)]
701 ["(2:) - (1:)" calc-minus 701 ["(2:) - (1:)" calc-minus
702 :keys "-" :active (>= (calc-stack-size) 2)] 702 :keys "-" :active (>= (calc-stack-size) 2)]
703 ["(2:) * (1:)" calc-times 703 ["(2:) * (1:)" calc-times
704 :keys "*" :active (>= (calc-stack-size) 2)] 704 :keys "*" :active (>= (calc-stack-size) 2)]
705 ["(1:)^(-1)" 705 ["(1:)^(-1)"
706 (progn 706 (progn
@@ -709,17 +709,17 @@
709 :keys "&" 709 :keys "&"
710 :active (>= (calc-stack-size) 1)] 710 :active (>= (calc-stack-size) 1)]
711 ["Create an identity matrix" 711 ["Create an identity matrix"
712 (progn 712 (progn
713 (require 'calc-vec) 713 (require 'calc-vec)
714 (call-interactively 'calc-ident)) 714 (call-interactively 'calc-ident))
715 :keys "v i"] 715 :keys "v i"]
716 ["transpose(1:)" 716 ["transpose(1:)"
717 (progn 717 (progn
718 (require 'calc-vec) 718 (require 'calc-vec)
719 (call-interactively 'calc-transpose)) 719 (call-interactively 'calc-transpose))
720 :keys "v t" 720 :keys "v t"
721 :active (>= (calc-stack-size) 1)] 721 :active (>= (calc-stack-size) 1)]
722 ["det(1:)" 722 ["det(1:)"
723 (progn 723 (progn
724 (require 'calc-mtx) 724 (require 'calc-mtx)
725 (call-interactively 'calc-mdet)) 725 (call-interactively 'calc-mdet))
@@ -731,19 +731,19 @@
731 (call-interactively 'calc-mtrace)) 731 (call-interactively 'calc-mtrace))
732 :keys "V T" 732 :keys "V T"
733 :active (>= (calc-stack-size) 1)] 733 :active (>= (calc-stack-size) 1)]
734 ["LUD decompose (1:)" 734 ["LUD decompose (1:)"
735 (progn 735 (progn
736 (require 'calc-mtx) 736 (require 'calc-mtx)
737 (call-interactively 'calc-mlud)) 737 (call-interactively 'calc-mlud))
738 :keys "V L" 738 :keys "V L"
739 :active (>= (calc-stack-size) 1)] 739 :active (>= (calc-stack-size) 1)]
740 ["Extract a row from (1:)" 740 ["Extract a row from (1:)"
741 (progn 741 (progn
742 (require 'calc-vec) 742 (require 'calc-vec)
743 (call-interactively 'calc-mrow)) 743 (call-interactively 'calc-mrow))
744 :keys "v r" 744 :keys "v r"
745 :active (>= (calc-stack-size) 1)] 745 :active (>= (calc-stack-size) 1)]
746 ["Extract a column from (1:)" 746 ["Extract a column from (1:)"
747 (progn 747 (progn
748 (require 'calc-vec) 748 (require 'calc-vec)
749 (call-interactively 'calc-mcol)) 749 (call-interactively 'calc-mcol))
@@ -756,13 +756,13 @@
756 (call-interactively 'calc-head)) 756 (call-interactively 'calc-head))
757 :keys "v h" 757 :keys "v h"
758 :active (>= (calc-stack-size) 1)] 758 :active (>= (calc-stack-size) 1)]
759 ["Extract an element from (1:)" 759 ["Extract an element from (1:)"
760 (progn 760 (progn
761 (require 'calc-vec) 761 (require 'calc-vec)
762 (call-interactively 'calc-mrow)) 762 (call-interactively 'calc-mrow))
763 :keys "v r" 763 :keys "v r"
764 :active (>= (calc-stack-size) 1)] 764 :active (>= (calc-stack-size) 1)]
765 ["Reverse (1:)" 765 ["Reverse (1:)"
766 (progn 766 (progn
767 (require 'calc-vec) 767 (require 'calc-vec)
768 (call-interactively 'calc-reverse-vector)) 768 (call-interactively 'calc-reverse-vector))
@@ -775,19 +775,19 @@
775 :keys "v u" 775 :keys "v u"
776 :active (>= (calc-stack-size) 1) 776 :active (>= (calc-stack-size) 1)
777 :help "Separate the elements of (1:)"] 777 :help "Separate the elements of (1:)"]
778 ["(2:) cross (1:)" 778 ["(2:) cross (1:)"
779 (progn 779 (progn
780 (require 'calc-vec) 780 (require 'calc-vec)
781 (call-interactively 'calc-cross)) 781 (call-interactively 'calc-cross))
782 :keys "V C" 782 :keys "V C"
783 :active (>= (calc-stack-size) 2) 783 :active (>= (calc-stack-size) 2)
784 :help "The cross product in R^3"] 784 :help "The cross product in R^3"]
785 ["(2:) dot (1:)" 785 ["(2:) dot (1:)"
786 calc-mult 786 calc-mult
787 :keys "*" 787 :keys "*"
788 :active (>= (calc-stack-size) 2) 788 :active (>= (calc-stack-size) 2)
789 :help "The dot product"] 789 :help "The dot product"]
790 ["Map a function across (1:)" 790 ["Map a function across (1:)"
791 (progn 791 (progn
792 (require 'calc-map) 792 (require 'calc-map)
793 (call-interactively 'calc-map)) 793 (call-interactively 'calc-map))
@@ -795,25 +795,25 @@
795 :active (>= (calc-stack-size) 1) 795 :active (>= (calc-stack-size) 1)
796 :help "Apply a function to each element"]) 796 :help "Apply a function to each element"])
797 (list "Vectors As Sets" 797 (list "Vectors As Sets"
798 ["Remove duplicates from (1:)" 798 ["Remove duplicates from (1:)"
799 (progn 799 (progn
800 (require 'calc-vec) 800 (require 'calc-vec)
801 (call-interactively 'calc-remove-duplicates)) 801 (call-interactively 'calc-remove-duplicates))
802 :keys "V +" 802 :keys "V +"
803 :active (>= (calc-stack-size) 1)] 803 :active (>= (calc-stack-size) 1)]
804 ["(2:) union (1:)" 804 ["(2:) union (1:)"
805 (progn 805 (progn
806 (require 'calc-vec) 806 (require 'calc-vec)
807 (call-interactively 'calc-set-union)) 807 (call-interactively 'calc-set-union))
808 :keys "V V" 808 :keys "V V"
809 :active (>= (calc-stack-size) 2)] 809 :active (>= (calc-stack-size) 2)]
810 ["(2:) intersect (1:)" 810 ["(2:) intersect (1:)"
811 (progn 811 (progn
812 (require 'calc-vec) 812 (require 'calc-vec)
813 (call-interactively 'calc-set-intersect)) 813 (call-interactively 'calc-set-intersect))
814 :keys "V ^" 814 :keys "V ^"
815 :active (>= (calc-stack-size) 2)] 815 :active (>= (calc-stack-size) 2)]
816 ["(2:) \\ (1:)" 816 ["(2:) \\ (1:)"
817 (progn 817 (progn
818 (require 'calc-vec) 818 (require 'calc-vec)
819 (call-interactively 'calc-set-difference)) 819 (call-interactively 'calc-set-difference))
@@ -821,35 +821,35 @@
821 :help "Set difference" 821 :help "Set difference"
822 :active (>= (calc-stack-size) 2)]) 822 :active (>= (calc-stack-size) 2)])
823 (list "Statistics On Vectors" 823 (list "Statistics On Vectors"
824 ["length(1:)" 824 ["length(1:)"
825 (progn 825 (progn
826 (require 'calc-stat) 826 (require 'calc-stat)
827 (call-interactively 'calc-vector-count)) 827 (call-interactively 'calc-vector-count))
828 :keys "u #" 828 :keys "u #"
829 :active (>= (calc-stack-size) 1) 829 :active (>= (calc-stack-size) 1)
830 :help "The number of data values"] 830 :help "The number of data values"]
831 ["sum(1:)" 831 ["sum(1:)"
832 (progn 832 (progn
833 (require 'calc-stat) 833 (require 'calc-stat)
834 (call-interactively 'calc-vector-sum)) 834 (call-interactively 'calc-vector-sum))
835 :keys "u +" 835 :keys "u +"
836 :active (>= (calc-stack-size) 1) 836 :active (>= (calc-stack-size) 1)
837 :help "The sum of the data values"] 837 :help "The sum of the data values"]
838 ["max(1:)" 838 ["max(1:)"
839 (progn 839 (progn
840 (require 'calc-stat) 840 (require 'calc-stat)
841 (call-interactively 'calc-vector-max)) 841 (call-interactively 'calc-vector-max))
842 :keys "u x" 842 :keys "u x"
843 :active (>= (calc-stack-size) 1) 843 :active (>= (calc-stack-size) 1)
844 :help "The maximum of the data values"] 844 :help "The maximum of the data values"]
845 ["min(1:)" 845 ["min(1:)"
846 (progn 846 (progn
847 (require 'calc-stat) 847 (require 'calc-stat)
848 (call-interactively 'calc-vector-min)) 848 (call-interactively 'calc-vector-min))
849 :keys "u N" 849 :keys "u N"
850 :active (>= (calc-stack-size) 1) 850 :active (>= (calc-stack-size) 1)
851 :help "The minumum of the data values"] 851 :help "The minimum of the data values"]
852 ["mean(1:)" 852 ["mean(1:)"
853 (progn 853 (progn
854 (require 'calc-stat) 854 (require 'calc-stat)
855 (call-interactively 'calc-vector-mean)) 855 (call-interactively 'calc-vector-mean))
@@ -863,28 +863,28 @@
863 :keys "I u M" 863 :keys "I u M"
864 :active (>= (calc-stack-size) 1) 864 :active (>= (calc-stack-size) 1)
865 :help "The average (arithmetic mean) of the data values as an error form"] 865 :help "The average (arithmetic mean) of the data values as an error form"]
866 ["sdev(1:)" 866 ["sdev(1:)"
867 (progn 867 (progn
868 (require 'calc-stat) 868 (require 'calc-stat)
869 (call-interactively 'calc-vector-sdev)) 869 (call-interactively 'calc-vector-sdev))
870 :keys "u S" 870 :keys "u S"
871 :active (>= (calc-stack-size) 1) 871 :active (>= (calc-stack-size) 1)
872 :help "The sample sdev, sqrt[sum((values - mean)^2)/(N-1)]"] 872 :help "The sample sdev, sqrt[sum((values - mean)^2)/(N-1)]"]
873 ["variance(1:)" 873 ["variance(1:)"
874 (progn 874 (progn
875 (require 'calc-stat) 875 (require 'calc-stat)
876 (call-interactively 'calc-vector-variance)) 876 (call-interactively 'calc-vector-variance))
877 :keys "H u S" 877 :keys "H u S"
878 :active (>= (calc-stack-size) 1) 878 :active (>= (calc-stack-size) 1)
879 :help "The sample variance, sum((values - mean)^2)/(N-1)"] 879 :help "The sample variance, sum((values - mean)^2)/(N-1)"]
880 ["population sdev(1:)" 880 ["population sdev(1:)"
881 (progn 881 (progn
882 (require 'calc-stat) 882 (require 'calc-stat)
883 (call-interactively 'calc-vector-pop-sdev)) 883 (call-interactively 'calc-vector-pop-sdev))
884 :keys "I u S" 884 :keys "I u S"
885 :active (>= (calc-stack-size) 1) 885 :active (>= (calc-stack-size) 1)
886 :help "The population sdev, sqrt[sum((values - mean)^2)/N]"] 886 :help "The population sdev, sqrt[sum((values - mean)^2)/N]"]
887 ["population variance(1:)" 887 ["population variance(1:)"
888 (progn 888 (progn
889 (require 'calc-stat) 889 (require 'calc-stat)
890 (call-interactively 'calc-vector-pop-variance)) 890 (call-interactively 'calc-vector-pop-variance))
@@ -937,25 +937,25 @@
937 937
938(defvar calc-units-menu 938(defvar calc-units-menu
939 (list "Units" 939 (list "Units"
940 ["Convert units in (1:)" 940 ["Convert units in (1:)"
941 (progn 941 (progn
942 (require 'calc-units) 942 (require 'calc-units)
943 (call-interactively 'calc-convert-units )) 943 (call-interactively 'calc-convert-units ))
944 :keys "u c" 944 :keys "u c"
945 :active (>= (calc-stack-size) 1)] 945 :active (>= (calc-stack-size) 1)]
946 ["Convert temperature in (1:)" 946 ["Convert temperature in (1:)"
947 (progn 947 (progn
948 (require 'calc-units) 948 (require 'calc-units)
949 (call-interactively 'calc-convert-temperature)) 949 (call-interactively 'calc-convert-temperature))
950 :keys "u t" 950 :keys "u t"
951 :active (>= (calc-stack-size) 1)] 951 :active (>= (calc-stack-size) 1)]
952 ["Simplify units in (1:)" 952 ["Simplify units in (1:)"
953 (progn 953 (progn
954 (require 'calc-units) 954 (require 'calc-units)
955 (call-interactively 'calc-simplify-units)) 955 (call-interactively 'calc-simplify-units))
956 :keys "u s" 956 :keys "u s"
957 :active (>= (calc-stack-size) 1)] 957 :active (>= (calc-stack-size) 1)]
958 ["View units table" 958 ["View units table"
959 (progn 959 (progn
960 (require 'calc-units) 960 (require 'calc-units)
961 (call-interactively 'calc-view-units-table)) 961 (call-interactively 'calc-view-units-table))
@@ -1072,40 +1072,40 @@
1072 1072
1073(defvar calc-variables-menu 1073(defvar calc-variables-menu
1074 (list "Variables" 1074 (list "Variables"
1075 ["Store (1:) into a variable" 1075 ["Store (1:) into a variable"
1076 (progn 1076 (progn
1077 (require 'calc-store) 1077 (require 'calc-store)
1078 (call-interactively 'calc-store)) 1078 (call-interactively 'calc-store))
1079 :keys "s s" 1079 :keys "s s"
1080 :active (>= (calc-stack-size) 1)] 1080 :active (>= (calc-stack-size) 1)]
1081 ["Recall a variable value" 1081 ["Recall a variable value"
1082 (progn 1082 (progn
1083 (require 'calc-store) 1083 (require 'calc-store)
1084 (call-interactively 'calc-recall )) 1084 (call-interactively 'calc-recall ))
1085 :keys "s r"] 1085 :keys "s r"]
1086 ["Edit the value of a variable" 1086 ["Edit the value of a variable"
1087 (progn 1087 (progn
1088 (require 'calc-store) 1088 (require 'calc-store)
1089 (call-interactively 'calc-edit-variable)) 1089 (call-interactively 'calc-edit-variable))
1090 :keys "s e"] 1090 :keys "s e"]
1091 ["Exchange (1:) with a variable value" 1091 ["Exchange (1:) with a variable value"
1092 (progn 1092 (progn
1093 (require 'calc-store) 1093 (require 'calc-store)
1094 (call-interactively 'calc-store-exchange)) 1094 (call-interactively 'calc-store-exchange))
1095 :keys "s x" 1095 :keys "s x"
1096 :active (>= (calc-stack-size) 1)] 1096 :active (>= (calc-stack-size) 1)]
1097 ["Clear variable value" 1097 ["Clear variable value"
1098 (progn 1098 (progn
1099 (require 'calc-store) 1099 (require 'calc-store)
1100 (call-interactively 'calc-unstore)) 1100 (call-interactively 'calc-unstore))
1101 :keys "s u"] 1101 :keys "s u"]
1102 ["Evaluate variables in (1:)" 1102 ["Evaluate variables in (1:)"
1103 (progn 1103 (progn
1104 (require 'calc-ext) 1104 (require 'calc-ext)
1105 (call-interactively 'calc-evaluate)) 1105 (call-interactively 'calc-evaluate))
1106 :keys "=" 1106 :keys "="
1107 :active (>= (calc-stack-size) 1)] 1107 :active (>= (calc-stack-size) 1)]
1108 ["Evaluate (1:), assigning a value to a variable" 1108 ["Evaluate (1:), assigning a value to a variable"
1109 (progn 1109 (progn
1110 (require 'calc-store) 1110 (require 'calc-store)
1111 (call-interactively 'calc-let)) 1111 (call-interactively 'calc-let))
@@ -1119,19 +1119,19 @@
1119 1119
1120(defvar calc-stack-menu 1120(defvar calc-stack-menu
1121 (list "Stack" 1121 (list "Stack"
1122 ["Remove (1:)" 1122 ["Remove (1:)"
1123 calc-pop 1123 calc-pop
1124 :keys "DEL" 1124 :keys "DEL"
1125 :active (>= (calc-stack-size) 1)] 1125 :active (>= (calc-stack-size) 1)]
1126 ["Switch (1:) and (2:)" 1126 ["Switch (1:) and (2:)"
1127 calc-roll-down 1127 calc-roll-down
1128 :keys "TAB" 1128 :keys "TAB"
1129 :active (>= (calc-stack-size) 2)] 1129 :active (>= (calc-stack-size) 2)]
1130 ["Duplicate (1:)" 1130 ["Duplicate (1:)"
1131 calc-enter 1131 calc-enter
1132 :keys "RET" 1132 :keys "RET"
1133 :active (>= (calc-stack-size) 1)] 1133 :active (>= (calc-stack-size) 1)]
1134 ["Edit (1:)" 1134 ["Edit (1:)"
1135 (progn 1135 (progn
1136 (require 'calc-yank) 1136 (require 'calc-yank)
1137 (call-interactively calc-edit)) 1137 (call-interactively calc-edit))
@@ -1144,12 +1144,12 @@
1144 1144
1145(defvar calc-errors-menu 1145(defvar calc-errors-menu
1146 (list "Undo" 1146 (list "Undo"
1147 ["Undo" 1147 ["Undo"
1148 (progn 1148 (progn
1149 (require 'calc-undo) 1149 (require 'calc-undo)
1150 (call-interactively 'calc-undo)) 1150 (call-interactively 'calc-undo))
1151 :keys "U"] 1151 :keys "U"]
1152 ["Redo" 1152 ["Redo"
1153 (progn 1153 (progn
1154 (require 'calc-undo) 1154 (require 'calc-undo)
1155 (call-interactively 'calc-redo)) 1155 (call-interactively 'calc-redo))
@@ -1162,7 +1162,7 @@
1162 1162
1163(defvar calc-modes-menu 1163(defvar calc-modes-menu
1164 (list "Modes" 1164 (list "Modes"
1165 ["Precision" 1165 ["Precision"
1166 (progn 1166 (progn
1167 (require 'calc-ext) 1167 (require 'calc-ext)
1168 (call-interactively 'calc-precision)) 1168 (call-interactively 'calc-precision))
@@ -1277,7 +1277,7 @@
1277 ["Binary" 1277 ["Binary"
1278 (progn 1278 (progn
1279 (require 'calc-bin) 1279 (require 'calc-bin)
1280 (call-interactively 1280 (call-interactively
1281 (lambda () (interactive) (calc-binary-radix t)))) 1281 (lambda () (interactive) (calc-binary-radix t))))
1282 :keys "C-u d 2" 1282 :keys "C-u d 2"
1283 :style radio 1283 :style radio
@@ -1330,7 +1330,7 @@
1330 :keys "d e" 1330 :keys "d e"
1331 :style radio 1331 :style radio
1332 :selected (eq (car-safe calc-float-format) 'eng)]) 1332 :selected (eq (car-safe calc-float-format) 'eng)])
1333 (list "Complex Format" 1333 (list "Complex Format"
1334 ["Default" 1334 ["Default"
1335 (progn 1335 (progn
1336 (require 'calc-cplx) 1336 (require 'calc-cplx)
@@ -1522,17 +1522,17 @@
1522 1522
1523(defvar calc-help-menu 1523(defvar calc-help-menu
1524 (list "Help" 1524 (list "Help"
1525 ["Manual" 1525 ["Manual"
1526 calc-info 1526 calc-info
1527 :keys "h i"] 1527 :keys "h i"]
1528 ["Tutorial" 1528 ["Tutorial"
1529 calc-tutorial 1529 calc-tutorial
1530 :keys "h t"] 1530 :keys "h t"]
1531 ["Summary" 1531 ["Summary"
1532 calc-info-summary 1532 calc-info-summary
1533 :keys "h s"] 1533 :keys "h s"]
1534 "----" 1534 "----"
1535 ["Help on Help" 1535 ["Help on Help"
1536 (progn 1536 (progn
1537 (calc-info-goto-node "Introduction") 1537 (calc-info-goto-node "Introduction")
1538 (Info-goto-node "Help Commands"))]) 1538 (Info-goto-node "Help Commands"))])
@@ -1557,7 +1557,7 @@
1557 calc-errors-menu 1557 calc-errors-menu
1558 calc-modes-menu 1558 calc-modes-menu
1559 calc-help-menu 1559 calc-help-menu
1560 ["Reset" 1560 ["Reset"
1561 (progn 1561 (progn
1562 (require 'calc-ext) 1562 (require 'calc-ext)
1563 (call-interactively 'calc-reset)) 1563 (call-interactively 'calc-reset))
@@ -1565,4 +1565,3 @@
1565 ["Quit" calc-quit])) 1565 ["Quit" calc-quit]))
1566 1566
1567(provide 'calc-menu) 1567(provide 'calc-menu)
1568
diff --git a/lisp/calc/calc-yank.el b/lisp/calc/calc-yank.el
index 2360cf00ddc..135ea0bae40 100644
--- a/lisp/calc/calc-yank.el
+++ b/lisp/calc/calc-yank.el
@@ -131,7 +131,7 @@
131 val)) 131 val))
132 val)))))))) 132 val))))))))
133 133
134;;; The Calc set- and get-register commands are modified versions of functions 134;;; The Calc set- and get-register commands are modified versions of functions
135;;; in register.el 135;;; in register.el
136 136
137(defvar calc-register-alist nil 137(defvar calc-register-alist nil
@@ -206,7 +206,7 @@ With prefix arg, delete as well."
206 206
207(defun calc-add-to-register (register start end prepend delete-flag) 207(defun calc-add-to-register (register start end prepend delete-flag)
208 "Add the lines in the region to register REGISTER. 208 "Add the lines in the region to register REGISTER.
209If PREPEND is non-nil, add them to the beginning of the register, 209If PREPEND is non-nil, add them to the beginning of the register,
210otherwise the end. If DELETE-FLAG is non-nil, also delete the region." 210otherwise the end. If DELETE-FLAG is non-nil, also delete the region."
211 (let* ((top-num (calc-locate-cursor-element start)) 211 (let* ((top-num (calc-locate-cursor-element start))
212 (top-pos (save-excursion 212 (top-pos (save-excursion
@@ -242,7 +242,7 @@ With prefix arg, also delete the region."
242 (if (eq major-mode 'calc-mode) 242 (if (eq major-mode 'calc-mode)
243 (calc-add-to-register register start end nil delete-flag) 243 (calc-add-to-register register start end nil delete-flag)
244 (append-to-register register start end delete-flag))) 244 (append-to-register register start end delete-flag)))
245 245
246(defun calc-prepend-to-register (register start end &optional delete-flag) 246(defun calc-prepend-to-register (register start end &optional delete-flag)
247 "Copy the lines in the region to the beginning of register REGISTER. 247 "Copy the lines in the region to the beginning of register REGISTER.
248With prefix arg, also delete the region." 248With prefix arg, also delete the region."
@@ -250,7 +250,7 @@ With prefix arg, also delete the region."
250 (if (eq major-mode 'calc-mode) 250 (if (eq major-mode 'calc-mode)
251 (calc-add-to-register register start end t delete-flag) 251 (calc-add-to-register register start end t delete-flag)
252 (prepend-to-register register start end delete-flag))) 252 (prepend-to-register register start end delete-flag)))
253 253
254 254
255 255
256(defun calc-clean-newlines (s) 256(defun calc-clean-newlines (s)
@@ -585,12 +585,12 @@ To cancel the edit, simply kill the *Calc Edit* buffer."
585 (setq calc-allow-ret allow-ret) 585 (setq calc-allow-ret allow-ret)
586 (let ((inhibit-read-only t)) 586 (let ((inhibit-read-only t))
587 (erase-buffer)) 587 (erase-buffer))
588 (add-hook 'kill-buffer-hook (lambda () 588 (add-hook 'kill-buffer-hook (lambda ()
589 (let ((calc-edit-handler nil)) 589 (let ((calc-edit-handler nil))
590 (calc-edit-finish t)) 590 (calc-edit-finish t))
591 (message "(Cancelled)")) t t) 591 (message "(Cancelled)")) t t)
592 (insert (propertize 592 (insert (propertize
593 (concat 593 (concat
594 (or title title "Calc Edit Mode. ") 594 (or title title "Calc Edit Mode. ")
595 "Press `C-c C-c'" 595 "Press `C-c C-c'"
596 (if allow-ret "" " or RET") 596 (if allow-ret "" " or RET")
diff --git a/lisp/calculator.el b/lisp/calculator.el
index 4a79316d736..faf62424729 100644
--- a/lisp/calculator.el
+++ b/lisp/calculator.el
@@ -81,7 +81,7 @@ This determines the default behavior of unary operators."
81 81
82(defcustom calculator-prompt "Calc=%s> " 82(defcustom calculator-prompt "Calc=%s> "
83 "The prompt used by the Emacs calculator. 83 "The prompt used by the Emacs calculator.
84It should contain a \"%s\" somewhere that will indicate the i/o radixes; 84It should contain a \"%s\" somewhere that will indicate the i/o radices;
85this will be a two-character string as described in the documentation 85this will be a two-character string as described in the documentation
86for `calculator-mode'." 86for `calculator-mode'."
87 :type 'string 87 :type 'string
diff --git a/lisp/calendar/appt.el b/lisp/calendar/appt.el
index c44eb6e1b5d..230366da2b0 100644
--- a/lisp/calendar/appt.el
+++ b/lisp/calendar/appt.el
@@ -508,7 +508,7 @@ The time should be in either 24 hour format or am/pm format.
508Optional argument WARNTIME is an integer (or string) giving the number 508Optional argument WARNTIME is an integer (or string) giving the number
509of minutes before the appointment at which to start warning. 509of minutes before the appointment at which to start warning.
510The default is `appt-message-warning-time'." 510The default is `appt-message-warning-time'."
511 (interactive "sTime (hh:mm[am/pm]): \nsMessage: 511 (interactive "sTime (hh:mm[am/pm]): \nsMessage: \n\
512sMinutes before the appointment to start warning: ") 512sMinutes before the appointment to start warning: ")
513 (unless (string-match appt-time-regexp time) 513 (unless (string-match appt-time-regexp time)
514 (error "Unacceptable time-string")) 514 (error "Unacceptable time-string"))
@@ -521,7 +521,7 @@ sMinutes before the appointment to start warning: ")
521 (or appt-timer (appt-activate)) 521 (or appt-timer (appt-activate))
522 (let ((time-msg (list (list (appt-convert-time time)) 522 (let ((time-msg (list (list (appt-convert-time time))
523 (concat time " " msg) t))) 523 (concat time " " msg) t)))
524 ;; It is presently non-sensical to have multiple warnings about 524 ;; It is presently nonsensical to have multiple warnings about
525 ;; the same appointment with just different delays, but it might 525 ;; the same appointment with just different delays, but it might
526 ;; not always be so. TODO 526 ;; not always be so. TODO
527 (if warntime (setq time-msg (append time-msg (list warntime)))) 527 (if warntime (setq time-msg (append time-msg (list warntime))))
diff --git a/lisp/cedet/inversion.el b/lisp/cedet/inversion.el
index 53639b19a96..35841d2a6b2 100644
--- a/lisp/cedet/inversion.el
+++ b/lisp/cedet/inversion.el
@@ -199,12 +199,12 @@ not an indication of new features or bug fixes."
199 (= v1-1 v2-1) 199 (= v1-1 v2-1)
200 (= v1-2 v2-2) 200 (= v1-2 v2-2)
201 (= v1-3 v2-3) 201 (= v1-3 v2-3)
202 v1-4 v2-4 ; all or nothin if elt - is = 202 v1-4 v2-4 ; all or nothing if elt - is =
203 (< v1-4 v2-4)) 203 (< v1-4 v2-4))
204 (and (= v1-0 v2-0) 204 (and (= v1-0 v2-0)
205 (= v1-1 v2-1) 205 (= v1-1 v2-1)
206 (= v1-2 v2-2) 206 (= v1-2 v2-2)
207 v1-3 v2-3 ; all or nothin if elt - is = 207 v1-3 v2-3 ; all or nothing if elt - is =
208 (< v1-3 v2-3)) 208 (< v1-3 v2-3))
209 (and (= v1-1 v2-1) 209 (and (= v1-1 v2-1)
210 (< v1-2 v2-2)) 210 (< v1-2 v2-2))
diff --git a/lisp/cedet/semantic.el b/lisp/cedet/semantic.el
index 3355ed83a91..337413caf75 100644
--- a/lisp/cedet/semantic.el
+++ b/lisp/cedet/semantic.el
@@ -680,7 +680,7 @@ Does nothing if the current buffer doesn't need reparsing."
680 (save-excursion (semantic-fetch-tags)) 680 (save-excursion (semantic-fetch-tags))
681 nil) 681 nil)
682 ;; If we are here, it is because the lexical step failed, 682 ;; If we are here, it is because the lexical step failed,
683 ;; proably due to unterminated lists or something like that. 683 ;; probably due to unterminated lists or something like that.
684 684
685 ;; We do nothing, and just wait for the next idle timer 685 ;; We do nothing, and just wait for the next idle timer
686 ;; to go off. In the meantime, remember this, and make sure 686 ;; to go off. In the meantime, remember this, and make sure
diff --git a/lisp/cedet/semantic/edit.el b/lisp/cedet/semantic/edit.el
index a2c8c5efd40..3fbcf6d932f 100644
--- a/lisp/cedet/semantic/edit.el
+++ b/lisp/cedet/semantic/edit.el
@@ -859,7 +859,7 @@ pre-positioned to a convenient location."
859 (setq cacheend chil) 859 (setq cacheend chil)
860 (while (and cacheend (not (eq last (car cacheend)))) 860 (while (and cacheend (not (eq last (car cacheend))))
861 (setq cacheend (cdr cacheend))) 861 (setq cacheend (cdr cacheend)))
862 ;; The splicable part is after cacheend.. so move cacheend 862 ;; The spliceable part is after cacheend.. so move cacheend
863 ;; one more tag. 863 ;; one more tag.
864 (setq cacheend (cdr cacheend)) 864 (setq cacheend (cdr cacheend))
865 ;; Splice the found end tag into the cons cell 865 ;; Splice the found end tag into the cons cell
diff --git a/lisp/cedet/semantic/idle.el b/lisp/cedet/semantic/idle.el
index 6761a7f532b..4b3a51e79f7 100644
--- a/lisp/cedet/semantic/idle.el
+++ b/lisp/cedet/semantic/idle.el
@@ -515,7 +515,7 @@ Does nothing if the current buffer doesn't need reparsing."
515 (save-excursion (semantic-fetch-tags)) 515 (save-excursion (semantic-fetch-tags))
516 nil) 516 nil)
517 ;; If we are here, it is because the lexical step failed, 517 ;; If we are here, it is because the lexical step failed,
518 ;; proably due to unterminated lists or something like that. 518 ;; probably due to unterminated lists or something like that.
519 519
520 ;; We do nothing, and just wait for the next idle timer 520 ;; We do nothing, and just wait for the next idle timer
521 ;; to go off. In the meantime, remember this, and make sure 521 ;; to go off. In the meantime, remember this, and make sure
diff --git a/lisp/cedet/semantic/lex.el b/lisp/cedet/semantic/lex.el
index ba43ba657a1..dab5c444fae 100644
--- a/lisp/cedet/semantic/lex.el
+++ b/lisp/cedet/semantic/lex.el
@@ -1248,7 +1248,7 @@ they are comment end characters) AND when you want whitespace tokens."
1248 (if (eq (semantic-lex-token-class (car semantic-lex-token-stream)) 1248 (if (eq (semantic-lex-token-class (car semantic-lex-token-stream))
1249 'whitespace) 1249 'whitespace)
1250 ;; Merge whitespace tokens together if they are adjacent. Two 1250 ;; Merge whitespace tokens together if they are adjacent. Two
1251 ;; whitespace tokens may be sperated by a comment which is not in 1251 ;; whitespace tokens may be separated by a comment which is not in
1252 ;; the token stream. 1252 ;; the token stream.
1253 (setcdr (semantic-lex-token-bounds (car semantic-lex-token-stream)) 1253 (setcdr (semantic-lex-token-bounds (car semantic-lex-token-stream))
1254 (match-end 0)) 1254 (match-end 0))
@@ -1271,7 +1271,7 @@ they are comment end characters)."
1271 (if (eq (semantic-lex-token-class (car semantic-lex-token-stream)) 1271 (if (eq (semantic-lex-token-class (car semantic-lex-token-stream))
1272 'whitespace) 1272 'whitespace)
1273 ;; Merge whitespace tokens together if they are adjacent. Two 1273 ;; Merge whitespace tokens together if they are adjacent. Two
1274 ;; whitespace tokens may be sperated by a comment which is not in 1274 ;; whitespace tokens may be separated by a comment which is not in
1275 ;; the token stream. 1275 ;; the token stream.
1276 (progn 1276 (progn
1277 (setq semantic-lex-end-point (match-end 0)) 1277 (setq semantic-lex-end-point (match-end 0))
diff --git a/lisp/cedet/semantic/tag-ls.el b/lisp/cedet/semantic/tag-ls.el
index 4d001322108..2f585cbdf45 100644
--- a/lisp/cedet/semantic/tag-ls.el
+++ b/lisp/cedet/semantic/tag-ls.el
@@ -195,7 +195,7 @@ See `semantic-tag-static-p'."
195;;;###autoload 195;;;###autoload
196(define-overloadable-function semantic-tag-prototype-p (tag) 196(define-overloadable-function semantic-tag-prototype-p (tag)
197 "Return non nil if TAG is a prototype. 197 "Return non nil if TAG is a prototype.
198For some laguages, such as C, a prototype is a declaration of 198For some languages, such as C, a prototype is a declaration of
199something without an implementation." 199something without an implementation."
200 ) 200 )
201 201
diff --git a/lisp/cedet/srecode/fields.el b/lisp/cedet/srecode/fields.el
index f13fb17ca8f..f4d34a0f2ab 100644
--- a/lisp/cedet/srecode/fields.el
+++ b/lisp/cedet/srecode/fields.el
@@ -324,7 +324,7 @@ Try to use this to provide useful completion when available.")
324 ) 324 )
325 325
326(defvar srecode-field-replication-max-size 100 326(defvar srecode-field-replication-max-size 100
327 "Maximum size of a field before cancelling replication.") 327 "Maximum size of a field before canceling replication.")
328 328
329(defun srecode-field-mod-hook (ol after start end &optional pre-len) 329(defun srecode-field-mod-hook (ol after start end &optional pre-len)
330 "Modification hook for the field overlay. 330 "Modification hook for the field overlay.
diff --git a/lisp/delim-col.el b/lisp/delim-col.el
index ed6ab96107a..96a0745dd31 100644
--- a/lisp/delim-col.el
+++ b/lisp/delim-col.el
@@ -206,7 +206,7 @@ This has effect only when there are lines with different number of columns."
206 :group 'columns) 206 :group 'columns)
207 207
208(defcustom delimit-columns-start 0 208(defcustom delimit-columns-start 0
209 "Specify column number to start prettifing. 209 "Specify column number to start prettifying.
210 210
211See also `delimit-columns-end' for documentation. 211See also `delimit-columns-end' for documentation.
212 212
@@ -221,7 +221,7 @@ column (column 0) is located at left corner."
221 :group 'columns) 221 :group 'columns)
222 222
223(defcustom delimit-columns-end 1000000 223(defcustom delimit-columns-end 1000000
224 "Specify column number to end prettifing. 224 "Specify column number to end prettifying.
225 225
226See also `delimit-columns-start' for documentation. 226See also `delimit-columns-start' for documentation.
227 227
diff --git a/lisp/delsel.el b/lisp/delsel.el
index 6d2c47f3957..fcd45f1a148 100644
--- a/lisp/delsel.el
+++ b/lisp/delsel.el
@@ -144,7 +144,7 @@ any selection."
144(put 'newline 'delete-selection t) 144(put 'newline 'delete-selection t)
145(put 'open-line 'delete-selection 'kill) 145(put 'open-line 'delete-selection 'kill)
146 146
147;; This is very useful for cancelling a selection in the minibuffer without 147;; This is very useful for canceling a selection in the minibuffer without
148;; aborting the minibuffer. 148;; aborting the minibuffer.
149(defun minibuffer-keyboard-quit () 149(defun minibuffer-keyboard-quit ()
150 "Abort recursive edit. 150 "Abort recursive edit.
diff --git a/lisp/descr-text.el b/lisp/descr-text.el
index 8b7fa89a19b..f285fe42332 100644
--- a/lisp/descr-text.el
+++ b/lisp/descr-text.el
@@ -358,7 +358,7 @@ This function is semi-obsolete. Use `get-char-code-property'."
358 (compose-string (string ch) 0 1 (format "\t%c\t" ch)) 358 (compose-string (string ch) 0 1 (format "\t%c\t" ch))
359 (string ch))) 359 (string ch)))
360 360
361;; Return a nicely formated list of categories; extended category 361;; Return a nicely formatted list of categories; extended category
362;; description is added to the category name as a tooltip 362;; description is added to the category name as a tooltip
363(defsubst describe-char-categories (category-set) 363(defsubst describe-char-categories (category-set)
364 (let ((mnemonics (category-set-mnemonics category-set))) 364 (let ((mnemonics (category-set-mnemonics category-set)))
diff --git a/lisp/dired-aux.el b/lisp/dired-aux.el
index b63940cec2d..757e814dba1 100644
--- a/lisp/dired-aux.el
+++ b/lisp/dired-aux.el
@@ -927,8 +927,7 @@ return t; if SYM is q or ESC, return nil."
927 (concat (apply 'format prompt args) 927 (concat (apply 'format prompt args)
928 (if help-form 928 (if help-form
929 (format " [Type yn!q or %s] " 929 (format " [Type yn!q or %s] "
930 (key-description 930 (key-description (vector help-char)))
931 (char-to-string help-char)))
932 " [Type y, n, q or !] "))) 931 " [Type y, n, q or !] ")))
933 (set sym (setq char (read-char-choice prompt char-choices))) 932 (set sym (setq char (read-char-choice prompt char-choices)))
934 (if (memq char '(?y ?\s ?!)) t))))) 933 (if (memq char '(?y ?\s ?!)) t)))))
diff --git a/lisp/dired-x.el b/lisp/dired-x.el
index 4daf313445c..0863cc1abac 100644
--- a/lisp/dired-x.el
+++ b/lisp/dired-x.el
@@ -1392,7 +1392,7 @@ Considers buffers closer to the car of `buffer-list' to be more recent."
1392;; Apparently people do use it. - lrd 12/22/97. 1392;; Apparently people do use it. - lrd 12/22/97.
1393 1393
1394(with-no-warnings 1394(with-no-warnings
1395 ;; Warnings are suppresed to avoid "global/dynamic var `X' lacks a prefix". 1395 ;; Warnings are suppressed to avoid "global/dynamic var `X' lacks a prefix".
1396 ;; This is unbearably ugly, but not more than having global variables 1396 ;; This is unbearably ugly, but not more than having global variables
1397 ;; named size, time, name or s, however practical it can be while writing 1397 ;; named size, time, name or s, however practical it can be while writing
1398 ;; `dired-mark-sexp' predicates. 1398 ;; `dired-mark-sexp' predicates.
diff --git a/lisp/dired.el b/lisp/dired.el
index 32a7f749681..4970b14e7b4 100644
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -3667,7 +3667,7 @@ Ask means pop up a menu for the user to select one of copy, move or link."
3667;;;;;; dired-run-shell-command dired-do-shell-command dired-do-async-shell-command 3667;;;;;; dired-run-shell-command dired-do-shell-command dired-do-async-shell-command
3668;;;;;; dired-clean-directory dired-do-print dired-do-touch dired-do-chown 3668;;;;;; dired-clean-directory dired-do-print dired-do-touch dired-do-chown
3669;;;;;; dired-do-chgrp dired-do-chmod dired-compare-directories dired-backup-diff 3669;;;;;; dired-do-chgrp dired-do-chmod dired-compare-directories dired-backup-diff
3670;;;;;; dired-diff) "dired-aux" "dired-aux.el" "2026ac587f0d9e893bae7662ff9d9318") 3670;;;;;; dired-diff) "dired-aux" "dired-aux.el" "2301de52aab0488c60d2b4841b6f597f")
3671;;; Generated autoloads from dired-aux.el 3671;;; Generated autoloads from dired-aux.el
3672 3672
3673(autoload 'dired-diff "dired-aux" "\ 3673(autoload 'dired-diff "dired-aux" "\
@@ -4128,7 +4128,7 @@ instead.
4128;;;*** 4128;;;***
4129 4129
4130;;;### (autoloads (dired-do-relsymlink dired-jump-other-window dired-jump) 4130;;;### (autoloads (dired-do-relsymlink dired-jump-other-window dired-jump)
4131;;;;;; "dired-x" "dired-x.el" "ea7c74fbb7dddf43bb85875018cb59ad") 4131;;;;;; "dired-x" "dired-x.el" "a542cdbf155ff79f36331bae217f3b28")
4132;;; Generated autoloads from dired-x.el 4132;;; Generated autoloads from dired-x.el
4133 4133
4134(autoload 'dired-jump "dired-x" "\ 4134(autoload 'dired-jump "dired-x" "\
diff --git a/lisp/electric.el b/lisp/electric.el
index 657b577bb1e..cec1b5d2000 100644
--- a/lisp/electric.el
+++ b/lisp/electric.el
@@ -85,7 +85,7 @@
85 (eq last-input-event ?\C-g)) 85 (eq last-input-event ?\C-g))
86 (progn (setq unread-command-events nil 86 (progn (setq unread-command-events nil
87 prefix-arg nil) 87 prefix-arg nil)
88 ;; If it wasn't cancelling a prefix character, then quit. 88 ;; If it wasn't canceling a prefix character, then quit.
89 (if (or (= (length (this-command-keys)) 1) 89 (if (or (= (length (this-command-keys)) 1)
90 (not inhibit-quit)) ; safety 90 (not inhibit-quit)) ; safety
91 (progn (ding) 91 (progn (ding)
@@ -197,11 +197,13 @@ Returns nil when we can't find this char."
197;; value, which only works well if the variable is preloaded. 197;; value, which only works well if the variable is preloaded.
198;;;###autoload 198;;;###autoload
199(defvar electric-indent-chars '(?\n) 199(defvar electric-indent-chars '(?\n)
200 "Characters that should cause automatic reindentation. 200 "Characters that should cause automatic reindentation.")
201Each entry of the list can be either a character or a cons of the 201
202form (CHAR . PREDICATE) which means that CHAR should cause reindentation 202(defvar electric-indent-functions nil
203only if PREDICATE returns non-nil. PREDICATE is called with no arguments 203 "Special hook run to decide whether to auto-indent.
204and with point before the inserted char.") 204Each function is called with one argument (the inserted char), with
205point right after that char, and it should return t to cause indentation,
206`no-indent' to prevent indentation or nil to let other functions decide.")
205 207
206(defun electric-indent-post-self-insert-function () 208(defun electric-indent-post-self-insert-function ()
207 ;; FIXME: This reindents the current line, but what we really want instead is 209 ;; FIXME: This reindents the current line, but what we really want instead is
@@ -212,18 +214,21 @@ and with point before the inserted char.")
212 ;; There might be a way to get it working by analyzing buffer-undo-list, but 214 ;; There might be a way to get it working by analyzing buffer-undo-list, but
213 ;; it looks challenging. 215 ;; it looks challenging.
214 (let (pos) 216 (let (pos)
215 (when (and (or (memq last-command-event electric-indent-chars) 217 (when (and
216 (let ((cp (assq last-command-event electric-indent-chars))) 218 ;; Don't reindent while inserting spaces at beginning of line.
217 (and cp (setq pos (electric--after-char-pos)) 219 (or (not (memq last-command-event '(?\s ?\t)))
218 (save-excursion 220 (save-excursion (skip-chars-backward " \t") (not (bolp))))
219 (goto-char (1- pos)) 221 (setq pos (electric--after-char-pos))
220 (funcall (cdr cp)))))) 222 (save-excursion
221 ;; Don't reindent while inserting spaces at beginning of line. 223 (goto-char pos)
222 (or (not (memq last-command-event '(?\s ?\t))) 224 (let ((act (or (run-hook-with-args-until-success
223 (save-excursion (skip-chars-backward " \t") (not (bolp)))) 225 'electric-indent-functions
224 (setq pos (electric--after-char-pos)) 226 last-command-event)
225 ;; Not in a string or comment. 227 (memq last-command-event electric-indent-chars))))
226 (not (nth 8 (save-excursion (syntax-ppss pos))))) 228 (not
229 (or (memq act '(nil no-indent))
230 ;; In a string or comment.
231 (unless (eq act 'do-indent) (nth 8 (syntax-ppss))))))))
227 ;; For newline, we want to reindent both lines and basically behave like 232 ;; For newline, we want to reindent both lines and basically behave like
228 ;; reindent-then-newline-and-indent (whose code we hence copied). 233 ;; reindent-then-newline-and-indent (whose code we hence copied).
229 (when (< (1- pos) (line-beginning-position)) 234 (when (< (1- pos) (line-beginning-position))
@@ -231,7 +236,7 @@ and with point before the inserted char.")
231 (save-excursion 236 (save-excursion
232 (unless (memq indent-line-function 237 (unless (memq indent-line-function
233 '(indent-relative indent-to-left-margin 238 '(indent-relative indent-to-left-margin
234 indent-relative-maybe)) 239 indent-relative-maybe))
235 ;; Don't reindent the previous line if the indentation function 240 ;; Don't reindent the previous line if the indentation function
236 ;; is not a real one. 241 ;; is not a real one.
237 (goto-char before) 242 (goto-char before)
diff --git a/lisp/emacs-lisp/edebug.el b/lisp/emacs-lisp/edebug.el
index 86c7e59fd07..d7cfcfb870a 100644
--- a/lisp/emacs-lisp/edebug.el
+++ b/lisp/emacs-lisp/edebug.el
@@ -3448,7 +3448,7 @@ instrumented. Then it does `edebug-on-entry' and switches to `go' mode."
3448(defun edebug-on-entry (function &optional flag) 3448(defun edebug-on-entry (function &optional flag)
3449 "Cause Edebug to stop when FUNCTION is called. 3449 "Cause Edebug to stop when FUNCTION is called.
3450With prefix argument, make this temporary so it is automatically 3450With prefix argument, make this temporary so it is automatically
3451cancelled the first time the function is entered." 3451canceled the first time the function is entered."
3452 (interactive "aEdebug on entry to: \nP") 3452 (interactive "aEdebug on entry to: \nP")
3453 ;; Could store this in the edebug data instead. 3453 ;; Could store this in the edebug data instead.
3454 (put function 'edebug-on-entry (if flag 'temp t))) 3454 (put function 'edebug-on-entry (if flag 'temp t)))
diff --git a/lisp/emacs-lisp/eieio.el b/lisp/emacs-lisp/eieio.el
index db3236afc1a..170d3fb0bf8 100644
--- a/lisp/emacs-lisp/eieio.el
+++ b/lisp/emacs-lisp/eieio.el
@@ -57,7 +57,7 @@
57 57
58(eval-and-compile 58(eval-and-compile
59;; About the above. EIEIO must process its own code when it compiles 59;; About the above. EIEIO must process its own code when it compiles
60;; itself, thus, by eval-and-compiling outselves, we solve the problem. 60;; itself, thus, by eval-and-compiling ourselves, we solve the problem.
61 61
62;; Compatibility 62;; Compatibility
63(if (fboundp 'compiled-function-arglist) 63(if (fboundp 'compiled-function-arglist)
diff --git a/lisp/emulation/cua-base.el b/lisp/emulation/cua-base.el
index 9a50352d507..a68c4dfdf69 100644
--- a/lisp/emulation/cua-base.el
+++ b/lisp/emulation/cua-base.el
@@ -1242,7 +1242,7 @@ If ARG is the atom `-', scroll upward by nearly full screen."
1242 1242
1243 ;; Handle shifted cursor keys and other movement commands. 1243 ;; Handle shifted cursor keys and other movement commands.
1244 ;; If region is not active, region is activated if key is shifted. 1244 ;; If region is not active, region is activated if key is shifted.
1245 ;; If region is active, region is cancelled if key is unshifted 1245 ;; If region is active, region is canceled if key is unshifted
1246 ;; (and region not started with C-SPC). 1246 ;; (and region not started with C-SPC).
1247 ;; If rectangle is active, expand rectangle in specified direction and 1247 ;; If rectangle is active, expand rectangle in specified direction and
1248 ;; ignore the movement. 1248 ;; ignore the movement.
diff --git a/lisp/emulation/cua-gmrk.el b/lisp/emulation/cua-gmrk.el
index 690555e81dc..b6a3a977909 100644
--- a/lisp/emulation/cua-gmrk.el
+++ b/lisp/emulation/cua-gmrk.el
@@ -94,7 +94,7 @@ insert the deleted or copied text before the global marker, even when the
94global marker is in another buffer. 94global marker is in another buffer.
95If the global marker isn't set, set the global marker at point in the current 95If the global marker isn't set, set the global marker at point in the current
96buffer. Otherwise jump to the global marker position and cancel it. 96buffer. Otherwise jump to the global marker position and cancel it.
97With prefix argument, don't jump to global mark when cancelling it." 97With prefix argument, don't jump to global mark when canceling it."
98 (interactive "P") 98 (interactive "P")
99 (unless cua--global-mark-initialized 99 (unless cua--global-mark-initialized
100 (cua--init-global-mark)) 100 (cua--init-global-mark))
diff --git a/lisp/emulation/vip.el b/lisp/emulation/vip.el
index a0c6062fb29..1298e5424ac 100644
--- a/lisp/emulation/vip.el
+++ b/lisp/emulation/vip.el
@@ -420,7 +420,7 @@ Type `n' to quit this window for now.\n")
420 (goto-char (point-min)) 420 (goto-char (point-min))
421 (if (y-or-n-p "Inhibit VIP startup message? ") 421 (if (y-or-n-p "Inhibit VIP startup message? ")
422 (progn 422 (progn
423 (with-current-buffer 423 (with-current-buffer
424 (find-file-noselect 424 (find-file-noselect
425 (substitute-in-file-name vip-startup-file)) 425 (substitute-in-file-name vip-startup-file))
426 (goto-char (point-max)) 426 (goto-char (point-max))
@@ -877,7 +877,7 @@ is the name of the register for COM."
877 (if (> beg end) (exchange-point-and-mark))) 877 (if (> beg end) (exchange-point-and-mark)))
878 878
879(defun vip-global-execute () 879(defun vip-global-execute ()
880 "Call last keyboad macro for each line in the region." 880 "Call last keyboard macro for each line in the region."
881 (if (> (point) (mark)) (exchange-point-and-mark)) 881 (if (> (point) (mark)) (exchange-point-and-mark))
882 (beginning-of-line) 882 (beginning-of-line)
883 (call-last-kbd-macro) 883 (call-last-kbd-macro)
diff --git a/lisp/emulation/viper-cmd.el b/lisp/emulation/viper-cmd.el
index ce3cc3c9a22..78bc09af136 100644
--- a/lisp/emulation/viper-cmd.el
+++ b/lisp/emulation/viper-cmd.el
@@ -716,7 +716,7 @@
716 (error 716 (error
717 (viper-message-conditions conds)))) 717 (viper-message-conditions conds))))
718 718
719;; escape to emacs mode termporarily 719;; escape to emacs mode temporarily
720(defun viper-escape-to-emacs (arg &optional events) 720(defun viper-escape-to-emacs (arg &optional events)
721 "Escape to Emacs state from Vi state for one Emacs command. 721 "Escape to Emacs state from Vi state for one Emacs command.
722ARG is used as the prefix value for the executed command. If 722ARG is used as the prefix value for the executed command. If
@@ -726,7 +726,7 @@ EVENTS is a list of events, which become the beginning of the command."
726 (message "Switched to EMACS state for the next command...")) 726 (message "Switched to EMACS state for the next command..."))
727 (viper-escape-to-state arg events 'emacs-state)) 727 (viper-escape-to-state arg events 'emacs-state))
728 728
729;; escape to Vi mode termporarily 729;; escape to Vi mode temporarily
730(defun viper-escape-to-vi (arg) 730(defun viper-escape-to-vi (arg)
731 "Escape from Emacs state to Vi state for one Vi 1-character command. 731 "Escape from Emacs state to Vi state for one Vi 1-character command.
732If the Vi command that the user types has a prefix argument, e.g., `d2w', then 732If the Vi command that the user types has a prefix argument, e.g., `d2w', then
@@ -2407,7 +2407,7 @@ problems."
2407 t 'local) 2407 t 'local)
2408 (add-hook 2408 (add-hook
2409 'viper-pre-command-hooks 'viper-replace-state-pre-command-sentinel t 'local) 2409 'viper-pre-command-hooks 'viper-replace-state-pre-command-sentinel t 'local)
2410 ;; guard against a smartie who switched from R-replace to normal replace 2410 ;; guard against a smarty who switched from R-replace to normal replace
2411 (remove-hook 2411 (remove-hook
2412 'viper-post-command-hooks 'viper-R-state-post-command-sentinel 'local) 2412 'viper-post-command-hooks 'viper-R-state-post-command-sentinel 'local)
2413 (if overwrite-mode (overwrite-mode -1)) 2413 (if overwrite-mode (overwrite-mode -1))
@@ -2531,7 +2531,7 @@ problems."
2531 'viper-post-command-hooks 'viper-R-state-post-command-sentinel t 'local) 2531 'viper-post-command-hooks 'viper-R-state-post-command-sentinel t 'local)
2532 (add-hook 2532 (add-hook
2533 'viper-pre-command-hooks 'viper-replace-state-pre-command-sentinel t 'local) 2533 'viper-pre-command-hooks 'viper-replace-state-pre-command-sentinel t 'local)
2534 ;; guard against a smartie who switched from R-replace to normal replace 2534 ;; guard against a smarty who switched from R-replace to normal replace
2535 (remove-hook 2535 (remove-hook
2536 'viper-post-command-hooks 'viper-replace-state-post-command-sentinel 'local) 2536 'viper-post-command-hooks 'viper-replace-state-post-command-sentinel 'local)
2537 ) 2537 )
@@ -3767,7 +3767,7 @@ If MAJOR-MODE is set, set the macros only in that major mode."
3767 "//" 'vi-state 3767 "//" 'vi-state
3768 [1 (meta x) v i p e r - t o g g l e - s e a r c h - s t y l e return] 3768 [1 (meta x) v i p e r - t o g g l e - s e a r c h - s t y l e return]
3769 scope) 3769 scope)
3770 ;; toggle regexp/vanila search 3770 ;; toggle regexp/vanilla search
3771 (viper-record-kbd-macro 3771 (viper-record-kbd-macro
3772 "///" 'vi-state 3772 "///" 'vi-state
3773 [2 (meta x) v i p e r - t o g g l e - s e a r c h - s t y l e return] 3773 [2 (meta x) v i p e r - t o g g l e - s e a r c h - s t y l e return]
@@ -3824,7 +3824,7 @@ the macros are set in the current major mode.
3824 "//" 'emacs-state 3824 "//" 'emacs-state
3825 [1 (meta x) v i p e r - t o g g l e - s e a r c h - s t y l e return] 3825 [1 (meta x) v i p e r - t o g g l e - s e a r c h - s t y l e return]
3826 (or arg-majormode major-mode)) 3826 (or arg-majormode major-mode))
3827 ;; toggle regexp/vanila search 3827 ;; toggle regexp/vanilla search
3828 (viper-record-kbd-macro 3828 (viper-record-kbd-macro
3829 "///" 'emacs-state 3829 "///" 'emacs-state
3830 [2 (meta x) v i p e r - t o g g l e - s e a r c h - s t y l e return] 3830 [2 (meta x) v i p e r - t o g g l e - s e a r c h - s t y l e return]
@@ -4017,7 +4017,7 @@ Null string will repeat previous search."
4017 (setq viper-prefix-commands 4017 (setq viper-prefix-commands
4018 (cons viper-buffer-search-char viper-prefix-commands))) 4018 (cons viper-buffer-search-char viper-prefix-commands)))
4019 4019
4020;; This is a Viper wraper for isearch-forward. 4020;; This is a Viper wrapper for isearch-forward.
4021(defun viper-isearch-forward (arg) 4021(defun viper-isearch-forward (arg)
4022 "Do incremental search forward." 4022 "Do incremental search forward."
4023 (interactive "P") 4023 (interactive "P")
@@ -4025,7 +4025,7 @@ Null string will repeat previous search."
4025 (if (listp arg) (setq arg (car arg))) 4025 (if (listp arg) (setq arg (car arg)))
4026 (viper-exec-form-in-emacs (list 'isearch-forward arg))) 4026 (viper-exec-form-in-emacs (list 'isearch-forward arg)))
4027 4027
4028;; This is a Viper wraper for isearch-backward." 4028;; This is a Viper wrapper for isearch-backward."
4029(defun viper-isearch-backward (arg) 4029(defun viper-isearch-backward (arg)
4030 "Do incremental search backward." 4030 "Do incremental search backward."
4031 (interactive "P") 4031 (interactive "P")
diff --git a/lisp/emulation/viper-init.el b/lisp/emulation/viper-init.el
index 2d221d5fa05..2fc8dc599cb 100644
--- a/lisp/emulation/viper-init.el
+++ b/lisp/emulation/viper-init.el
@@ -818,7 +818,7 @@ Related buffers can be cycled through via :R and :P commands."
818;;; Face-saving tricks 818;;; Face-saving tricks
819 819
820(defgroup viper-highlighting nil 820(defgroup viper-highlighting nil
821 "Hilighting of replace region, search pattern, minibuffer, etc." 821 "Highlighting of replace region, search pattern, minibuffer, etc."
822 :prefix "viper-" 822 :prefix "viper-"
823 :group 'viper) 823 :group 'viper)
824 824
diff --git a/lisp/emulation/viper-macs.el b/lisp/emulation/viper-macs.el
index e978823a49c..2704bdc5b40 100644
--- a/lisp/emulation/viper-macs.el
+++ b/lisp/emulation/viper-macs.el
@@ -921,7 +921,7 @@ name from there."
921 921
922 922
923(defun viper-global-execute () 923(defun viper-global-execute ()
924 "Call last keyboad macro for each line in the region." 924 "Call last keyboard macro for each line in the region."
925 (if (> (point) (mark t)) (exchange-point-and-mark)) 925 (if (> (point) (mark t)) (exchange-point-and-mark))
926 (beginning-of-line) 926 (beginning-of-line)
927 (call-last-kbd-macro) 927 (call-last-kbd-macro)
diff --git a/lisp/emulation/viper.el b/lisp/emulation/viper.el
index b2035e8ede6..3704725b8dd 100644
--- a/lisp/emulation/viper.el
+++ b/lisp/emulation/viper.el
@@ -491,7 +491,7 @@ unless it is coming up in a wrong Viper state."
491 ) 491 )
492 "List specifying how to modify the various major modes to enable some Viperisms. 492 "List specifying how to modify the various major modes to enable some Viperisms.
493The list has the structure: ((mode viper-state keymap) (mode viper-state 493The list has the structure: ((mode viper-state keymap) (mode viper-state
494keymap) ...). If `mode' is on the list, the `kemap' will be made active (on 494keymap) ...). If `mode' is on the list, the `keymap' will be made active (on
495the minor-mode-map-alist) in the specified viper state. 495the minor-mode-map-alist) in the specified viper state.
496If you change this list, have to restart Emacs for the change to take effect. 496If you change this list, have to restart Emacs for the change to take effect.
497However, if you did the change through the customization widget, then Emacs 497However, if you did the change through the customization widget, then Emacs
diff --git a/lisp/eshell/em-hist.el b/lisp/eshell/em-hist.el
index db5e98062a9..5e44e541526 100644
--- a/lisp/eshell/em-hist.el
+++ b/lisp/eshell/em-hist.el
@@ -90,12 +90,14 @@
90 "If non-nil, name of the file to read/write input history. 90 "If non-nil, name of the file to read/write input history.
91See also `eshell-read-history' and `eshell-write-history'. 91See also `eshell-read-history' and `eshell-write-history'.
92If it is nil, Eshell will use the value of HISTFILE." 92If it is nil, Eshell will use the value of HISTFILE."
93 :type 'file 93 :type '(choice (const :tag "Use HISTFILE" nil)
94 file)
94 :group 'eshell-hist) 95 :group 'eshell-hist)
95 96
96(defcustom eshell-history-size 128 97(defcustom eshell-history-size 128
97 "Size of the input history ring. If nil, use envvar HISTSIZE." 98 "Size of the input history ring. If nil, use envvar HISTSIZE."
98 :type 'integer 99 :type '(choice (const :tag "Use HISTSIZE" nil)
100 integer)
99 :group 'eshell-hist) 101 :group 'eshell-hist)
100 102
101(defcustom eshell-hist-ignoredups nil 103(defcustom eshell-hist-ignoredups nil
@@ -261,7 +263,13 @@ element, regardless of any text on the command line. In that case,
261 263
262 (make-local-variable 'eshell-history-size) 264 (make-local-variable 'eshell-history-size)
263 (or eshell-history-size 265 (or eshell-history-size
264 (setq eshell-history-size (getenv "HISTSIZE"))) 266 (let ((hsize (getenv "HISTSIZE")))
267 (setq eshell-history-size
268 (if (and (stringp hsize)
269 (integerp (setq hsize (string-to-number hsize)))
270 (> hsize 0))
271 hsize
272 128))))
265 273
266 (make-local-variable 'eshell-history-file-name) 274 (make-local-variable 'eshell-history-file-name)
267 (or eshell-history-file-name 275 (or eshell-history-file-name
diff --git a/lisp/files.el b/lisp/files.el
index f903d2919a6..40b6e7d56b4 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -4866,7 +4866,7 @@ given. With a prefix argument, TRASH is nil."
4866 directory 'full directory-files-no-dot-files-regexp)) 4866 directory 'full directory-files-no-dot-files-regexp))
4867 (error "Directory is not empty, not moving to trash") 4867 (error "Directory is not empty, not moving to trash")
4868 (move-file-to-trash directory))) 4868 (move-file-to-trash directory)))
4869 ;; Otherwise, call outselves recursively if needed. 4869 ;; Otherwise, call ourselves recursively if needed.
4870 (t 4870 (t
4871 (if (and recursive (not (file-symlink-p directory))) 4871 (if (and recursive (not (file-symlink-p directory)))
4872 (mapc (lambda (file) 4872 (mapc (lambda (file)
@@ -6110,7 +6110,7 @@ message to that effect instead of signaling an error."
6110 6110
6111(defvar kill-emacs-query-functions nil 6111(defvar kill-emacs-query-functions nil
6112 "Functions to call with no arguments to query about killing Emacs. 6112 "Functions to call with no arguments to query about killing Emacs.
6113If any of these functions returns nil, killing Emacs is cancelled. 6113If any of these functions returns nil, killing Emacs is canceled.
6114`save-buffers-kill-emacs' calls these functions, but `kill-emacs', 6114`save-buffers-kill-emacs' calls these functions, but `kill-emacs',
6115the low level primitive, does not. See also `kill-emacs-hook'.") 6115the low level primitive, does not. See also `kill-emacs-hook'.")
6116 6116
diff --git a/lisp/follow.el b/lisp/follow.el
index 2273e8920fd..ee8be14c6dc 100644
--- a/lisp/follow.el
+++ b/lisp/follow.el
@@ -1129,7 +1129,7 @@ Otherwise, return nil."
1129;;{{{ Redisplay 1129;;{{{ Redisplay
1130 1130
1131;; Redraw all the windows on the screen, starting with the top window. 1131;; Redraw all the windows on the screen, starting with the top window.
1132;; The window used as as marker is WIN, or the selcted window if WIN 1132;; The window used as as marker is WIN, or the selected window if WIN
1133;; is nil. Start every window directly after the end of the previous 1133;; is nil. Start every window directly after the end of the previous
1134;; window, to make sure long lines are displayed correctly. 1134;; window, to make sure long lines are displayed correctly.
1135 1135
@@ -1993,7 +1993,7 @@ report this using the `report-emacs-bug' function."
1993;; going to be recentered at the next redisplay, unless we do a 1993;; going to be recentered at the next redisplay, unless we do a
1994;; read-and-write cycle to update the `force' flag inside the windows. 1994;; read-and-write cycle to update the `force' flag inside the windows.
1995;; 1995;;
1996;; In 19.30, a new varible `window-scroll-functions' is called every 1996;; In 19.30, a new variable `window-scroll-functions' is called every
1997;; time a window is recentered. It is not perfect for our situation, 1997;; time a window is recentered. It is not perfect for our situation,
1998;; since when it is called for a tail window, it is to late. However, 1998;; since when it is called for a tail window, it is to late. However,
1999;; if it is called for another window, we can try to update our 1999;; if it is called for another window, we can try to update our
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 590277e89cd..1f46887f00f 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,26 @@
12011-12-04 Chong Yidong <cyd@gnu.org>
2
3 * message.el (message-pop-to-buffer): Partially revert 2011-11-30
4 change (Bug#10200).
5
62011-12-02 Katsumi Yamaoka <yamaoka@jpl.org>
7
8 * compface.el (uncompface):
9 * gnus-art.el (gnus-article-x-face-command): Update the header format
10 of icon data for the most recent icontopbm program.
11
122011-12-01 Katsumi Yamaoka <yamaoka@jpl.org>
13
14 * gnus-msg.el (gnus-inews-do-gcc):
15 * message.el (message-send-mail):
16 * mml.el (mml-generate-mime): Share the value of the buffer-local
17 `message-options' variable between a draft buffer and temprary working
18 buffers.
19
202011-11-30 Stefan Monnier <monnier@iro.umontreal.ca>
21
22 * message.el (message-pop-to-buffer): Revert 2011-09-11 change.
23
12011-11-30 Katsumi Yamaoka <yamaoka@jpl.org> 242011-11-30 Katsumi Yamaoka <yamaoka@jpl.org>
2 25
3 * gnus-art.el (gnus-article-browse-html-parts): Convert link file names 26 * gnus-art.el (gnus-article-browse-html-parts): Convert link file names
@@ -342,7 +365,7 @@
342 (message-mail-other-window, message-mail-other-frame) 365 (message-mail-other-window, message-mail-other-frame)
343 (message-news-other-window, message-news-other-frame): 366 (message-news-other-window, message-news-other-frame):
344 Use switch-to-buffer-other-frame and switch-to-buffer-other-window 367 Use switch-to-buffer-other-frame and switch-to-buffer-other-window
345 instead of setting buffer display varibles. 368 instead of setting buffer display variables.
346 369
3472011-09-11 Lars Magne Ingebrigtsen <larsi@gnus.org> 3702011-09-11 Lars Magne Ingebrigtsen <larsi@gnus.org>
348 371
@@ -7105,7 +7128,7 @@
7105 7128
7106 * gnus-start.el (gnus-activate-group): Take an optional parameter to 7129 * gnus-start.el (gnus-activate-group): Take an optional parameter to
7107 say that you don't want to call gnus-request-group with don-check, but 7130 say that you don't want to call gnus-request-group with don-check, but
7108 do check the reponse. This is for virtual groups only. 7131 do check the response. This is for virtual groups only.
7109 (gnus-get-unread-articles): Count the archive groups as secondary, so 7132 (gnus-get-unread-articles): Count the archive groups as secondary, so
7110 that they're activated the same way as before. 7133 that they're activated the same way as before.
7111 7134
diff --git a/lisp/gnus/compface.el b/lisp/gnus/compface.el
index 2a2383777cb..e132f736269 100644
--- a/lisp/gnus/compface.el
+++ b/lisp/gnus/compface.el
@@ -42,7 +42,8 @@ or `faces-xface' and `netpbm' or `libgr-progs', for instance."
42 'delete '(t nil) nil)) 42 'delete '(t nil) nil))
43 (progn 43 (progn
44 (goto-char (point-min)) 44 (goto-char (point-min))
45 (insert "/* Width=48, Height=48 */\n") 45 (insert "/* Format_version=1, Width=48, Height=48, Depth=1,\
46 Valid_bits_per_item=16 */\n")
46 ;; I just can't get "icontopbm" to work correctly on its 47 ;; I just can't get "icontopbm" to work correctly on its
47 ;; own in XEmacs. And Emacs doesn't understand un-raw pbm 48 ;; own in XEmacs. And Emacs doesn't understand un-raw pbm
48 ;; files. 49 ;; files.
diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el
index e3eb3a04942..555c715bc2f 100644
--- a/lisp/gnus/gnus-art.el
+++ b/lisp/gnus/gnus-art.el
@@ -268,11 +268,14 @@ This can also be a list of the above values."
268 (if (or (gnus-image-type-available-p 'xface) 268 (if (or (gnus-image-type-available-p 'xface)
269 (gnus-image-type-available-p 'pbm)) 269 (gnus-image-type-available-p 'pbm))
270 'gnus-display-x-face-in-from 270 'gnus-display-x-face-in-from
271 "{ echo '/* Width=48, Height=48 */'; uncompface; } | icontopbm | ee -") 271 "{ echo \
272'/* Format_version=1, Width=48, Height=48, Depth=1, Valid_bits_per_item=16 */'\
273; uncompface; } | icontopbm | ee -")
272 (if (gnus-image-type-available-p 'pbm) 274 (if (gnus-image-type-available-p 'pbm)
273 'gnus-display-x-face-in-from 275 'gnus-display-x-face-in-from
274 "{ echo '/* Width=48, Height=48 */'; uncompface; } | icontopbm | \ 276 "{ echo \
275display -")) 277'/* Format_version=1, Width=48, Height=48, Depth=1, Valid_bits_per_item=16 */'\
278; uncompface; } | icontopbm | display -"))
276 "*String or function to be executed to display an X-Face header. 279 "*String or function to be executed to display an X-Face header.
277If it is a string, the command will be executed in a sub-shell 280If it is a string, the command will be executed in a sub-shell
278asynchronously. The compressed face will be piped to this command." 281asynchronously. The compressed face will be piped to this command."
@@ -2880,12 +2883,13 @@ message header will be added to the bodies of the \"text/html\" parts."
2880 gnus-article-mime-handles) 2883 gnus-article-mime-handles)
2881 cid-dir)) 2884 cid-dir))
2882 (when (eq system-type 'cygwin) 2885 (when (eq system-type 'cygwin)
2883 (setq cid-file (substring 2886 (setq cid-file
2884 (with-output-to-string 2887 (concat "/" (substring
2885 (call-process "cygpath" nil 2888 (with-output-to-string
2886 standard-output 2889 (call-process "cygpath" nil
2887 nil "-m" cid-file)) 2890 standard-output
2888 0 -1))) 2891 nil "-m" cid-file))
2892 0 -1))))
2889 (replace-match (concat "file://" cid-file) 2893 (replace-match (concat "file://" cid-file)
2890 nil nil nil 1)))) 2894 nil nil nil 1))))
2891 (unless content (setq content (buffer-string)))) 2895 (unless content (setq content (buffer-string))))
diff --git a/lisp/gnus/gnus-fun.el b/lisp/gnus/gnus-fun.el
index 08ec3c4ffb0..44cb1583ec9 100644
--- a/lisp/gnus/gnus-fun.el
+++ b/lisp/gnus/gnus-fun.el
@@ -274,10 +274,10 @@ colors of the displayed X-Faces."
274 result)) 274 result))
275 275
276(defun gnus-fun-ppm-change-string () 276(defun gnus-fun-ppm-change-string ()
277 (let* ((possibilites '("%02x0000" "00%02x00" "0000%02x" 277 (let* ((possibilities '("%02x0000" "00%02x00" "0000%02x"
278 "%02x%02x00" "00%02x%02x" "%02x00%02x")) 278 "%02x%02x00" "00%02x%02x" "%02x00%02x"))
279 (format (concat "'#%02x%02x%02x' '#" 279 (format (concat "'#%02x%02x%02x' '#"
280 (nth (random 6) possibilites) 280 (nth (random 6) possibilities)
281 "'")) 281 "'"))
282 (values nil)) 282 (values nil))
283 (dotimes (i 255) 283 (dotimes (i 255)
diff --git a/lisp/gnus/gnus-msg.el b/lisp/gnus/gnus-msg.el
index e6a06a0500d..58373525f96 100644
--- a/lisp/gnus/gnus-msg.el
+++ b/lisp/gnus/gnus-msg.el
@@ -1549,7 +1549,7 @@ this is a reply."
1549 (message-narrow-to-headers) 1549 (message-narrow-to-headers)
1550 (let ((gcc (or gcc (mail-fetch-field "gcc" nil t))) 1550 (let ((gcc (or gcc (mail-fetch-field "gcc" nil t)))
1551 (cur (current-buffer)) 1551 (cur (current-buffer))
1552 groups group method group-art 1552 groups group method group-art options
1553 mml-externalize-attachments) 1553 mml-externalize-attachments)
1554 (when gcc 1554 (when gcc
1555 (message-remove-header "gcc") 1555 (message-remove-header "gcc")
@@ -1573,6 +1573,7 @@ this is a reply."
1573 gnus-gcc-externalize-attachments)) 1573 gnus-gcc-externalize-attachments))
1574 (save-excursion 1574 (save-excursion
1575 (nnheader-set-temp-buffer " *acc*") 1575 (nnheader-set-temp-buffer " *acc*")
1576 (setq message-options (with-current-buffer cur message-options))
1576 (insert-buffer-substring cur) 1577 (insert-buffer-substring cur)
1577 (message-encode-message-body) 1578 (message-encode-message-body)
1578 (save-restriction 1579 (save-restriction
@@ -1587,7 +1588,7 @@ this is a reply."
1587 ;; BUG: We really need to get the charset for 1588 ;; BUG: We really need to get the charset for
1588 ;; each name in the Newsgroups and Followup-To 1589 ;; each name in the Newsgroups and Followup-To
1589 ;; lines to allow crossposting between group 1590 ;; lines to allow crossposting between group
1590 ;; namess with incompatible character sets. 1591 ;; names with incompatible character sets.
1591 ;; -- Per Abrahamsen <abraham@dina.kvl.dk> 2001-10-08. 1592 ;; -- Per Abrahamsen <abraham@dina.kvl.dk> 2001-10-08.
1592 (group-field-charset 1593 (group-field-charset
1593 (gnus-group-name-charset 1594 (gnus-group-name-charset
@@ -1629,6 +1630,8 @@ this is a reply."
1629 (boundp 'gnus-inews-mark-gcc-as-read) 1630 (boundp 'gnus-inews-mark-gcc-as-read)
1630 (symbol-value 'gnus-inews-mark-gcc-as-read)))) 1631 (symbol-value 'gnus-inews-mark-gcc-as-read))))
1631 (gnus-group-mark-article-read group (cdr group-art))) 1632 (gnus-group-mark-article-read group (cdr group-art)))
1633 (setq options message-options)
1634 (with-current-buffer cur (setq message-options options))
1632 (kill-buffer (current-buffer))))))))) 1635 (kill-buffer (current-buffer)))))))))
1633 1636
1634(defun gnus-inews-insert-gcc (&optional group) 1637(defun gnus-inews-insert-gcc (&optional group)
diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el
index b3f85cf9366..71081063715 100644
--- a/lisp/gnus/gnus-sum.el
+++ b/lisp/gnus/gnus-sum.el
@@ -7087,7 +7087,7 @@ With ARG, turn line truncation on if ARG is positive."
7087(defun gnus-summary-find-for-reselect () 7087(defun gnus-summary-find-for-reselect ()
7088 "Return the number of an article to stay on across a reselect. 7088 "Return the number of an article to stay on across a reselect.
7089The current article is considered, then following articles, then previous 7089The current article is considered, then following articles, then previous
7090articles. An article is sought which is not cancelled and isn't a temporary 7090articles. An article is sought which is not canceled and isn't a temporary
7091insertion from another group. If there's no such then return a dummy 0." 7091insertion from another group. If there's no such then return a dummy 0."
7092 (let (found) 7092 (let (found)
7093 (dolist (rev '(nil t)) 7093 (dolist (rev '(nil t))
diff --git a/lisp/gnus/gnus.el b/lisp/gnus/gnus.el
index 5f385ec1054..b1f0f60668e 100644
--- a/lisp/gnus/gnus.el
+++ b/lisp/gnus/gnus.el
@@ -700,7 +700,7 @@ be set in `.emacs' instead."
700(defface gnus-summary-cancelled 700(defface gnus-summary-cancelled
701 '((((class color)) 701 '((((class color))
702 (:foreground "yellow" :background "black"))) 702 (:foreground "yellow" :background "black")))
703 "Face used for cancelled articles." 703 "Face used for canceled articles."
704 :group 'gnus-summary) 704 :group 'gnus-summary)
705;; backward-compatibility alias 705;; backward-compatibility alias
706(put 'gnus-summary-cancelled-face 'face-alias 'gnus-summary-cancelled) 706(put 'gnus-summary-cancelled-face 'face-alias 'gnus-summary-cancelled)
diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el
index 5d82faee20d..8ecbd22fc0d 100644
--- a/lisp/gnus/message.el
+++ b/lisp/gnus/message.el
@@ -906,7 +906,7 @@ The function `message-setup' runs this hook."
906 :type 'hook) 906 :type 'hook)
907 907
908(defcustom message-cancel-hook nil 908(defcustom message-cancel-hook nil
909 "Hook run when cancelling articles." 909 "Hook run when canceling articles."
910 :group 'message-various 910 :group 'message-various
911 :link '(custom-manual "(message)Various Message Variables") 911 :link '(custom-manual "(message)Various Message Variables")
912 :type 'hook) 912 :type 'hook)
@@ -4507,7 +4507,8 @@ This function could be useful in `message-setup-hook'."
4507 (boundp 'gnus-group-posting-charset-alist)) 4507 (boundp 'gnus-group-posting-charset-alist))
4508 (gnus-setup-posting-charset nil) 4508 (gnus-setup-posting-charset nil)
4509 message-posting-charset)) 4509 message-posting-charset))
4510 (headers message-required-mail-headers)) 4510 (headers message-required-mail-headers)
4511 options)
4511 (when (and message-generate-hashcash 4512 (when (and message-generate-hashcash
4512 (not (eq message-generate-hashcash 'opportunistic))) 4513 (not (eq message-generate-hashcash 'opportunistic)))
4513 (message "Generating hashcash...") 4514 (message "Generating hashcash...")
@@ -4546,9 +4547,11 @@ This function could be useful in `message-setup-hook'."
4546 (error "Failed to send the message"))))) 4547 (error "Failed to send the message")))))
4547 ;; Let the user do all of the above. 4548 ;; Let the user do all of the above.
4548 (run-hooks 'message-header-hook)) 4549 (run-hooks 'message-header-hook))
4550 (setq options message-options)
4549 (unwind-protect 4551 (unwind-protect
4550 (with-current-buffer tembuf 4552 (with-current-buffer tembuf
4551 (erase-buffer) 4553 (erase-buffer)
4554 (setq message-options options)
4552 ;; Avoid copying text props (except hard newlines). 4555 ;; Avoid copying text props (except hard newlines).
4553 (insert (with-current-buffer mailbuf 4556 (insert (with-current-buffer mailbuf
4554 (mml-buffer-substring-no-properties-except-hard-newlines 4557 (mml-buffer-substring-no-properties-except-hard-newlines
@@ -4630,9 +4633,11 @@ If you always want Gnus to send messages in one piece, set
4630 (message "Sending via mail...") 4633 (message "Sending via mail...")
4631 (funcall (or message-send-mail-real-function 4634 (funcall (or message-send-mail-real-function
4632 message-send-mail-function))) 4635 message-send-mail-function)))
4633 (message-send-mail-partially))) 4636 (message-send-mail-partially))
4637 (setq options message-options))
4634 (kill-buffer tembuf)) 4638 (kill-buffer tembuf))
4635 (set-buffer mailbuf) 4639 (set-buffer mailbuf)
4640 (setq message-options options)
4636 (push 'mail message-sent-message-via))) 4641 (push 'mail message-sent-message-via)))
4637 4642
4638(defvar sendmail-program) 4643(defvar sendmail-program)
@@ -4835,7 +4840,7 @@ Otherwise, generate and save a value for `canlock-password' first."
4835 (message-fetch-field "Followup-To"))) 4840 (message-fetch-field "Followup-To")))
4836 ;; BUG: We really need to get the charset for each name in the 4841 ;; BUG: We really need to get the charset for each name in the
4837 ;; Newsgroups and Followup-To lines to allow crossposting 4842 ;; Newsgroups and Followup-To lines to allow crossposting
4838 ;; between group namess with incompatible character sets. 4843 ;; between group names with incompatible character sets.
4839 ;; -- Per Abrahamsen <abraham@dina.kvl.dk> 2001-10-08. 4844 ;; -- Per Abrahamsen <abraham@dina.kvl.dk> 2001-10-08.
4840 (group-field-charset 4845 (group-field-charset
4841 (gnus-group-name-charset method newsgroups-field)) 4846 (gnus-group-name-charset method newsgroups-field))
@@ -6331,7 +6336,7 @@ between beginning of field and beginning of line."
6331 (progn 6336 (progn
6332 (gnus-select-frame-set-input-focus (window-frame window)) 6337 (gnus-select-frame-set-input-focus (window-frame window))
6333 (select-window window)) 6338 (select-window window))
6334 (funcall (or switch-function 'switch-to-buffer) buffer) 6339 (funcall (or switch-function #'pop-to-buffer) buffer)
6335 (set-buffer buffer)) 6340 (set-buffer buffer))
6336 (when (and (buffer-modified-p) 6341 (when (and (buffer-modified-p)
6337 (not (prog1 6342 (not (prog1
@@ -6339,7 +6344,7 @@ between beginning of field and beginning of line."
6339 "Message already being composed; erase? ") 6344 "Message already being composed; erase? ")
6340 (message nil)))) 6345 (message nil))))
6341 (error "Message being composed"))) 6346 (error "Message being composed")))
6342 (funcall (or switch-function 'switch-to-buffer) name) 6347 (funcall (or switch-function #'pop-to-buffer-same-window) name)
6343 (set-buffer name)) 6348 (set-buffer name))
6344 (erase-buffer) 6349 (erase-buffer)
6345 (message-mode))) 6350 (message-mode)))
diff --git a/lisp/gnus/mml.el b/lisp/gnus/mml.el
index 8aa5fbff6b8..867c3be4b60 100644
--- a/lisp/gnus/mml.el
+++ b/lisp/gnus/mml.el
@@ -466,16 +466,21 @@ If MML is non-nil, return the buffer up till the correspondent mml tag."
466(defun mml-generate-mime () 466(defun mml-generate-mime ()
467 "Generate a MIME message based on the current MML document." 467 "Generate a MIME message based on the current MML document."
468 (let ((cont (mml-parse)) 468 (let ((cont (mml-parse))
469 (mml-multipart-number mml-multipart-number)) 469 (mml-multipart-number mml-multipart-number)
470 (options message-options))
470 (if (not cont) 471 (if (not cont)
471 nil 472 nil
472 (mm-with-multibyte-buffer 473 (prog1
473 (if (and (consp (car cont)) 474 (mm-with-multibyte-buffer
474 (= (length cont) 1)) 475 (setq message-options options)
475 (mml-generate-mime-1 (car cont)) 476 (if (and (consp (car cont))
476 (mml-generate-mime-1 (nconc (list 'multipart '(type . "mixed")) 477 (= (length cont) 1))
477 cont))) 478 (mml-generate-mime-1 (car cont))
478 (buffer-string))))) 479 (mml-generate-mime-1 (nconc (list 'multipart '(type . "mixed"))
480 cont)))
481 (setq options message-options)
482 (buffer-string))
483 (setq message-options options)))))
479 484
480(defun mml-generate-mime-1 (cont) 485(defun mml-generate-mime-1 (cont)
481 (let ((mm-use-ultra-safe-encoding 486 (let ((mm-use-ultra-safe-encoding
diff --git a/lisp/gnus/nndiary.el b/lisp/gnus/nndiary.el
index 043356ca841..25557ad7119 100644
--- a/lisp/gnus/nndiary.el
+++ b/lisp/gnus/nndiary.el
@@ -353,7 +353,7 @@ all. This may very well take some time.")
353 ;; List of NNDiary headers that specify the time spec. Each header name is 353 ;; List of NNDiary headers that specify the time spec. Each header name is
354 ;; followed by either two integers (specifying a range of possible values 354 ;; followed by either two integers (specifying a range of possible values
355 ;; for this header) or one list (specifying all the possible values for this 355 ;; for this header) or one list (specifying all the possible values for this
356 ;; header). In the latter case, the list does NOT include the unspecifyed 356 ;; header). In the latter case, the list does NOT include the unspecified
357 ;; spec (*). 357 ;; spec (*).
358 ;; For time zone values, we have symbolic time zone names associated with 358 ;; For time zone values, we have symbolic time zone names associated with
359 ;; the (relative) number of seconds ahead GMT. 359 ;; the (relative) number of seconds ahead GMT.
@@ -1163,9 +1163,9 @@ all. This may very well take some time.")
1163 ;; Parse the schedule string STR, or signal an error. 1163 ;; Parse the schedule string STR, or signal an error.
1164 ;; Signals are caught by `nndary-schedule'. 1164 ;; Signals are caught by `nndary-schedule'.
1165 (if (string-match "[ \t]*\\*[ \t]*" str) 1165 (if (string-match "[ \t]*\\*[ \t]*" str)
1166 ;; unspecifyed 1166 ;; unspecified
1167 nil 1167 nil
1168 ;; specifyed 1168 ;; specified
1169 (if (listp min-or-values) 1169 (if (listp min-or-values)
1170 ;; min-or-values is values 1170 ;; min-or-values is values
1171 ;; #### NOTE: this is actually only a hack for time zones. 1171 ;; #### NOTE: this is actually only a hack for time zones.
diff --git a/lisp/gnus/nnir.el b/lisp/gnus/nnir.el
index 78d2478b4fb..3d0fc78dca7 100644
--- a/lisp/gnus/nnir.el
+++ b/lisp/gnus/nnir.el
@@ -1273,8 +1273,8 @@ Tested with swish-e-2.0.1 on Windows NT 4.0."
1273 (message "Doing hyrex-search query \"%s\"...done" qstring) 1273 (message "Doing hyrex-search query \"%s\"...done" qstring)
1274 (sit-for 0) 1274 (sit-for 0)
1275 ;; nnir-search returns: 1275 ;; nnir-search returns:
1276 ;; for nnml/nnfolder: "filename mailid weigth" 1276 ;; for nnml/nnfolder: "filename mailid weight"
1277 ;; for nnimap: "group mailid weigth" 1277 ;; for nnimap: "group mailid weight"
1278 (goto-char (point-min)) 1278 (goto-char (point-min))
1279 (delete-non-matching-lines "^\\S + [0-9]+ [0-9]+$") 1279 (delete-non-matching-lines "^\\S + [0-9]+ [0-9]+$")
1280 ;; HyREX doesn't search directly in groups -- so filter out here. 1280 ;; HyREX doesn't search directly in groups -- so filter out here.
diff --git a/lisp/gnus/nntp.el b/lisp/gnus/nntp.el
index 9816c208fab..f4b8ce66d16 100644
--- a/lisp/gnus/nntp.el
+++ b/lisp/gnus/nntp.el
@@ -665,7 +665,7 @@ command whose response triggered the error."
665 (process-buffer -process)))) 665 (process-buffer -process))))
666 ;; When I an able to identify the 666 ;; When I an able to identify the
667 ;; connection to the server AND I've 667 ;; connection to the server AND I've
668 ;; received NO reponse for 668 ;; received NO response for
669 ;; nntp-connection-timeout seconds. 669 ;; nntp-connection-timeout seconds.
670 (when (and -buffer (eq 0 (buffer-size -buffer))) 670 (when (and -buffer (eq 0 (buffer-size -buffer)))
671 ;; Close the connection. Take no 671 ;; Close the connection. Take no
diff --git a/lisp/htmlfontify.el b/lisp/htmlfontify.el
index 056115f57b7..126b616a644 100644
--- a/lisp/htmlfontify.el
+++ b/lisp/htmlfontify.el
@@ -150,11 +150,11 @@ main-content <=MAIN_CONTENT;\\n\" rtfm-section file style rtfm-section file))
150 :prefix "hfy-") 150 :prefix "hfy-")
151 151
152(defcustom hfy-page-header 'hfy-default-header 152(defcustom hfy-page-header 'hfy-default-header
153 "Function called to build the header of the html source. 153 "Function called to build the header of the HTML source.
154This is called with two arguments (the filename relative to the top 154This is called with two arguments (the filename relative to the top
155level source directory being etag'd and fontified), and a string containing 155level source directory being etag'd and fontified), and a string containing
156the <style>...</style> text to embed in the document. 156the <style>...</style> text to embed in the document.
157It should return the string returned will be used as the header for the 157It should return a string that will be used as the header for the
158htmlfontified version of the source file.\n 158htmlfontified version of the source file.\n
159See also `hfy-page-footer'." 159See also `hfy-page-footer'."
160 :group 'htmlfontify 160 :group 'htmlfontify
@@ -166,8 +166,8 @@ See also `hfy-page-footer'."
166(defcustom hfy-split-index nil 166(defcustom hfy-split-index nil
167 "Whether or not to split the index `hfy-index-file' alphabetically. 167 "Whether or not to split the index `hfy-index-file' alphabetically.
168If non-nil, the index is split on the first letter of each tag. 168If non-nil, the index is split on the first letter of each tag.
169Useful when the index would otherwise 169Useful when the index would otherwise be large and take
170be large and take a long time to render or be difficult to navigate." 170a long time to render or be difficult to navigate."
171 :group 'htmlfontify 171 :group 'htmlfontify
172 :tag "split-index" 172 :tag "split-index"
173 :type '(boolean)) 173 :type '(boolean))
@@ -179,7 +179,7 @@ It takes only one argument, the filename."
179 :tag "page-footer" 179 :tag "page-footer"
180 :type '(function)) 180 :type '(function))
181 181
182(defcustom hfy-extn ".html" 182(defcustom hfy-extn ".html"
183 "File extension used for output files." 183 "File extension used for output files."
184 :group 'htmlfontify 184 :group 'htmlfontify
185 :tag "extension" 185 :tag "extension"
@@ -251,7 +251,7 @@ when not running under a window system."
251 251
252(defcustom hfy-post-html-hooks nil 252(defcustom hfy-post-html-hooks nil
253 "List of functions to call after creating and filling the HTML buffer. 253 "List of functions to call after creating and filling the HTML buffer.
254These functions will be called with the html buffer as the current buffer." 254These functions will be called with the HTML buffer as the current buffer."
255 :group 'htmlfontify 255 :group 'htmlfontify
256 :tag "post-html-hooks" 256 :tag "post-html-hooks"
257 :options '(set-auto-mode) 257 :options '(set-auto-mode)
@@ -342,7 +342,7 @@ commands in `hfy-etags-cmd-alist'."
342 :type '(file)) 342 :type '(file))
343 343
344(defcustom hfy-shell-file-name "/bin/sh" 344(defcustom hfy-shell-file-name "/bin/sh"
345 "Shell (bourne or compatible) to invoke for complex shell operations." 345 "Shell (Bourne or compatible) to invoke for complex shell operations."
346 :group 'htmlfontify 346 :group 'htmlfontify
347 :tag "shell-file-name" 347 :tag "shell-file-name"
348 :type '(file)) 348 :type '(file))
@@ -595,7 +595,8 @@ in a windowing system - try to trick it..."
595 (setq cperl-syntaxify-by-font-lock t))) 595 (setq cperl-syntaxify-by-font-lock t)))
596 (setq hfy-cperl-mode-kludged-p t))) ) 596 (setq hfy-cperl-mode-kludged-p t))) )
597 597
598(defun hfy-opt (symbol) "Is option SYMBOL set." 598(defun hfy-opt (symbol)
599 "Is option SYMBOL set."
599 (memq symbol hfy-optimisations)) 600 (memq symbol hfy-optimisations))
600 601
601(defun hfy-default-header (file style) 602(defun hfy-default-header (file style)
@@ -1066,7 +1067,7 @@ See also `hfy-face-to-style-i', `hfy-flatten-style'."
1066 ;; text-decoration is not inherited. 1067 ;; text-decoration is not inherited.
1067 ;; but it's not wrong and if this ever changes it will 1068 ;; but it's not wrong and if this ever changes it will
1068 ;; be needed, so I think it's better to leave it in? -- v 1069 ;; be needed, so I think it's better to leave it in? -- v
1069 (nconc final-style '(("text-decoration"."none")))))) 1070 (nconc final-style '(("text-decoration" . "none"))))))
1070 final-style)) 1071 final-style))
1071 1072
1072;; strip redundant bits from a name. Technically, this could result in 1073;; strip redundant bits from a name. Technically, this could result in
@@ -1992,7 +1993,7 @@ FILE is the specific file we are rendering."
1992 tags-list) ))) 1993 tags-list) )))
1993 1994
1994(defun hfy-shell () 1995(defun hfy-shell ()
1995 "Return `shell-file-name', or \"/bin/sh\" if it is a non-bourne shell." 1996 "Return `shell-file-name', or \"/bin/sh\" if it is a non-Bourne shell."
1996 (if (string-match "\\<bash\\>\\|\\<sh\\>\\|\\<dash\\>" shell-file-name) 1997 (if (string-match "\\<bash\\>\\|\\<sh\\>\\|\\<dash\\>" shell-file-name)
1997 shell-file-name 1998 shell-file-name
1998 (or hfy-shell-file-name "/bin/sh"))) 1999 (or hfy-shell-file-name "/bin/sh")))
diff --git a/lisp/ibuffer.el b/lisp/ibuffer.el
index 3f3b0b7a843..bc7dff278cc 100644
--- a/lisp/ibuffer.el
+++ b/lisp/ibuffer.el
@@ -426,7 +426,7 @@ directory, like `default-directory'."
426 '(menu-item "Save current filter groups permanently..." 426 '(menu-item "Save current filter groups permanently..."
427 ibuffer-save-filter-groups 427 ibuffer-save-filter-groups
428 :enable (and (featurep 'ibuf-ext) ibuffer-filter-groups) 428 :enable (and (featurep 'ibuf-ext) ibuffer-filter-groups)
429 :help "Use a mnemnonic name to store current filter groups")) 429 :help "Use a mnemonic name to store current filter groups"))
430 (define-key-after groups-map [switch-to-saved-filter-groups] 430 (define-key-after groups-map [switch-to-saved-filter-groups]
431 '(menu-item "Restore permanently saved filters..." 431 '(menu-item "Restore permanently saved filters..."
432 ibuffer-switch-to-saved-filter-groups 432 ibuffer-switch-to-saved-filter-groups
@@ -676,7 +676,7 @@ directory, like `default-directory'."
676 (define-key-after map [menu-bar view filter save-filters] 676 (define-key-after map [menu-bar view filter save-filters]
677 '(menu-item "Save current filters permanently..." ibuffer-save-filters 677 '(menu-item "Save current filters permanently..." ibuffer-save-filters
678 :enable (and (featurep 'ibuf-ext) ibuffer-filtering-qualifiers) 678 :enable (and (featurep 'ibuf-ext) ibuffer-filtering-qualifiers)
679 :help "Use a mnemnonic name to store current filter stack")) 679 :help "Use a mnemonic name to store current filter stack"))
680 (define-key-after map [menu-bar view filter switch-to-saved-filters] 680 (define-key-after map [menu-bar view filter switch-to-saved-filters]
681 '(menu-item "Restore permanently saved filters..." 681 '(menu-item "Restore permanently saved filters..."
682 ibuffer-switch-to-saved-filters 682 ibuffer-switch-to-saved-filters
diff --git a/lisp/info.el b/lisp/info.el
index 02f84a54af9..c1dae66bea2 100644
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -1769,12 +1769,14 @@ If DIRECTION is `backward', search in the reverse direction."
1769 ;; If no subfiles, give error now. 1769 ;; If no subfiles, give error now.
1770 (if give-up 1770 (if give-up
1771 (if (null Info-current-subfile) 1771 (if (null Info-current-subfile)
1772 (let ((search-spaces-regexp 1772 (if isearch-mode
1773 (if (or (not isearch-mode) isearch-regexp) 1773 (signal 'search-failed (list regexp "end of manual"))
1774 Info-search-whitespace-regexp))) 1774 (let ((search-spaces-regexp
1775 (if backward 1775 (if (or (not isearch-mode) isearch-regexp)
1776 (re-search-backward regexp) 1776 Info-search-whitespace-regexp)))
1777 (re-search-forward regexp))) 1777 (if backward
1778 (re-search-backward regexp)
1779 (re-search-forward regexp))))
1778 (setq found nil))) 1780 (setq found nil)))
1779 1781
1780 (if (and bound (not found)) 1782 (if (and bound (not found))
@@ -1845,7 +1847,7 @@ If DIRECTION is `backward', search in the reverse direction."
1845 (if found 1847 (if found
1846 (message "") 1848 (message "")
1847 (signal 'search-failed (if isearch-mode 1849 (signal 'search-failed (if isearch-mode
1848 (list regexp "end of the manual") 1850 (list regexp "end of manual")
1849 (list regexp))))) 1851 (list regexp)))))
1850 (if (not found) 1852 (if (not found)
1851 (progn (Info-read-subfile osubfile) 1853 (progn (Info-read-subfile osubfile)
diff --git a/lisp/international/fontset.el b/lisp/international/fontset.el
index 9f6520c7238..2425ee46eea 100644
--- a/lisp/international/fontset.el
+++ b/lisp/international/fontset.el
@@ -858,9 +858,9 @@ Internal use only. Should be called at startup time."
858(defun x-decompose-font-name (pattern) 858(defun x-decompose-font-name (pattern)
859 "Decompose PATTERN into XLFD fields and return a vector of the fields. 859 "Decompose PATTERN into XLFD fields and return a vector of the fields.
860The length of the vector is 12. 860The length of the vector is 12.
861The FOUNDRY and FAMILY fields are concatinated and stored in the first 861The FOUNDRY and FAMILY fields are concatenated and stored in the first
862element of the vector. 862element of the vector.
863The REGISTRY and ENCODING fields are concatinated and stored in the last 863The REGISTRY and ENCODING fields are concatenated and stored in the last
864element of the vector. 864element of the vector.
865 865
866Return nil if PATTERN doesn't conform to XLFD." 866Return nil if PATTERN doesn't conform to XLFD."
diff --git a/lisp/international/mule.el b/lisp/international/mule.el
index d078d98a480..1beffa5218b 100644
--- a/lisp/international/mule.el
+++ b/lisp/international/mule.el
@@ -1785,7 +1785,7 @@ contents of the current buffer following point against
1785succeed, it checks to see if any function in `auto-coding-functions' 1785succeed, it checks to see if any function in `auto-coding-functions'
1786gives a match. 1786gives a match.
1787 1787
1788If a coding system is specifed, the return value is a cons 1788If a coding system is specified, the return value is a cons
1789\(CODING . SOURCE), where CODING is the specified coding system and 1789\(CODING . SOURCE), where CODING is the specified coding system and
1790SOURCE is a symbol `auto-coding-alist', `auto-coding-regexp-alist', 1790SOURCE is a symbol `auto-coding-alist', `auto-coding-regexp-alist',
1791`:coding', or `auto-coding-functions' indicating by what CODING is 1791`:coding', or `auto-coding-functions' indicating by what CODING is
diff --git a/lisp/international/quail.el b/lisp/international/quail.el
index a29b729dcf0..3a70b1ec2a5 100644
--- a/lisp/international/quail.el
+++ b/lisp/international/quail.el
@@ -2703,7 +2703,7 @@ KEY BINDINGS FOR CONVERSION
2703 2703
2704;; Generate a half-cooked decode map (char-table) for the current 2704;; Generate a half-cooked decode map (char-table) for the current
2705;; Quail map. An element for a character C is a key string or a list 2705;; Quail map. An element for a character C is a key string or a list
2706;; of a key strings to type to input C. The lenth of key string is at 2706;; of a key strings to type to input C. The length of key string is at
2707;; most 2. If it is 2, more keys may be required to input C. 2707;; most 2. If it is 2, more keys may be required to input C.
2708 2708
2709(defun quail-gen-decode-map () 2709(defun quail-gen-decode-map ()
diff --git a/lisp/international/titdic-cnv.el b/lisp/international/titdic-cnv.el
index 6614ac8b416..82349761bdb 100644
--- a/lisp/international/titdic-cnv.el
+++ b/lisp/international/titdic-cnv.el
@@ -122,7 +122,7 @@ compose one Chinese character.
122 122
123In this input method, you enter a Chinese character by first typing 123In this input method, you enter a Chinese character by first typing
124keys corresponding to Zhuyin symbols (see the above table) followed by 124keys corresponding to Zhuyin symbols (see the above table) followed by
125SPC, 1, 2, 3, or 4 specifing a tone (SPC:$(0?v(N(B, 1:$(0M=Vy(B, 2:$(0Dm(N(B, 3: $(0&9Vy(B, 125SPC, 1, 2, 3, or 4 specifying a tone (SPC:$(0?v(N(B, 1:$(0M=Vy(B, 2:$(0Dm(N(B, 3: $(0&9Vy(B,
1264:$(0(+Vy(B). 1264:$(0(+Vy(B).
127 127
128\\<quail-translation-docstring>") 128\\<quail-translation-docstring>")
@@ -203,7 +203,7 @@ compose a Chinese character.
203 203
204In this input method, you enter a Chinese character by first typing 204In this input method, you enter a Chinese character by first typing
205keys corresponding to Zhuyin symbols (see the above table) followed by 205keys corresponding to Zhuyin symbols (see the above table) followed by
206SPC, 6, 3, 4, or 7 specifing a tone (SPC:$(0?v(N(B, 6:$(0Dm(N(B, 3:$(0&9Vy(B, 4:$(0(+Vy(B, 206SPC, 6, 3, 4, or 7 specifying a tone (SPC:$(0?v(N(B, 6:$(0Dm(N(B, 3:$(0&9Vy(B, 4:$(0(+Vy(B,
2077:$(0M=Vy(B). 2077:$(0M=Vy(B).
208 208
209\\<quail-translation-docstring>"))) 209\\<quail-translation-docstring>")))
diff --git a/lisp/international/ucs-normalize.el b/lisp/international/ucs-normalize.el
index df05b355b46..8d13eb2039d 100644
--- a/lisp/international/ucs-normalize.el
+++ b/lisp/international/ucs-normalize.el
@@ -227,7 +227,7 @@ Note that Hangul are excluded.")
227 (eval-when-compile decomposition-pair-to-composition))) 227 (eval-when-compile decomposition-pair-to-composition)))
228 228
229(defun ucs-normalize-primary-composite (decomposition-pair composition-predicate) 229(defun ucs-normalize-primary-composite (decomposition-pair composition-predicate)
230 "Convert DECOMPOSITION-PAIR to primay composite using COMPOSITION-PREDICATE." 230 "Convert DECOMPOSITION-PAIR to primary composite using COMPOSITION-PREDICATE."
231 (let ((char (or (gethash decomposition-pair 231 (let ((char (or (gethash decomposition-pair
232 ucs-normalize-decomposition-pair-to-primary-composite) 232 ucs-normalize-decomposition-pair-to-primary-composite)
233 (and (<= #x1100 (car decomposition-pair)) 233 (and (<= #x1100 (car decomposition-pair))
diff --git a/lisp/isearch.el b/lisp/isearch.el
index 2a7f191bd81..01dff91a1ff 100644
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -1438,12 +1438,7 @@ string. NLINES has the same meaning as in `occur'."
1438 (interactive 1438 (interactive
1439 (list 1439 (list
1440 (cond 1440 (cond
1441 (isearch-word (concat "\\b" (replace-regexp-in-string 1441 (isearch-word (word-search-regexp isearch-string))
1442 "\\W+" "\\W+"
1443 (replace-regexp-in-string
1444 "^\\W+\\|\\W+$" "" isearch-string)
1445 nil t)
1446 "\\b"))
1447 (isearch-regexp isearch-string) 1442 (isearch-regexp isearch-string)
1448 (t (regexp-quote isearch-string))) 1443 (t (regexp-quote isearch-string)))
1449 (if current-prefix-arg (prefix-numeric-value current-prefix-arg)))) 1444 (if current-prefix-arg (prefix-numeric-value current-prefix-arg))))
@@ -1642,8 +1637,10 @@ Subword is used when `subword-mode' is activated. "
1642 (if (and (eq case-fold-search t) search-upper-case) 1637 (if (and (eq case-fold-search t) search-upper-case)
1643 (setq case-fold-search 1638 (setq case-fold-search
1644 (isearch-no-upper-case-p isearch-string isearch-regexp))) 1639 (isearch-no-upper-case-p isearch-string isearch-regexp)))
1645 (looking-at (if isearch-regexp isearch-string 1640 (looking-at (cond
1646 (regexp-quote isearch-string)))) 1641 (isearch-word (word-search-regexp isearch-string t))
1642 (isearch-regexp isearch-string)
1643 (t (regexp-quote isearch-string)))))
1647 (error nil)) 1644 (error nil))
1648 (or isearch-yank-flag 1645 (or isearch-yank-flag
1649 (<= (match-end 0) 1646 (<= (match-end 0)
@@ -2228,7 +2225,11 @@ If there is no completion possible, say so and continue searching."
2228 (if nonincremental "search" "I-search") 2225 (if nonincremental "search" "I-search")
2229 (if isearch-forward "" " backward") 2226 (if isearch-forward "" " backward")
2230 (if current-input-method 2227 (if current-input-method
2231 (concat " [" current-input-method-title "]: ") 2228 ;; Input methods for RTL languages use RTL
2229 ;; characters for their title, and that messes
2230 ;; up the display of search text after the prompt.
2231 (bidi-string-mark-left-to-right
2232 (concat " [" current-input-method-title "]: "))
2232 ": ") 2233 ": ")
2233 ))) 2234 )))
2234 (propertize (concat (upcase (substring m 0 1)) (substring m 1)) 2235 (propertize (concat (upcase (substring m 0 1)) (substring m 1))
diff --git a/lisp/kmacro.el b/lisp/kmacro.el
index eea3009faf4..6915640944a 100644
--- a/lisp/kmacro.el
+++ b/lisp/kmacro.el
@@ -747,7 +747,7 @@ If kbd macro currently being defined end it before activating it."
747;; Create a separate keymap installed as a minor-mode keymap (e.g. in 747;; Create a separate keymap installed as a minor-mode keymap (e.g. in
748;; the emulation-mode-map-alists) in which macro bindings are made 748;; the emulation-mode-map-alists) in which macro bindings are made
749;; independent of any other bindings. When first binding is made, 749;; independent of any other bindings. When first binding is made,
750;; the kemap is created, installed, and enabled. Key seq. C-x C-k + 750;; the keymap is created, installed, and enabled. Key seq. C-x C-k +
751;; can then be used to toggle the use of this keymap on and off. 751;; can then be used to toggle the use of this keymap on and off.
752;; This means that it would be safe(r) to bind ordinary keys like 752;; This means that it would be safe(r) to bind ordinary keys like
753;; letters and digits, provided that we inhibit the keymap while 753;; letters and digits, provided that we inhibit the keymap while
diff --git a/lisp/language/chinese.el b/lisp/language/chinese.el
index c44dc44581d..0e87d4d8e8c 100644
--- a/lisp/language/chinese.el
+++ b/lisp/language/chinese.el
@@ -125,7 +125,7 @@
125(define-coding-system 'chinese-big5 125(define-coding-system 'chinese-big5
126 "BIG5 8-bit encoding for Chinese (MIME:Big5)" 126 "BIG5 8-bit encoding for Chinese (MIME:Big5)"
127 :coding-type 'big5 127 :coding-type 'big5
128 :mnemonic ?B 128 :mnemonic ?B
129 :charset-list '(ascii big5) 129 :charset-list '(ascii big5)
130 :mime-charset 'big5) 130 :mime-charset 'big5)
131 131
@@ -152,7 +152,7 @@
152(define-coding-system 'chinese-big5-hkscs 152(define-coding-system 'chinese-big5-hkscs
153 "BIG5-HKSCS 8-bit encoding for Chinese, Hong Kong supplement (MIME:Big5-HKSCS)" 153 "BIG5-HKSCS 8-bit encoding for Chinese, Hong Kong supplement (MIME:Big5-HKSCS)"
154 :coding-type 'charset 154 :coding-type 'charset
155 :mnemonic ?B 155 :mnemonic ?B
156 :charset-list '(ascii big5-hkscs) 156 :charset-list '(ascii big5-hkscs)
157 :mime-charset 'big5-hkscs) 157 :mime-charset 'big5-hkscs)
158(define-coding-system-alias 'big5-hkscs 'chinese-big5-hkscs) 158(define-coding-system-alias 'big5-hkscs 'chinese-big5-hkscs)
@@ -191,7 +191,7 @@
191 chinese-cns11643-5 chinese-cns11643-6 191 chinese-cns11643-5 chinese-cns11643-6
192 chinese-cns11643-7) 192 chinese-cns11643-7)
193 (iso639-language . zh) 193 (iso639-language . zh)
194 (setup-function . (lambda () 194 (setup-function . (lambda ()
195 (use-cjk-char-width-table 'zh_TW))) 195 (use-cjk-char-width-table 'zh_TW)))
196 (exit-function . use-default-char-width-table) 196 (exit-function . use-default-char-width-table)
197 (coding-system iso-2022-cn euc-tw) 197 (coding-system iso-2022-cn euc-tw)
@@ -211,7 +211,7 @@ accepts Big5 for input also (which is then converted to CNS)."))
211 chinese-cns11643-5 chinese-cns11643-6 211 chinese-cns11643-5 chinese-cns11643-6
212 chinese-cns11643-7 chinese-big5-1 chinese-big5-2) 212 chinese-cns11643-7 chinese-big5-1 chinese-big5-2)
213 (iso639-language . zh) 213 (iso639-language . zh)
214 (setup-function . (lambda () 214 (setup-function . (lambda ()
215 (use-cjk-char-width-table 'zh_TW))) 215 (use-cjk-char-width-table 'zh_TW)))
216 (exit-function . use-default-char-width-table) 216 (exit-function . use-default-char-width-table)
217 (coding-system euc-tw iso-2022-cn) 217 (coding-system euc-tw iso-2022-cn)
@@ -220,7 +220,7 @@ accepts Big5 for input also (which is then converted to CNS)."))
220 (features china-util) 220 (features china-util)
221 (input-method . "chinese-cns-quick") 221 (input-method . "chinese-cns-quick")
222 (documentation . "\ 222 (documentation . "\
223Support for Chinese, prefering the EUC-TW character set. Note that 223Support for Chinese, preferring the EUC-TW character set. Note that
224the EUC-TW coding system accepts Big5 for input also (which is then 224the EUC-TW coding system accepts Big5 for input also (which is then
225converted to CNS).")) 225converted to CNS)."))
226 '("Chinese")) 226 '("Chinese"))
@@ -241,13 +241,13 @@ converted to CNS)."))
241(set-language-info-alist 241(set-language-info-alist
242 "Chinese-GBK" '((charset chinese-gbk) 242 "Chinese-GBK" '((charset chinese-gbk)
243 (iso639-language . zh) 243 (iso639-language . zh)
244 (setup-function . (lambda () 244 (setup-function . (lambda ()
245 (use-cjk-char-width-table 'zh_CN))) 245 (use-cjk-char-width-table 'zh_CN)))
246 (exit-function . use-default-char-width-table) 246 (exit-function . use-default-char-width-table)
247 (coding-system chinese-gbk) 247 (coding-system chinese-gbk)
248 (coding-priority gbk iso-2022-cn chinese-big5 248 (coding-priority gbk iso-2022-cn chinese-big5
249 chinese-iso-8bit) ; fixme? 249 chinese-iso-8bit) ; fixme?
250 (ctext-non-standard-encodings "gbk-0") 250 (ctext-non-standard-encodings "gbk-0")
251 (input-method . "chinese-py-punct") ; fixme? 251 (input-method . "chinese-py-punct") ; fixme?
252 (sample-text . "Chinese ($BCfJ8(B,$BIaDL$A;0(B,$A::So(B) $(D95$B9%(B") 252 (sample-text . "Chinese ($BCfJ8(B,$BIaDL$A;0(B,$A::So(B) $(D95$B9%(B")
253 (features china-util) 253 (features china-util)
diff --git a/lisp/language/viet-util.el b/lisp/language/viet-util.el
index ea601c041e4..b71c65438be 100644
--- a/lisp/language/viet-util.el
+++ b/lisp/language/viet-util.el
@@ -34,7 +34,7 @@
34;; for representing these characters: VISCII, TCVN-5712, VPS, VIQR, 34;; for representing these characters: VISCII, TCVN-5712, VPS, VIQR,
35;; and Unicode. VISCII, TCVN-5712 and VPS are simple 1-byte code 35;; and Unicode. VISCII, TCVN-5712 and VPS are simple 1-byte code
36;; which assigns 134 unique characters in control-code area 36;; which assigns 134 unique characters in control-code area
37;; (0x00..0x1F) and right half area (0x80..0xFF). VIQR is a menmonic 37;; (0x00..0x1F) and right half area (0x80..0xFF). VIQR is a mnemonic
38;; encoding specification representing diacritical marks by following 38;; encoding specification representing diacritical marks by following
39;; ASCII characters. 39;; ASCII characters.
40 40
@@ -47,7 +47,7 @@
47 "Return VISCII character code of CHAR if appropriate." 47 "Return VISCII character code of CHAR if appropriate."
48 (encode-char char 'viscii)) 48 (encode-char char 'viscii))
49 49
50;; VIQR is a menmonic encoding specification for Vietnamese. 50;; VIQR is a mnemonic encoding specification for Vietnamese.
51;; It represents diacritical marks by ASCII characters as follows: 51;; It represents diacritical marks by ASCII characters as follows:
52;; ------------+----------+-------- 52;; ------------+----------+--------
53;; mark | mnemonic | example 53;; mark | mnemonic | example
diff --git a/lisp/ldefs-boot.el b/lisp/ldefs-boot.el
index 8d7e4d41265..858cfa85a6f 100644
--- a/lisp/ldefs-boot.el
+++ b/lisp/ldefs-boot.el
@@ -5,7 +5,7 @@
5 5
6;;;### (autoloads (5x5-crack 5x5-crack-xor-mutate 5x5-crack-mutating-best 6;;;### (autoloads (5x5-crack 5x5-crack-xor-mutate 5x5-crack-mutating-best
7;;;;;; 5x5-crack-mutating-current 5x5-crack-randomly 5x5) "5x5" 7;;;;;; 5x5-crack-mutating-current 5x5-crack-randomly 5x5) "5x5"
8;;;;;; "play/5x5.el" (20119 34052)) 8;;;;;; "play/5x5.el" (20168 57844))
9;;; Generated autoloads from play/5x5.el 9;;; Generated autoloads from play/5x5.el
10 10
11(autoload '5x5 "5x5" "\ 11(autoload '5x5 "5x5" "\
@@ -68,7 +68,7 @@ should return a grid vector array that is the new solution.
68;;;*** 68;;;***
69 69
70;;;### (autoloads (ada-mode ada-add-extensions) "ada-mode" "progmodes/ada-mode.el" 70;;;### (autoloads (ada-mode ada-add-extensions) "ada-mode" "progmodes/ada-mode.el"
71;;;;;; (20119 34052)) 71;;;;;; (20178 7273))
72;;; Generated autoloads from progmodes/ada-mode.el 72;;; Generated autoloads from progmodes/ada-mode.el
73 73
74(autoload 'ada-add-extensions "ada-mode" "\ 74(autoload 'ada-add-extensions "ada-mode" "\
@@ -88,7 +88,7 @@ Ada mode is the major mode for editing Ada code.
88;;;*** 88;;;***
89 89
90;;;### (autoloads (ada-header) "ada-stmt" "progmodes/ada-stmt.el" 90;;;### (autoloads (ada-header) "ada-stmt" "progmodes/ada-stmt.el"
91;;;;;; (20119 34052)) 91;;;;;; (19845 45374))
92;;; Generated autoloads from progmodes/ada-stmt.el 92;;; Generated autoloads from progmodes/ada-stmt.el
93 93
94(autoload 'ada-header "ada-stmt" "\ 94(autoload 'ada-header "ada-stmt" "\
@@ -99,7 +99,7 @@ Insert a descriptive header at the top of the file.
99;;;*** 99;;;***
100 100
101;;;### (autoloads (ada-find-file) "ada-xref" "progmodes/ada-xref.el" 101;;;### (autoloads (ada-find-file) "ada-xref" "progmodes/ada-xref.el"
102;;;;;; (20140 44371)) 102;;;;;; (20176 51947))
103;;; Generated autoloads from progmodes/ada-xref.el 103;;; Generated autoloads from progmodes/ada-xref.el
104 104
105(autoload 'ada-find-file "ada-xref" "\ 105(autoload 'ada-find-file "ada-xref" "\
@@ -114,7 +114,7 @@ Completion is available.
114;;;;;; add-change-log-entry-other-window add-change-log-entry find-change-log 114;;;;;; add-change-log-entry-other-window add-change-log-entry find-change-log
115;;;;;; prompt-for-change-log-name add-log-mailing-address add-log-full-name 115;;;;;; prompt-for-change-log-name add-log-mailing-address add-log-full-name
116;;;;;; add-log-current-defun-function) "add-log" "vc/add-log.el" 116;;;;;; add-log-current-defun-function) "add-log" "vc/add-log.el"
117;;;;;; (20119 34052)) 117;;;;;; (20033 22846))
118;;; Generated autoloads from vc/add-log.el 118;;; Generated autoloads from vc/add-log.el
119 119
120(put 'change-log-default-name 'safe-local-variable 'string-or-null-p) 120(put 'change-log-default-name 'safe-local-variable 'string-or-null-p)
@@ -253,7 +253,7 @@ old-style time formats for entries are supported.
253 253
254;;;### (autoloads (defadvice ad-activate ad-add-advice ad-disable-advice 254;;;### (autoloads (defadvice ad-activate ad-add-advice ad-disable-advice
255;;;;;; ad-enable-advice ad-default-compilation-action ad-redefinition-action) 255;;;;;; ad-enable-advice ad-default-compilation-action ad-redefinition-action)
256;;;;;; "advice" "emacs-lisp/advice.el" (20119 34052)) 256;;;;;; "advice" "emacs-lisp/advice.el" (20179 28130))
257;;; Generated autoloads from emacs-lisp/advice.el 257;;; Generated autoloads from emacs-lisp/advice.el
258 258
259(defvar ad-redefinition-action 'warn "\ 259(defvar ad-redefinition-action 'warn "\
@@ -398,7 +398,7 @@ usage: (defadvice FUNCTION (CLASS NAME [POSITION] [ARGLIST] FLAG...)
398 398
399;;;### (autoloads (align-newline-and-indent align-unhighlight-rule 399;;;### (autoloads (align-newline-and-indent align-unhighlight-rule
400;;;;;; align-highlight-rule align-current align-entire align-regexp 400;;;;;; align-highlight-rule align-current align-entire align-regexp
401;;;;;; align) "align" "align.el" (20119 34052)) 401;;;;;; align) "align" "align.el" (20182 4358))
402;;; Generated autoloads from align.el 402;;; Generated autoloads from align.el
403 403
404(autoload 'align "align" "\ 404(autoload 'align "align" "\
@@ -489,7 +489,7 @@ A replacement function for `newline-and-indent', aligning as it goes.
489 489
490;;;### (autoloads (outlineify-sticky allout-mode allout-mode-p allout-auto-activation 490;;;### (autoloads (outlineify-sticky allout-mode allout-mode-p allout-auto-activation
491;;;;;; allout-setup allout-auto-activation-helper) "allout" "allout.el" 491;;;;;; allout-setup allout-auto-activation-helper) "allout" "allout.el"
492;;;;;; (20126 50779)) 492;;;;;; (20178 7273))
493;;; Generated autoloads from allout.el 493;;; Generated autoloads from allout.el
494 494
495(autoload 'allout-auto-activation-helper "allout" "\ 495(autoload 'allout-auto-activation-helper "allout" "\
@@ -500,7 +500,7 @@ Intended to be used as the `allout-auto-activation' :set function.
500\(fn VAR VALUE)" nil nil) 500\(fn VAR VALUE)" nil nil)
501 501
502(autoload 'allout-setup "allout" "\ 502(autoload 'allout-setup "allout" "\
503Do fundamental emacs session for allout auto-activation. 503Do fundamental Emacs session for allout auto-activation.
504 504
505Establishes allout processing as part of visiting a file if 505Establishes allout processing as part of visiting a file if
506`allout-auto-activation' is non-nil, or removes it otherwise. 506`allout-auto-activation' is non-nil, or removes it otherwise.
@@ -600,7 +600,7 @@ Below is a description of the key bindings, and then description
600of special `allout-mode' features and terminology. See also the 600of special `allout-mode' features and terminology. See also the
601outline menubar additions for quick reference to many of the 601outline menubar additions for quick reference to many of the
602features. Customize `allout-auto-activation' to prepare your 602features. Customize `allout-auto-activation' to prepare your
603emacs session for automatic activation of `allout-mode'. 603Emacs session for automatic activation of `allout-mode'.
604 604
605The bindings are those listed in `allout-prefixed-keybindings' 605The bindings are those listed in `allout-prefixed-keybindings'
606and `allout-unprefixed-keybindings'. We recommend customizing 606and `allout-unprefixed-keybindings'. We recommend customizing
@@ -648,7 +648,7 @@ the HOT-SPOT Operation section.
648\\[allout-rebullet-current-heading] `allout-rebullet-current-heading' Prompt for alternate bullet for 648\\[allout-rebullet-current-heading] `allout-rebullet-current-heading' Prompt for alternate bullet for
649 current topic 649 current topic
650\\[allout-rebullet-topic] `allout-rebullet-topic' Reconcile bullets of topic and 650\\[allout-rebullet-topic] `allout-rebullet-topic' Reconcile bullets of topic and
651 its' offspring -- distinctive bullets are not changed, others 651 its offspring -- distinctive bullets are not changed, others
652 are alternated according to nesting depth. 652 are alternated according to nesting depth.
653\\[allout-number-siblings] `allout-number-siblings' Number bullets of topic and siblings -- 653\\[allout-number-siblings] `allout-number-siblings' Number bullets of topic and siblings --
654 the offspring are not affected. 654 the offspring are not affected.
@@ -658,12 +658,12 @@ the HOT-SPOT Operation section.
658 ---------------------------------- 658 ----------------------------------
659\\[allout-kill-topic] `allout-kill-topic' Kill current topic, including offspring. 659\\[allout-kill-topic] `allout-kill-topic' Kill current topic, including offspring.
660\\[allout-copy-topic-as-kill] `allout-copy-topic-as-kill' Copy current topic, including offspring. 660\\[allout-copy-topic-as-kill] `allout-copy-topic-as-kill' Copy current topic, including offspring.
661\\[allout-kill-line] `allout-kill-line' kill-line, attending to outline structure. 661\\[allout-kill-line] `allout-kill-line' Kill line, attending to outline structure.
662\\[allout-copy-line-as-kill] `allout-copy-line-as-kill' Copy line but don't delete it. 662\\[allout-copy-line-as-kill] `allout-copy-line-as-kill' Copy line but don't delete it.
663\\[allout-yank] `allout-yank' Yank, adjusting depth of yanked topic to 663\\[allout-yank] `allout-yank' Yank, adjusting depth of yanked topic to
664 depth of heading if yanking into bare topic 664 depth of heading if yanking into bare topic
665 heading (ie, prefix sans text). 665 heading (ie, prefix sans text).
666\\[allout-yank-pop] `allout-yank-pop' Is to allout-yank as yank-pop is to yank 666\\[allout-yank-pop] `allout-yank-pop' Is to `allout-yank' as `yank-pop' is to `yank'.
667 667
668 Topic-oriented Encryption: 668 Topic-oriented Encryption:
669 ------------------------- 669 -------------------------
@@ -806,7 +806,7 @@ PREFIX-LEAD:
806 When the PREFIX-LEAD is set to the comment-string of a 806 When the PREFIX-LEAD is set to the comment-string of a
807 programming language, outline structuring can be embedded in 807 programming language, outline structuring can be embedded in
808 program code without interfering with processing of the text 808 program code without interfering with processing of the text
809 (by emacs or the language processor) as program code. This 809 (by Emacs or the language processor) as program code. This
810 setting happens automatically when allout mode is used in 810 setting happens automatically when allout mode is used in
811 programming-mode buffers. See `allout-use-mode-specific-leader' 811 programming-mode buffers. See `allout-use-mode-specific-leader'
812 docstring for more detail. 812 docstring for more detail.
@@ -842,7 +842,7 @@ OPEN: A TOPIC that is not CLOSED, though its OFFSPRING or BODY may be.
842Activate outline mode and establish file var so it is started subsequently. 842Activate outline mode and establish file var so it is started subsequently.
843 843
844See `allout-layout' and customization of `allout-auto-activation' 844See `allout-layout' and customization of `allout-auto-activation'
845for details on preparing emacs for automatic allout activation. 845for details on preparing Emacs for automatic allout activation.
846 846
847\(fn &optional ARG)" t nil) 847\(fn &optional ARG)" t nil)
848 848
@@ -850,7 +850,7 @@ for details on preparing emacs for automatic allout activation.
850 850
851;;;### (autoloads (allout-widgets-mode allout-widgets-auto-activation 851;;;### (autoloads (allout-widgets-mode allout-widgets-auto-activation
852;;;;;; allout-widgets-setup allout-widgets) "allout-widgets" "allout-widgets.el" 852;;;;;; allout-widgets-setup allout-widgets) "allout-widgets" "allout-widgets.el"
853;;;;;; (20126 50769)) 853;;;;;; (20167 36967))
854;;; Generated autoloads from allout-widgets.el 854;;; Generated autoloads from allout-widgets.el
855 855
856(let ((loads (get 'allout-widgets 'custom-loads))) (if (member '"allout-widgets" loads) nil (put 'allout-widgets 'custom-loads (cons '"allout-widgets" loads)))) 856(let ((loads (get 'allout-widgets 'custom-loads))) (if (member '"allout-widgets" loads) nil (put 'allout-widgets 'custom-loads (cons '"allout-widgets" loads))))
@@ -910,7 +910,7 @@ outline hot-spot navigation (see `allout-mode').
910;;;*** 910;;;***
911 911
912;;;### (autoloads (ange-ftp-hook-function ange-ftp-reread-dir) "ange-ftp" 912;;;### (autoloads (ange-ftp-hook-function ange-ftp-reread-dir) "ange-ftp"
913;;;;;; "net/ange-ftp.el" (20119 34052)) 913;;;;;; "net/ange-ftp.el" (20178 7273))
914;;; Generated autoloads from net/ange-ftp.el 914;;; Generated autoloads from net/ange-ftp.el
915 915
916(defalias 'ange-ftp-re-read-dir 'ange-ftp-reread-dir) 916(defalias 'ange-ftp-re-read-dir 'ange-ftp-reread-dir)
@@ -932,7 +932,7 @@ directory, so that Emacs will know its current contents.
932;;;*** 932;;;***
933 933
934;;;### (autoloads (animate-birthday-present animate-sequence animate-string) 934;;;### (autoloads (animate-birthday-present animate-sequence animate-string)
935;;;;;; "animate" "play/animate.el" (20119 34052)) 935;;;;;; "animate" "play/animate.el" (20164 60780))
936;;; Generated autoloads from play/animate.el 936;;; Generated autoloads from play/animate.el
937 937
938(autoload 'animate-string "animate" "\ 938(autoload 'animate-string "animate" "\
@@ -965,7 +965,7 @@ the buffer *Birthday-Present-for-Name*.
965;;;*** 965;;;***
966 966
967;;;### (autoloads (ansi-color-process-output ansi-color-for-comint-mode-on) 967;;;### (autoloads (ansi-color-process-output ansi-color-for-comint-mode-on)
968;;;;;; "ansi-color" "ansi-color.el" (20119 34052)) 968;;;;;; "ansi-color" "ansi-color.el" (20164 60780))
969;;; Generated autoloads from ansi-color.el 969;;; Generated autoloads from ansi-color.el
970 970
971(autoload 'ansi-color-for-comint-mode-on "ansi-color" "\ 971(autoload 'ansi-color-for-comint-mode-on "ansi-color" "\
@@ -991,7 +991,7 @@ This is a good function to put in `comint-output-filter-functions'.
991;;;*** 991;;;***
992 992
993;;;### (autoloads (antlr-set-tabs antlr-mode antlr-show-makefile-rules) 993;;;### (autoloads (antlr-set-tabs antlr-mode antlr-show-makefile-rules)
994;;;;;; "antlr-mode" "progmodes/antlr-mode.el" (20119 34052)) 994;;;;;; "antlr-mode" "progmodes/antlr-mode.el" (19890 42850))
995;;; Generated autoloads from progmodes/antlr-mode.el 995;;; Generated autoloads from progmodes/antlr-mode.el
996 996
997(autoload 'antlr-show-makefile-rules "antlr-mode" "\ 997(autoload 'antlr-show-makefile-rules "antlr-mode" "\
@@ -1027,7 +1027,7 @@ Used in `antlr-mode'. Also a useful function in `java-mode-hook'.
1027;;;*** 1027;;;***
1028 1028
1029;;;### (autoloads (appt-activate appt-add) "appt" "calendar/appt.el" 1029;;;### (autoloads (appt-activate appt-add) "appt" "calendar/appt.el"
1030;;;;;; (20119 34052)) 1030;;;;;; (19956 37456))
1031;;; Generated autoloads from calendar/appt.el 1031;;; Generated autoloads from calendar/appt.el
1032 1032
1033(autoload 'appt-add "appt" "\ 1033(autoload 'appt-add "appt" "\
@@ -1050,7 +1050,7 @@ ARG is positive, otherwise off.
1050 1050
1051;;;### (autoloads (apropos-documentation apropos-value apropos-library 1051;;;### (autoloads (apropos-documentation apropos-value apropos-library
1052;;;;;; apropos apropos-documentation-property apropos-command apropos-variable 1052;;;;;; apropos apropos-documentation-property apropos-command apropos-variable
1053;;;;;; apropos-read-pattern) "apropos" "apropos.el" (20119 34052)) 1053;;;;;; apropos-read-pattern) "apropos" "apropos.el" (20161 45793))
1054;;; Generated autoloads from apropos.el 1054;;; Generated autoloads from apropos.el
1055 1055
1056(autoload 'apropos-read-pattern "apropos" "\ 1056(autoload 'apropos-read-pattern "apropos" "\
@@ -1120,7 +1120,8 @@ Returns list of symbols and documentation found.
1120(autoload 'apropos-library "apropos" "\ 1120(autoload 'apropos-library "apropos" "\
1121List the variables and functions defined by library FILE. 1121List the variables and functions defined by library FILE.
1122FILE should be one of the libraries currently loaded and should 1122FILE should be one of the libraries currently loaded and should
1123thus be found in `load-history'. 1123thus be found in `load-history'. If `apropos-do-all' is non-nil,
1124the output includes key-bindings of commands.
1124 1125
1125\(fn FILE)" t nil) 1126\(fn FILE)" t nil)
1126 1127
@@ -1132,7 +1133,9 @@ search for matches for that word as a substring. If it is a list of words,
1132search for matches for any two (or more) of those words. 1133search for matches for any two (or more) of those words.
1133 1134
1134With \\[universal-argument] prefix, or if `apropos-do-all' is non-nil, also looks 1135With \\[universal-argument] prefix, or if `apropos-do-all' is non-nil, also looks
1135at the function and at the names and values of properties. 1136at function definitions (arguments, documentation and body) and at the
1137names and values of properties.
1138
1136Returns list of symbols and values found. 1139Returns list of symbols and values found.
1137 1140
1138\(fn PATTERN &optional DO-ALL)" t nil) 1141\(fn PATTERN &optional DO-ALL)" t nil)
@@ -1144,17 +1147,19 @@ or a regexp (using some regexp special characters). If it is a word,
1144search for matches for that word as a substring. If it is a list of words, 1147search for matches for that word as a substring. If it is a list of words,
1145search for matches for any two (or more) of those words. 1148search for matches for any two (or more) of those words.
1146 1149
1147With \\[universal-argument] prefix, or if `apropos-do-all' is non-nil, also use 1150Note that by default this command only searches in the file specified by
1148documentation that is not stored in the documentation file and show key 1151`internal-doc-file-name'; i.e., the etc/DOC file. With \\[universal-argument] prefix,
1149bindings. 1152or if `apropos-do-all' is non-nil, it searches all currently defined
1153documentation strings.
1154
1150Returns list of symbols and documentation found. 1155Returns list of symbols and documentation found.
1151 1156
1152\(fn PATTERN &optional DO-ALL)" t nil) 1157\(fn PATTERN &optional DO-ALL)" t nil)
1153 1158
1154;;;*** 1159;;;***
1155 1160
1156;;;### (autoloads (archive-mode) "arc-mode" "arc-mode.el" (20119 1161;;;### (autoloads (archive-mode) "arc-mode" "arc-mode.el" (20165
1157;;;;;; 34052)) 1162;;;;;; 31925))
1158;;; Generated autoloads from arc-mode.el 1163;;; Generated autoloads from arc-mode.el
1159 1164
1160(autoload 'archive-mode "arc-mode" "\ 1165(autoload 'archive-mode "arc-mode" "\
@@ -1174,7 +1179,7 @@ archive.
1174 1179
1175;;;*** 1180;;;***
1176 1181
1177;;;### (autoloads (array-mode) "array" "array.el" (20119 34052)) 1182;;;### (autoloads (array-mode) "array" "array.el" (19845 45374))
1178;;; Generated autoloads from array.el 1183;;; Generated autoloads from array.el
1179 1184
1180(autoload 'array-mode "array" "\ 1185(autoload 'array-mode "array" "\
@@ -1245,8 +1250,8 @@ Entering array mode calls the function `array-mode-hook'.
1245 1250
1246;;;*** 1251;;;***
1247 1252
1248;;;### (autoloads (artist-mode) "artist" "textmodes/artist.el" (20119 1253;;;### (autoloads (artist-mode) "artist" "textmodes/artist.el" (20172
1249;;;;;; 34052)) 1254;;;;;; 54913))
1250;;; Generated autoloads from textmodes/artist.el 1255;;; Generated autoloads from textmodes/artist.el
1251 1256
1252(autoload 'artist-mode "artist" "\ 1257(autoload 'artist-mode "artist" "\
@@ -1452,8 +1457,8 @@ Keymap summary
1452 1457
1453;;;*** 1458;;;***
1454 1459
1455;;;### (autoloads (asm-mode) "asm-mode" "progmodes/asm-mode.el" (20119 1460;;;### (autoloads (asm-mode) "asm-mode" "progmodes/asm-mode.el" (19890
1456;;;;;; 34052)) 1461;;;;;; 42850))
1457;;; Generated autoloads from progmodes/asm-mode.el 1462;;; Generated autoloads from progmodes/asm-mode.el
1458 1463
1459(autoload 'asm-mode "asm-mode" "\ 1464(autoload 'asm-mode "asm-mode" "\
@@ -1481,7 +1486,7 @@ Special commands:
1481;;;*** 1486;;;***
1482 1487
1483;;;### (autoloads (auth-source-cache-expiry) "auth-source" "gnus/auth-source.el" 1488;;;### (autoloads (auth-source-cache-expiry) "auth-source" "gnus/auth-source.el"
1484;;;;;; (20119 34052)) 1489;;;;;; (20089 47591))
1485;;; Generated autoloads from gnus/auth-source.el 1490;;; Generated autoloads from gnus/auth-source.el
1486 1491
1487(defvar auth-source-cache-expiry 7200 "\ 1492(defvar auth-source-cache-expiry 7200 "\
@@ -1494,7 +1499,7 @@ let-binding.")
1494;;;*** 1499;;;***
1495 1500
1496;;;### (autoloads (autoarg-kp-mode autoarg-mode) "autoarg" "autoarg.el" 1501;;;### (autoloads (autoarg-kp-mode autoarg-mode) "autoarg" "autoarg.el"
1497;;;;;; (20126 50800)) 1502;;;;;; (20127 62865))
1498;;; Generated autoloads from autoarg.el 1503;;; Generated autoloads from autoarg.el
1499 1504
1500(defvar autoarg-mode nil "\ 1505(defvar autoarg-mode nil "\
@@ -1555,7 +1560,7 @@ This is similar to `autoarg-mode' but rebinds the keypad keys
1555;;;*** 1560;;;***
1556 1561
1557;;;### (autoloads (autoconf-mode) "autoconf" "progmodes/autoconf.el" 1562;;;### (autoloads (autoconf-mode) "autoconf" "progmodes/autoconf.el"
1558;;;;;; (20119 34052)) 1563;;;;;; (20163 39903))
1559;;; Generated autoloads from progmodes/autoconf.el 1564;;; Generated autoloads from progmodes/autoconf.el
1560 1565
1561(autoload 'autoconf-mode "autoconf" "\ 1566(autoload 'autoconf-mode "autoconf" "\
@@ -1566,7 +1571,7 @@ Major mode for editing Autoconf configure.in files.
1566;;;*** 1571;;;***
1567 1572
1568;;;### (autoloads (auto-insert-mode define-auto-insert auto-insert) 1573;;;### (autoloads (auto-insert-mode define-auto-insert auto-insert)
1569;;;;;; "autoinsert" "autoinsert.el" (20126 50812)) 1574;;;;;; "autoinsert" "autoinsert.el" (20127 62865))
1570;;; Generated autoloads from autoinsert.el 1575;;; Generated autoloads from autoinsert.el
1571 1576
1572(autoload 'auto-insert "autoinsert" "\ 1577(autoload 'auto-insert "autoinsert" "\
@@ -1606,7 +1611,7 @@ insert a template for the file depending on the mode of the buffer.
1606 1611
1607;;;### (autoloads (batch-update-autoloads update-directory-autoloads 1612;;;### (autoloads (batch-update-autoloads update-directory-autoloads
1608;;;;;; update-file-autoloads) "autoload" "emacs-lisp/autoload.el" 1613;;;;;; update-file-autoloads) "autoload" "emacs-lisp/autoload.el"
1609;;;;;; (20119 34052)) 1614;;;;;; (20173 35732))
1610;;; Generated autoloads from emacs-lisp/autoload.el 1615;;; Generated autoloads from emacs-lisp/autoload.el
1611 1616
1612(put 'generated-autoload-file 'safe-local-variable 'stringp) 1617(put 'generated-autoload-file 'safe-local-variable 'stringp)
@@ -1657,7 +1662,7 @@ should be non-nil).
1657 1662
1658;;;### (autoloads (global-auto-revert-mode turn-on-auto-revert-tail-mode 1663;;;### (autoloads (global-auto-revert-mode turn-on-auto-revert-tail-mode
1659;;;;;; auto-revert-tail-mode turn-on-auto-revert-mode auto-revert-mode) 1664;;;;;; auto-revert-tail-mode turn-on-auto-revert-mode auto-revert-mode)
1660;;;;;; "autorevert" "autorevert.el" (20126 50846)) 1665;;;;;; "autorevert" "autorevert.el" (20168 57844))
1661;;; Generated autoloads from autorevert.el 1666;;; Generated autoloads from autorevert.el
1662 1667
1663(autoload 'auto-revert-mode "autorevert" "\ 1668(autoload 'auto-revert-mode "autorevert" "\
@@ -1746,7 +1751,7 @@ specifies in the mode line.
1746;;;*** 1751;;;***
1747 1752
1748;;;### (autoloads (mouse-avoidance-mode mouse-avoidance-mode) "avoid" 1753;;;### (autoloads (mouse-avoidance-mode mouse-avoidance-mode) "avoid"
1749;;;;;; "avoid.el" (20119 34052)) 1754;;;;;; "avoid.el" (19845 45374))
1750;;; Generated autoloads from avoid.el 1755;;; Generated autoloads from avoid.el
1751 1756
1752(defvar mouse-avoidance-mode nil "\ 1757(defvar mouse-avoidance-mode nil "\
@@ -1787,7 +1792,7 @@ definition of \"random distance\".)
1787;;;*** 1792;;;***
1788 1793
1789;;;### (autoloads (display-battery-mode battery) "battery" "battery.el" 1794;;;### (autoloads (display-battery-mode battery) "battery" "battery.el"
1790;;;;;; (20126 50857)) 1795;;;;;; (20127 62865))
1791;;; Generated autoloads from battery.el 1796;;; Generated autoloads from battery.el
1792 (put 'battery-mode-line-string 'risky-local-variable t) 1797 (put 'battery-mode-line-string 'risky-local-variable t)
1793 1798
@@ -1823,7 +1828,7 @@ seconds.
1823;;;*** 1828;;;***
1824 1829
1825;;;### (autoloads (benchmark benchmark-run-compiled benchmark-run) 1830;;;### (autoloads (benchmark benchmark-run-compiled benchmark-run)
1826;;;;;; "benchmark" "emacs-lisp/benchmark.el" (20119 34052)) 1831;;;;;; "benchmark" "emacs-lisp/benchmark.el" (19981 40664))
1827;;; Generated autoloads from emacs-lisp/benchmark.el 1832;;; Generated autoloads from emacs-lisp/benchmark.el
1828 1833
1829(autoload 'benchmark-run "benchmark" "\ 1834(autoload 'benchmark-run "benchmark" "\
@@ -1856,7 +1861,7 @@ For non-interactive use see also `benchmark-run' and
1856;;;*** 1861;;;***
1857 1862
1858;;;### (autoloads (bibtex-search-entry bibtex-mode bibtex-initialize) 1863;;;### (autoloads (bibtex-search-entry bibtex-mode bibtex-initialize)
1859;;;;;; "bibtex" "textmodes/bibtex.el" (20119 34052)) 1864;;;;;; "bibtex" "textmodes/bibtex.el" (20174 10230))
1860;;; Generated autoloads from textmodes/bibtex.el 1865;;; Generated autoloads from textmodes/bibtex.el
1861 1866
1862(autoload 'bibtex-initialize "bibtex" "\ 1867(autoload 'bibtex-initialize "bibtex" "\
@@ -1945,7 +1950,7 @@ A prefix arg negates the value of `bibtex-search-entry-globally'.
1945;;;*** 1950;;;***
1946 1951
1947;;;### (autoloads (bibtex-style-mode) "bibtex-style" "textmodes/bibtex-style.el" 1952;;;### (autoloads (bibtex-style-mode) "bibtex-style" "textmodes/bibtex-style.el"
1948;;;;;; (20119 34052)) 1953;;;;;; (19863 8742))
1949;;; Generated autoloads from textmodes/bibtex-style.el 1954;;; Generated autoloads from textmodes/bibtex-style.el
1950 1955
1951(autoload 'bibtex-style-mode "bibtex-style" "\ 1956(autoload 'bibtex-style-mode "bibtex-style" "\
@@ -1957,10 +1962,11 @@ Major mode for editing BibTeX style files.
1957 1962
1958;;;### (autoloads (binhex-decode-region binhex-decode-region-external 1963;;;### (autoloads (binhex-decode-region binhex-decode-region-external
1959;;;;;; binhex-decode-region-internal) "binhex" "mail/binhex.el" 1964;;;;;; binhex-decode-region-internal) "binhex" "mail/binhex.el"
1960;;;;;; (20119 34052)) 1965;;;;;; (20174 10230))
1961;;; Generated autoloads from mail/binhex.el 1966;;; Generated autoloads from mail/binhex.el
1962 1967
1963(defconst binhex-begin-line "^:...............................................................$") 1968(defconst binhex-begin-line "^:...............................................................$" "\
1969Regular expression matching the start of a BinHex encoded region.")
1964 1970
1965(autoload 'binhex-decode-region-internal "binhex" "\ 1971(autoload 'binhex-decode-region-internal "binhex" "\
1966Binhex decode region between START and END without using an external program. 1972Binhex decode region between START and END without using an external program.
@@ -1980,8 +1986,8 @@ Binhex decode region between START and END.
1980 1986
1981;;;*** 1987;;;***
1982 1988
1983;;;### (autoloads (blackbox) "blackbox" "play/blackbox.el" (20119 1989;;;### (autoloads (blackbox) "blackbox" "play/blackbox.el" (19845
1984;;;;;; 34052)) 1990;;;;;; 45374))
1985;;; Generated autoloads from play/blackbox.el 1991;;; Generated autoloads from play/blackbox.el
1986 1992
1987(autoload 'blackbox "blackbox" "\ 1993(autoload 'blackbox "blackbox" "\
@@ -2104,7 +2110,7 @@ a reflection.
2104;;;;;; bookmark-save bookmark-write bookmark-delete bookmark-insert 2110;;;;;; bookmark-save bookmark-write bookmark-delete bookmark-insert
2105;;;;;; bookmark-rename bookmark-insert-location bookmark-relocate 2111;;;;;; bookmark-rename bookmark-insert-location bookmark-relocate
2106;;;;;; bookmark-jump-other-window bookmark-jump bookmark-set) "bookmark" 2112;;;;;; bookmark-jump-other-window bookmark-jump bookmark-set) "bookmark"
2107;;;;;; "bookmark.el" (20119 34052)) 2113;;;;;; "bookmark.el" (20178 7273))
2108;;; Generated autoloads from bookmark.el 2114;;; Generated autoloads from bookmark.el
2109 (define-key ctl-x-r-map "b" 'bookmark-jump) 2115 (define-key ctl-x-r-map "b" 'bookmark-jump)
2110 (define-key ctl-x-r-map "m" 'bookmark-set) 2116 (define-key ctl-x-r-map "m" 'bookmark-set)
@@ -2305,7 +2311,7 @@ Incremental search of bookmarks, hiding the non-matches as we go.
2305;;;;;; browse-url-xdg-open browse-url-at-mouse browse-url-at-point 2311;;;;;; browse-url-xdg-open browse-url-at-mouse browse-url-at-point
2306;;;;;; browse-url browse-url-of-region browse-url-of-dired-file 2312;;;;;; browse-url browse-url-of-region browse-url-of-dired-file
2307;;;;;; browse-url-of-buffer browse-url-of-file browse-url-browser-function) 2313;;;;;; browse-url-of-buffer browse-url-of-file browse-url-browser-function)
2308;;;;;; "browse-url" "net/browse-url.el" (20126 51279)) 2314;;;;;; "browse-url" "net/browse-url.el" (20168 57844))
2309;;; Generated autoloads from net/browse-url.el 2315;;; Generated autoloads from net/browse-url.el
2310 2316
2311(defvar browse-url-browser-function 'browse-url-default-browser "\ 2317(defvar browse-url-browser-function 'browse-url-default-browser "\
@@ -2618,8 +2624,8 @@ from `browse-url-elinks-wrapper'.
2618 2624
2619;;;*** 2625;;;***
2620 2626
2621;;;### (autoloads (snarf-bruces bruce) "bruce" "play/bruce.el" (20119 2627;;;### (autoloads (snarf-bruces bruce) "bruce" "play/bruce.el" (20165
2622;;;;;; 34052)) 2628;;;;;; 31925))
2623;;; Generated autoloads from play/bruce.el 2629;;; Generated autoloads from play/bruce.el
2624 2630
2625(autoload 'bruce "bruce" "\ 2631(autoload 'bruce "bruce" "\
@@ -2635,7 +2641,7 @@ Return a vector containing the lines from `bruce-phrases-file'.
2635;;;*** 2641;;;***
2636 2642
2637;;;### (autoloads (bs-show bs-customize bs-cycle-previous bs-cycle-next) 2643;;;### (autoloads (bs-show bs-customize bs-cycle-previous bs-cycle-next)
2638;;;;;; "bs" "bs.el" (20140 44207)) 2644;;;;;; "bs" "bs.el" (20161 45793))
2639;;; Generated autoloads from bs.el 2645;;; Generated autoloads from bs.el
2640 2646
2641(autoload 'bs-cycle-next "bs" "\ 2647(autoload 'bs-cycle-next "bs" "\
@@ -2675,7 +2681,7 @@ name of buffer configuration.
2675 2681
2676;;;*** 2682;;;***
2677 2683
2678;;;### (autoloads (bubbles) "bubbles" "play/bubbles.el" (20119 34052)) 2684;;;### (autoloads (bubbles) "bubbles" "play/bubbles.el" (20166 16092))
2679;;; Generated autoloads from play/bubbles.el 2685;;; Generated autoloads from play/bubbles.el
2680 2686
2681(autoload 'bubbles "bubbles" "\ 2687(autoload 'bubbles "bubbles" "\
@@ -2697,7 +2703,7 @@ columns on its right towards the left.
2697;;;*** 2703;;;***
2698 2704
2699;;;### (autoloads (bug-reference-prog-mode bug-reference-mode) "bug-reference" 2705;;;### (autoloads (bug-reference-prog-mode bug-reference-mode) "bug-reference"
2700;;;;;; "progmodes/bug-reference.el" (20127 25733)) 2706;;;;;; "progmodes/bug-reference.el" (20127 62865))
2701;;; Generated autoloads from progmodes/bug-reference.el 2707;;; Generated autoloads from progmodes/bug-reference.el
2702 2708
2703(put 'bug-reference-url-format 'safe-local-variable (lambda (s) (or (stringp s) (and (symbolp s) (get s 'bug-reference-url-format))))) 2709(put 'bug-reference-url-format 'safe-local-variable (lambda (s) (or (stringp s) (and (symbolp s) (get s 'bug-reference-url-format)))))
@@ -2721,7 +2727,7 @@ Like `bug-reference-mode', but only buttonize in comments and strings.
2721;;;;;; batch-byte-compile-if-not-done display-call-tree byte-compile 2727;;;;;; batch-byte-compile-if-not-done display-call-tree byte-compile
2722;;;;;; compile-defun byte-compile-file byte-recompile-directory 2728;;;;;; compile-defun byte-compile-file byte-recompile-directory
2723;;;;;; byte-force-recompile byte-compile-enable-warning byte-compile-disable-warning) 2729;;;;;; byte-force-recompile byte-compile-enable-warning byte-compile-disable-warning)
2724;;;;;; "bytecomp" "emacs-lisp/bytecomp.el" (20119 34052)) 2730;;;;;; "bytecomp" "emacs-lisp/bytecomp.el" (20178 7273))
2725;;; Generated autoloads from emacs-lisp/bytecomp.el 2731;;; Generated autoloads from emacs-lisp/bytecomp.el
2726(put 'byte-compile-dynamic 'safe-local-variable 'booleanp) 2732(put 'byte-compile-dynamic 'safe-local-variable 'booleanp)
2727(put 'byte-compile-disable-print-circle 'safe-local-variable 'booleanp) 2733(put 'byte-compile-disable-print-circle 'safe-local-variable 'booleanp)
@@ -2841,8 +2847,8 @@ and corresponding effects.
2841 2847
2842;;;*** 2848;;;***
2843 2849
2844;;;### (autoloads nil "cal-china" "calendar/cal-china.el" (20119 2850;;;### (autoloads nil "cal-china" "calendar/cal-china.el" (19885
2845;;;;;; 34052)) 2851;;;;;; 24894))
2846;;; Generated autoloads from calendar/cal-china.el 2852;;; Generated autoloads from calendar/cal-china.el
2847 2853
2848(put 'calendar-chinese-time-zone 'risky-local-variable t) 2854(put 'calendar-chinese-time-zone 'risky-local-variable t)
@@ -2851,7 +2857,7 @@ and corresponding effects.
2851 2857
2852;;;*** 2858;;;***
2853 2859
2854;;;### (autoloads nil "cal-dst" "calendar/cal-dst.el" (20119 34052)) 2860;;;### (autoloads nil "cal-dst" "calendar/cal-dst.el" (19885 24894))
2855;;; Generated autoloads from calendar/cal-dst.el 2861;;; Generated autoloads from calendar/cal-dst.el
2856 2862
2857(put 'calendar-daylight-savings-starts 'risky-local-variable t) 2863(put 'calendar-daylight-savings-starts 'risky-local-variable t)
@@ -2863,7 +2869,7 @@ and corresponding effects.
2863;;;*** 2869;;;***
2864 2870
2865;;;### (autoloads (calendar-hebrew-list-yahrzeits) "cal-hebrew" "calendar/cal-hebrew.el" 2871;;;### (autoloads (calendar-hebrew-list-yahrzeits) "cal-hebrew" "calendar/cal-hebrew.el"
2866;;;;;; (20119 34052)) 2872;;;;;; (19885 24894))
2867;;; Generated autoloads from calendar/cal-hebrew.el 2873;;; Generated autoloads from calendar/cal-hebrew.el
2868 2874
2869(autoload 'calendar-hebrew-list-yahrzeits "cal-hebrew" "\ 2875(autoload 'calendar-hebrew-list-yahrzeits "cal-hebrew" "\
@@ -2879,8 +2885,8 @@ from the cursor position.
2879 2885
2880;;;### (autoloads (defmath calc-embedded-activate calc-embedded calc-grab-rectangle 2886;;;### (autoloads (defmath calc-embedded-activate calc-embedded calc-grab-rectangle
2881;;;;;; calc-grab-region full-calc-keypad calc-keypad calc-eval quick-calc 2887;;;;;; calc-grab-region full-calc-keypad calc-keypad calc-eval quick-calc
2882;;;;;; full-calc calc calc-dispatch) "calc" "calc/calc.el" (20119 2888;;;;;; full-calc calc calc-dispatch) "calc" "calc/calc.el" (20172
2883;;;;;; 34052)) 2889;;;;;; 54913))
2884;;; Generated autoloads from calc/calc.el 2890;;; Generated autoloads from calc/calc.el
2885 (define-key ctl-x-map "*" 'calc-dispatch) 2891 (define-key ctl-x-map "*" 'calc-dispatch)
2886 2892
@@ -2964,8 +2970,8 @@ See Info node `(calc)Defining Functions'.
2964 2970
2965;;;*** 2971;;;***
2966 2972
2967;;;### (autoloads (calc-undo) "calc-undo" "calc/calc-undo.el" (20119 2973;;;### (autoloads (calc-undo) "calc-undo" "calc/calc-undo.el" (19845
2968;;;;;; 34052)) 2974;;;;;; 45374))
2969;;; Generated autoloads from calc/calc-undo.el 2975;;; Generated autoloads from calc/calc-undo.el
2970 2976
2971(autoload 'calc-undo "calc-undo" "\ 2977(autoload 'calc-undo "calc-undo" "\
@@ -2975,8 +2981,8 @@ See Info node `(calc)Defining Functions'.
2975 2981
2976;;;*** 2982;;;***
2977 2983
2978;;;### (autoloads (calculator) "calculator" "calculator.el" (20140 2984;;;### (autoloads (calculator) "calculator" "calculator.el" (20141
2979;;;;;; 44219)) 2985;;;;;; 9296))
2980;;; Generated autoloads from calculator.el 2986;;; Generated autoloads from calculator.el
2981 2987
2982(autoload 'calculator "calculator" "\ 2988(autoload 'calculator "calculator" "\
@@ -2988,7 +2994,7 @@ See the documentation for `calculator-mode' for more information.
2988;;;*** 2994;;;***
2989 2995
2990;;;### (autoloads (calendar) "calendar" "calendar/calendar.el" (20141 2996;;;### (autoloads (calendar) "calendar" "calendar/calendar.el" (20141
2991;;;;;; 25678)) 2997;;;;;; 9296))
2992;;; Generated autoloads from calendar/calendar.el 2998;;; Generated autoloads from calendar/calendar.el
2993 2999
2994(autoload 'calendar "calendar" "\ 3000(autoload 'calendar "calendar" "\
@@ -3032,7 +3038,7 @@ This function is suitable for execution in a .emacs file.
3032;;;*** 3038;;;***
3033 3039
3034;;;### (autoloads (canlock-verify canlock-insert-header) "canlock" 3040;;;### (autoloads (canlock-verify canlock-insert-header) "canlock"
3035;;;;;; "gnus/canlock.el" (20119 34052)) 3041;;;;;; "gnus/canlock.el" (19845 45374))
3036;;; Generated autoloads from gnus/canlock.el 3042;;; Generated autoloads from gnus/canlock.el
3037 3043
3038(autoload 'canlock-insert-header "canlock" "\ 3044(autoload 'canlock-insert-header "canlock" "\
@@ -3050,7 +3056,7 @@ it fails.
3050;;;*** 3056;;;***
3051 3057
3052;;;### (autoloads (capitalized-words-mode) "cap-words" "progmodes/cap-words.el" 3058;;;### (autoloads (capitalized-words-mode) "cap-words" "progmodes/cap-words.el"
3053;;;;;; (20127 25639)) 3059;;;;;; (20127 62865))
3054;;; Generated autoloads from progmodes/cap-words.el 3060;;; Generated autoloads from progmodes/cap-words.el
3055 3061
3056(autoload 'capitalized-words-mode "cap-words" "\ 3062(autoload 'capitalized-words-mode "cap-words" "\
@@ -3089,15 +3095,15 @@ Obsoletes `c-forward-into-nomenclature'.
3089 3095
3090;;;*** 3096;;;***
3091 3097
3092;;;### (autoloads nil "cc-compat" "progmodes/cc-compat.el" (20119 3098;;;### (autoloads nil "cc-compat" "progmodes/cc-compat.el" (19845
3093;;;;;; 34052)) 3099;;;;;; 45374))
3094;;; Generated autoloads from progmodes/cc-compat.el 3100;;; Generated autoloads from progmodes/cc-compat.el
3095(put 'c-indent-level 'safe-local-variable 'integerp) 3101(put 'c-indent-level 'safe-local-variable 'integerp)
3096 3102
3097;;;*** 3103;;;***
3098 3104
3099;;;### (autoloads (c-guess-basic-syntax) "cc-engine" "progmodes/cc-engine.el" 3105;;;### (autoloads (c-guess-basic-syntax) "cc-engine" "progmodes/cc-engine.el"
3100;;;;;; (20139 28158)) 3106;;;;;; (20172 54913))
3101;;; Generated autoloads from progmodes/cc-engine.el 3107;;; Generated autoloads from progmodes/cc-engine.el
3102 3108
3103(autoload 'c-guess-basic-syntax "cc-engine" "\ 3109(autoload 'c-guess-basic-syntax "cc-engine" "\
@@ -3109,7 +3115,7 @@ Return the syntactic context of the current line.
3109 3115
3110;;;### (autoloads (c-guess-install c-guess-region-no-install c-guess-region 3116;;;### (autoloads (c-guess-install c-guess-region-no-install c-guess-region
3111;;;;;; c-guess-buffer-no-install c-guess-buffer c-guess-no-install 3117;;;;;; c-guess-buffer-no-install c-guess-buffer c-guess-no-install
3112;;;;;; c-guess) "cc-guess" "progmodes/cc-guess.el" (20119 34052)) 3118;;;;;; c-guess) "cc-guess" "progmodes/cc-guess.el" (19981 40664))
3113;;; Generated autoloads from progmodes/cc-guess.el 3119;;; Generated autoloads from progmodes/cc-guess.el
3114 3120
3115(defvar c-guess-guessed-offsets-alist nil "\ 3121(defvar c-guess-guessed-offsets-alist nil "\
@@ -3209,7 +3215,7 @@ the absolute file name of the file if STYLE-NAME is nil.
3209 3215
3210;;;### (autoloads (awk-mode pike-mode idl-mode java-mode objc-mode 3216;;;### (autoloads (awk-mode pike-mode idl-mode java-mode objc-mode
3211;;;;;; c++-mode c-mode c-initialize-cc-mode) "cc-mode" "progmodes/cc-mode.el" 3217;;;;;; c++-mode c-mode c-initialize-cc-mode) "cc-mode" "progmodes/cc-mode.el"
3212;;;;;; (20138 48832)) 3218;;;;;; (20168 57844))
3213;;; Generated autoloads from progmodes/cc-mode.el 3219;;; Generated autoloads from progmodes/cc-mode.el
3214 3220
3215(autoload 'c-initialize-cc-mode "cc-mode" "\ 3221(autoload 'c-initialize-cc-mode "cc-mode" "\
@@ -3386,7 +3392,7 @@ Key bindings:
3386;;;*** 3392;;;***
3387 3393
3388;;;### (autoloads (c-set-offset c-add-style c-set-style) "cc-styles" 3394;;;### (autoloads (c-set-offset c-add-style c-set-style) "cc-styles"
3389;;;;;; "progmodes/cc-styles.el" (20119 34052)) 3395;;;;;; "progmodes/cc-styles.el" (19981 40664))
3390;;; Generated autoloads from progmodes/cc-styles.el 3396;;; Generated autoloads from progmodes/cc-styles.el
3391 3397
3392(autoload 'c-set-style "cc-styles" "\ 3398(autoload 'c-set-style "cc-styles" "\
@@ -3437,7 +3443,7 @@ and exists only for compatibility reasons.
3437 3443
3438;;;*** 3444;;;***
3439 3445
3440;;;### (autoloads nil "cc-vars" "progmodes/cc-vars.el" (20139 28158)) 3446;;;### (autoloads nil "cc-vars" "progmodes/cc-vars.el" (20167 36967))
3441;;; Generated autoloads from progmodes/cc-vars.el 3447;;; Generated autoloads from progmodes/cc-vars.el
3442(put 'c-basic-offset 'safe-local-variable 'integerp) 3448(put 'c-basic-offset 'safe-local-variable 'integerp)
3443(put 'c-backslash-column 'safe-local-variable 'integerp) 3449(put 'c-backslash-column 'safe-local-variable 'integerp)
@@ -3447,7 +3453,7 @@ and exists only for compatibility reasons.
3447 3453
3448;;;### (autoloads (ccl-execute-with-args check-ccl-program define-ccl-program 3454;;;### (autoloads (ccl-execute-with-args check-ccl-program define-ccl-program
3449;;;;;; declare-ccl-program ccl-dump ccl-compile) "ccl" "international/ccl.el" 3455;;;;;; declare-ccl-program ccl-dump ccl-compile) "ccl" "international/ccl.el"
3450;;;;;; (20119 34052)) 3456;;;;;; (19943 25429))
3451;;; Generated autoloads from international/ccl.el 3457;;; Generated autoloads from international/ccl.el
3452 3458
3453(autoload 'ccl-compile "ccl" "\ 3459(autoload 'ccl-compile "ccl" "\
@@ -3708,7 +3714,7 @@ See the documentation of `define-ccl-program' for the detail of CCL program.
3708;;;*** 3714;;;***
3709 3715
3710;;;### (autoloads (cconv-closure-convert) "cconv" "emacs-lisp/cconv.el" 3716;;;### (autoloads (cconv-closure-convert) "cconv" "emacs-lisp/cconv.el"
3711;;;;;; (20119 34052)) 3717;;;;;; (20178 7273))
3712;;; Generated autoloads from emacs-lisp/cconv.el 3718;;; Generated autoloads from emacs-lisp/cconv.el
3713 3719
3714(autoload 'cconv-closure-convert "cconv" "\ 3720(autoload 'cconv-closure-convert "cconv" "\
@@ -3723,7 +3729,7 @@ Returns a form where all lambdas don't have any free variables.
3723;;;*** 3729;;;***
3724 3730
3725;;;### (autoloads (cfengine-auto-mode cfengine-mode cfengine3-mode) 3731;;;### (autoloads (cfengine-auto-mode cfengine-mode cfengine3-mode)
3726;;;;;; "cfengine" "progmodes/cfengine.el" (20119 34052)) 3732;;;;;; "cfengine" "progmodes/cfengine.el" (20168 57844))
3727;;; Generated autoloads from progmodes/cfengine.el 3733;;; Generated autoloads from progmodes/cfengine.el
3728 3734
3729(autoload 'cfengine3-mode "cfengine" "\ 3735(autoload 'cfengine3-mode "cfengine" "\
@@ -3753,7 +3759,7 @@ on the buffer contents
3753;;;*** 3759;;;***
3754 3760
3755;;;### (autoloads (check-declare-directory check-declare-file) "check-declare" 3761;;;### (autoloads (check-declare-directory check-declare-file) "check-declare"
3756;;;;;; "emacs-lisp/check-declare.el" (20119 34052)) 3762;;;;;; "emacs-lisp/check-declare.el" (19906 31087))
3757;;; Generated autoloads from emacs-lisp/check-declare.el 3763;;; Generated autoloads from emacs-lisp/check-declare.el
3758 3764
3759(autoload 'check-declare-file "check-declare" "\ 3765(autoload 'check-declare-file "check-declare" "\
@@ -3778,7 +3784,7 @@ Returns non-nil if any false statements are found.
3778;;;;;; checkdoc-comments checkdoc-continue checkdoc-start checkdoc-current-buffer 3784;;;;;; checkdoc-comments checkdoc-continue checkdoc-start checkdoc-current-buffer
3779;;;;;; checkdoc-eval-current-buffer checkdoc-message-interactive 3785;;;;;; checkdoc-eval-current-buffer checkdoc-message-interactive
3780;;;;;; checkdoc-interactive checkdoc checkdoc-list-of-strings-p) 3786;;;;;; checkdoc-interactive checkdoc checkdoc-list-of-strings-p)
3781;;;;;; "checkdoc" "emacs-lisp/checkdoc.el" (20127 23374)) 3787;;;;;; "checkdoc" "emacs-lisp/checkdoc.el" (20168 57844))
3782;;; Generated autoloads from emacs-lisp/checkdoc.el 3788;;; Generated autoloads from emacs-lisp/checkdoc.el
3783(put 'checkdoc-force-docstrings-flag 'safe-local-variable 'booleanp) 3789(put 'checkdoc-force-docstrings-flag 'safe-local-variable 'booleanp)
3784(put 'checkdoc-force-history-flag 'safe-local-variable 'booleanp) 3790(put 'checkdoc-force-history-flag 'safe-local-variable 'booleanp)
@@ -3974,7 +3980,7 @@ checking of documentation strings.
3974 3980
3975;;;### (autoloads (pre-write-encode-hz post-read-decode-hz encode-hz-buffer 3981;;;### (autoloads (pre-write-encode-hz post-read-decode-hz encode-hz-buffer
3976;;;;;; encode-hz-region decode-hz-buffer decode-hz-region) "china-util" 3982;;;;;; encode-hz-region decode-hz-buffer decode-hz-region) "china-util"
3977;;;;;; "language/china-util.el" (20119 34052)) 3983;;;;;; "language/china-util.el" (19845 45374))
3978;;; Generated autoloads from language/china-util.el 3984;;; Generated autoloads from language/china-util.el
3979 3985
3980(autoload 'decode-hz-region "china-util" "\ 3986(autoload 'decode-hz-region "china-util" "\
@@ -4012,7 +4018,7 @@ Encode the text in the current buffer to HZ.
4012;;;*** 4018;;;***
4013 4019
4014;;;### (autoloads (command-history list-command-history repeat-matching-complex-command) 4020;;;### (autoloads (command-history list-command-history repeat-matching-complex-command)
4015;;;;;; "chistory" "chistory.el" (20119 34052)) 4021;;;;;; "chistory" "chistory.el" (19845 45374))
4016;;; Generated autoloads from chistory.el 4022;;; Generated autoloads from chistory.el
4017 4023
4018(autoload 'repeat-matching-complex-command "chistory" "\ 4024(autoload 'repeat-matching-complex-command "chistory" "\
@@ -4051,7 +4057,7 @@ and runs the normal hook `command-history-hook'.
4051 4057
4052;;;*** 4058;;;***
4053 4059
4054;;;### (autoloads nil "cl" "emacs-lisp/cl.el" (20138 48832)) 4060;;;### (autoloads nil "cl" "emacs-lisp/cl.el" (20137 45833))
4055;;; Generated autoloads from emacs-lisp/cl.el 4061;;; Generated autoloads from emacs-lisp/cl.el
4056 4062
4057(defvar custom-print-functions nil "\ 4063(defvar custom-print-functions nil "\
@@ -4067,7 +4073,7 @@ a future Emacs interpreter will be able to use it.")
4067;;;*** 4073;;;***
4068 4074
4069;;;### (autoloads (common-lisp-indent-function) "cl-indent" "emacs-lisp/cl-indent.el" 4075;;;### (autoloads (common-lisp-indent-function) "cl-indent" "emacs-lisp/cl-indent.el"
4070;;;;;; (20119 34052)) 4076;;;;;; (20170 64186))
4071;;; Generated autoloads from emacs-lisp/cl-indent.el 4077;;; Generated autoloads from emacs-lisp/cl-indent.el
4072 4078
4073(autoload 'common-lisp-indent-function "cl-indent" "\ 4079(autoload 'common-lisp-indent-function "cl-indent" "\
@@ -4146,7 +4152,7 @@ For example, the function `case' has an indent property
4146;;;*** 4152;;;***
4147 4153
4148;;;### (autoloads (c-macro-expand) "cmacexp" "progmodes/cmacexp.el" 4154;;;### (autoloads (c-macro-expand) "cmacexp" "progmodes/cmacexp.el"
4149;;;;;; (20119 34052)) 4155;;;;;; (19845 45374))
4150;;; Generated autoloads from progmodes/cmacexp.el 4156;;; Generated autoloads from progmodes/cmacexp.el
4151 4157
4152(autoload 'c-macro-expand "cmacexp" "\ 4158(autoload 'c-macro-expand "cmacexp" "\
@@ -4166,8 +4172,8 @@ For use inside Lisp programs, see also `c-macro-expansion'.
4166 4172
4167;;;*** 4173;;;***
4168 4174
4169;;;### (autoloads (run-scheme) "cmuscheme" "cmuscheme.el" (20119 4175;;;### (autoloads (run-scheme) "cmuscheme" "cmuscheme.el" (20092
4170;;;;;; 34052)) 4176;;;;;; 23754))
4171;;; Generated autoloads from cmuscheme.el 4177;;; Generated autoloads from cmuscheme.el
4172 4178
4173(autoload 'run-scheme "cmuscheme" "\ 4179(autoload 'run-scheme "cmuscheme" "\
@@ -4187,7 +4193,7 @@ is run).
4187 4193
4188;;;*** 4194;;;***
4189 4195
4190;;;### (autoloads (color-name-to-rgb) "color" "color.el" (20119 34052)) 4196;;;### (autoloads (color-name-to-rgb) "color" "color.el" (20175 31160))
4191;;; Generated autoloads from color.el 4197;;; Generated autoloads from color.el
4192 4198
4193(autoload 'color-name-to-rgb "color" "\ 4199(autoload 'color-name-to-rgb "color" "\
@@ -4209,7 +4215,7 @@ If FRAME cannot display COLOR, return nil.
4209;;;### (autoloads (comint-redirect-results-list-from-process comint-redirect-results-list 4215;;;### (autoloads (comint-redirect-results-list-from-process comint-redirect-results-list
4210;;;;;; comint-redirect-send-command-to-process comint-redirect-send-command 4216;;;;;; comint-redirect-send-command-to-process comint-redirect-send-command
4211;;;;;; comint-run make-comint make-comint-in-buffer) "comint" "comint.el" 4217;;;;;; comint-run make-comint make-comint-in-buffer) "comint" "comint.el"
4212;;;;;; (20135 20784)) 4218;;;;;; (20168 57844))
4213;;; Generated autoloads from comint.el 4219;;; Generated autoloads from comint.el
4214 4220
4215(defvar comint-output-filter-functions '(comint-postoutput-scroll-to-bottom comint-watch-for-password-prompt) "\ 4221(defvar comint-output-filter-functions '(comint-postoutput-scroll-to-bottom comint-watch-for-password-prompt) "\
@@ -4304,7 +4310,7 @@ REGEXP-GROUP is the regular expression group in REGEXP to use.
4304;;;*** 4310;;;***
4305 4311
4306;;;### (autoloads (compare-windows) "compare-w" "vc/compare-w.el" 4312;;;### (autoloads (compare-windows) "compare-w" "vc/compare-w.el"
4307;;;;;; (20119 34052)) 4313;;;;;; (19845 45374))
4308;;; Generated autoloads from vc/compare-w.el 4314;;; Generated autoloads from vc/compare-w.el
4309 4315
4310(autoload 'compare-windows "compare-w" "\ 4316(autoload 'compare-windows "compare-w" "\
@@ -4341,8 +4347,8 @@ on third call it again advances points to the next difference and so on.
4341;;;;;; compilation-shell-minor-mode compilation-mode compilation-start 4347;;;;;; compilation-shell-minor-mode compilation-mode compilation-start
4342;;;;;; compile compilation-disable-input compile-command compilation-search-path 4348;;;;;; compile compilation-disable-input compile-command compilation-search-path
4343;;;;;; compilation-ask-about-save compilation-window-height compilation-start-hook 4349;;;;;; compilation-ask-about-save compilation-window-height compilation-start-hook
4344;;;;;; compilation-mode-hook) "compile" "progmodes/compile.el" (20127 4350;;;;;; compilation-mode-hook) "compile" "progmodes/compile.el" (20167
4345;;;;;; 25602)) 4351;;;;;; 36967))
4346;;; Generated autoloads from progmodes/compile.el 4352;;; Generated autoloads from progmodes/compile.el
4347 4353
4348(defvar compilation-mode-hook nil "\ 4354(defvar compilation-mode-hook nil "\
@@ -4522,7 +4528,7 @@ This is the value of `next-error-function' in Compilation buffers.
4522;;;*** 4528;;;***
4523 4529
4524;;;### (autoloads (dynamic-completion-mode) "completion" "completion.el" 4530;;;### (autoloads (dynamic-completion-mode) "completion" "completion.el"
4525;;;;;; (20119 34052)) 4531;;;;;; (19886 45771))
4526;;; Generated autoloads from completion.el 4532;;; Generated autoloads from completion.el
4527 4533
4528(defvar dynamic-completion-mode nil "\ 4534(defvar dynamic-completion-mode nil "\
@@ -4544,7 +4550,7 @@ Enable dynamic word-completion.
4544;;;### (autoloads (conf-xdefaults-mode conf-ppd-mode conf-colon-mode 4550;;;### (autoloads (conf-xdefaults-mode conf-ppd-mode conf-colon-mode
4545;;;;;; conf-space-keywords conf-space-mode conf-javaprop-mode conf-windows-mode 4551;;;;;; conf-space-keywords conf-space-mode conf-javaprop-mode conf-windows-mode
4546;;;;;; conf-unix-mode conf-mode) "conf-mode" "textmodes/conf-mode.el" 4552;;;;;; conf-unix-mode conf-mode) "conf-mode" "textmodes/conf-mode.el"
4547;;;;;; (20119 34052)) 4553;;;;;; (20178 7273))
4548;;; Generated autoloads from textmodes/conf-mode.el 4554;;; Generated autoloads from textmodes/conf-mode.el
4549 4555
4550(autoload 'conf-mode "conf-mode" "\ 4556(autoload 'conf-mode "conf-mode" "\
@@ -4700,7 +4706,7 @@ For details see `conf-mode'. Example:
4700;;;*** 4706;;;***
4701 4707
4702;;;### (autoloads (shuffle-vector cookie-snarf cookie-insert cookie) 4708;;;### (autoloads (shuffle-vector cookie-snarf cookie-insert cookie)
4703;;;;;; "cookie1" "play/cookie1.el" (20119 34052)) 4709;;;;;; "cookie1" "play/cookie1.el" (19845 45374))
4704;;; Generated autoloads from play/cookie1.el 4710;;; Generated autoloads from play/cookie1.el
4705 4711
4706(autoload 'cookie "cookie1" "\ 4712(autoload 'cookie "cookie1" "\
@@ -4732,8 +4738,8 @@ Randomly permute the elements of VECTOR (all permutations equally likely).
4732;;;*** 4738;;;***
4733 4739
4734;;;### (autoloads (copyright-update-directory copyright copyright-fix-years 4740;;;### (autoloads (copyright-update-directory copyright copyright-fix-years
4735;;;;;; copyright-update) "copyright" "emacs-lisp/copyright.el" (20119 4741;;;;;; copyright-update) "copyright" "emacs-lisp/copyright.el" (19845
4736;;;;;; 34052)) 4742;;;;;; 45374))
4737;;; Generated autoloads from emacs-lisp/copyright.el 4743;;; Generated autoloads from emacs-lisp/copyright.el
4738(put 'copyright-at-end-flag 'safe-local-variable 'booleanp) 4744(put 'copyright-at-end-flag 'safe-local-variable 'booleanp)
4739(put 'copyright-names-regexp 'safe-local-variable 'stringp) 4745(put 'copyright-names-regexp 'safe-local-variable 'stringp)
@@ -4772,7 +4778,7 @@ If FIX is non-nil, run `copyright-fix-years' instead.
4772;;;*** 4778;;;***
4773 4779
4774;;;### (autoloads (cperl-perldoc-at-point cperl-perldoc cperl-mode) 4780;;;### (autoloads (cperl-perldoc-at-point cperl-perldoc cperl-mode)
4775;;;;;; "cperl-mode" "progmodes/cperl-mode.el" (20119 34052)) 4781;;;;;; "cperl-mode" "progmodes/cperl-mode.el" (20178 7273))
4776;;; Generated autoloads from progmodes/cperl-mode.el 4782;;; Generated autoloads from progmodes/cperl-mode.el
4777(put 'cperl-indent-level 'safe-local-variable 'integerp) 4783(put 'cperl-indent-level 'safe-local-variable 'integerp)
4778(put 'cperl-brace-offset 'safe-local-variable 'integerp) 4784(put 'cperl-brace-offset 'safe-local-variable 'integerp)
@@ -4971,7 +4977,7 @@ Run a `perldoc' on the word around point.
4971;;;*** 4977;;;***
4972 4978
4973;;;### (autoloads (cpp-parse-edit cpp-highlight-buffer) "cpp" "progmodes/cpp.el" 4979;;;### (autoloads (cpp-parse-edit cpp-highlight-buffer) "cpp" "progmodes/cpp.el"
4974;;;;;; (20119 34052)) 4980;;;;;; (20104 14925))
4975;;; Generated autoloads from progmodes/cpp.el 4981;;; Generated autoloads from progmodes/cpp.el
4976 4982
4977(autoload 'cpp-highlight-buffer "cpp" "\ 4983(autoload 'cpp-highlight-buffer "cpp" "\
@@ -4990,7 +4996,7 @@ Edit display information for cpp conditionals.
4990;;;*** 4996;;;***
4991 4997
4992;;;### (autoloads (crisp-mode crisp-mode) "crisp" "emulation/crisp.el" 4998;;;### (autoloads (crisp-mode crisp-mode) "crisp" "emulation/crisp.el"
4993;;;;;; (20140 44288)) 4999;;;;;; (20161 45793))
4994;;; Generated autoloads from emulation/crisp.el 5000;;; Generated autoloads from emulation/crisp.el
4995 5001
4996(defvar crisp-mode nil "\ 5002(defvar crisp-mode nil "\
@@ -5016,7 +5022,7 @@ if ARG is omitted or nil.
5016;;;*** 5022;;;***
5017 5023
5018;;;### (autoloads (completing-read-multiple) "crm" "emacs-lisp/crm.el" 5024;;;### (autoloads (completing-read-multiple) "crm" "emacs-lisp/crm.el"
5019;;;;;; (20119 34052)) 5025;;;;;; (19845 45374))
5020;;; Generated autoloads from emacs-lisp/crm.el 5026;;; Generated autoloads from emacs-lisp/crm.el
5021 5027
5022(autoload 'completing-read-multiple "crm" "\ 5028(autoload 'completing-read-multiple "crm" "\
@@ -5051,8 +5057,8 @@ INHERIT-INPUT-METHOD.
5051 5057
5052;;;*** 5058;;;***
5053 5059
5054;;;### (autoloads (css-mode) "css-mode" "textmodes/css-mode.el" (20119 5060;;;### (autoloads (css-mode) "css-mode" "textmodes/css-mode.el" (19978
5055;;;;;; 34052)) 5061;;;;;; 37530))
5056;;; Generated autoloads from textmodes/css-mode.el 5062;;; Generated autoloads from textmodes/css-mode.el
5057 5063
5058(autoload 'css-mode "css-mode" "\ 5064(autoload 'css-mode "css-mode" "\
@@ -5063,7 +5069,7 @@ Major mode to edit Cascading Style Sheets.
5063;;;*** 5069;;;***
5064 5070
5065;;;### (autoloads (cua-selection-mode cua-mode) "cua-base" "emulation/cua-base.el" 5071;;;### (autoloads (cua-selection-mode cua-mode) "cua-base" "emulation/cua-base.el"
5066;;;;;; (20128 38948)) 5072;;;;;; (20127 62865))
5067;;; Generated autoloads from emulation/cua-base.el 5073;;; Generated autoloads from emulation/cua-base.el
5068 5074
5069(defvar cua-mode nil "\ 5075(defvar cua-mode nil "\
@@ -5123,7 +5129,7 @@ Enable CUA selection mode without the C-z/C-x/C-c/C-v bindings.
5123;;;;;; customize-mode customize customize-push-and-save customize-save-variable 5129;;;;;; customize-mode customize customize-push-and-save customize-save-variable
5124;;;;;; customize-set-variable customize-set-value custom-menu-sort-alphabetically 5130;;;;;; customize-set-variable customize-set-value custom-menu-sort-alphabetically
5125;;;;;; custom-buffer-sort-alphabetically custom-browse-sort-alphabetically) 5131;;;;;; custom-buffer-sort-alphabetically custom-browse-sort-alphabetically)
5126;;;;;; "cus-edit" "cus-edit.el" (20119 34052)) 5132;;;;;; "cus-edit" "cus-edit.el" (20179 28130))
5127;;; Generated autoloads from cus-edit.el 5133;;; Generated autoloads from cus-edit.el
5128 5134
5129(defvar custom-browse-sort-alphabetically nil "\ 5135(defvar custom-browse-sort-alphabetically nil "\
@@ -5439,8 +5445,8 @@ The format is suitable for use with `easy-menu-define'.
5439;;;*** 5445;;;***
5440 5446
5441;;;### (autoloads (customize-themes describe-theme custom-theme-visit-theme 5447;;;### (autoloads (customize-themes describe-theme custom-theme-visit-theme
5442;;;;;; customize-create-theme) "cus-theme" "cus-theme.el" (20119 5448;;;;;; customize-create-theme) "cus-theme" "cus-theme.el" (20059
5443;;;;;; 34052)) 5449;;;;;; 26455))
5444;;; Generated autoloads from cus-theme.el 5450;;; Generated autoloads from cus-theme.el
5445 5451
5446(autoload 'customize-create-theme "cus-theme" "\ 5452(autoload 'customize-create-theme "cus-theme" "\
@@ -5472,7 +5478,7 @@ omitted, a buffer named *Custom Themes* is used.
5472;;;*** 5478;;;***
5473 5479
5474;;;### (autoloads (cvs-status-mode) "cvs-status" "vc/cvs-status.el" 5480;;;### (autoloads (cvs-status-mode) "cvs-status" "vc/cvs-status.el"
5475;;;;;; (20119 34052)) 5481;;;;;; (20174 10230))
5476;;; Generated autoloads from vc/cvs-status.el 5482;;; Generated autoloads from vc/cvs-status.el
5477 5483
5478(autoload 'cvs-status-mode "cvs-status" "\ 5484(autoload 'cvs-status-mode "cvs-status" "\
@@ -5483,7 +5489,7 @@ Mode used for cvs status output.
5483;;;*** 5489;;;***
5484 5490
5485;;;### (autoloads (global-cwarn-mode turn-on-cwarn-mode cwarn-mode) 5491;;;### (autoloads (global-cwarn-mode turn-on-cwarn-mode cwarn-mode)
5486;;;;;; "cwarn" "progmodes/cwarn.el" (20119 34052)) 5492;;;;;; "cwarn" "progmodes/cwarn.el" (20168 57844))
5487;;; Generated autoloads from progmodes/cwarn.el 5493;;; Generated autoloads from progmodes/cwarn.el
5488 5494
5489(autoload 'cwarn-mode "cwarn" "\ 5495(autoload 'cwarn-mode "cwarn" "\
@@ -5532,7 +5538,7 @@ See `cwarn-mode' for more information on Cwarn mode.
5532 5538
5533;;;### (autoloads (standard-display-cyrillic-translit cyrillic-encode-alternativnyj-char 5539;;;### (autoloads (standard-display-cyrillic-translit cyrillic-encode-alternativnyj-char
5534;;;;;; cyrillic-encode-koi8-r-char) "cyril-util" "language/cyril-util.el" 5540;;;;;; cyrillic-encode-koi8-r-char) "cyril-util" "language/cyril-util.el"
5535;;;;;; (20119 34052)) 5541;;;;;; (19845 45374))
5536;;; Generated autoloads from language/cyril-util.el 5542;;; Generated autoloads from language/cyril-util.el
5537 5543
5538(autoload 'cyrillic-encode-koi8-r-char "cyril-util" "\ 5544(autoload 'cyrillic-encode-koi8-r-char "cyril-util" "\
@@ -5561,7 +5567,7 @@ If the argument is nil, we return the display table to its standard state.
5561;;;*** 5567;;;***
5562 5568
5563;;;### (autoloads (dabbrev-expand dabbrev-completion) "dabbrev" "dabbrev.el" 5569;;;### (autoloads (dabbrev-expand dabbrev-completion) "dabbrev" "dabbrev.el"
5564;;;;;; (20119 34052)) 5570;;;;;; (19989 34789))
5565;;; Generated autoloads from dabbrev.el 5571;;; Generated autoloads from dabbrev.el
5566(put 'dabbrev-case-fold-search 'risky-local-variable t) 5572(put 'dabbrev-case-fold-search 'risky-local-variable t)
5567(put 'dabbrev-case-replace 'risky-local-variable t) 5573(put 'dabbrev-case-replace 'risky-local-variable t)
@@ -5608,7 +5614,7 @@ See also `dabbrev-abbrev-char-regexp' and \\[dabbrev-completion].
5608;;;*** 5614;;;***
5609 5615
5610;;;### (autoloads (data-debug-new-buffer) "data-debug" "cedet/data-debug.el" 5616;;;### (autoloads (data-debug-new-buffer) "data-debug" "cedet/data-debug.el"
5611;;;;;; (20119 34052)) 5617;;;;;; (20168 57844))
5612;;; Generated autoloads from cedet/data-debug.el 5618;;; Generated autoloads from cedet/data-debug.el
5613 5619
5614(autoload 'data-debug-new-buffer "data-debug" "\ 5620(autoload 'data-debug-new-buffer "data-debug" "\
@@ -5618,8 +5624,8 @@ Create a new data-debug buffer with NAME.
5618 5624
5619;;;*** 5625;;;***
5620 5626
5621;;;### (autoloads (dbus-handle-event) "dbus" "net/dbus.el" (20119 5627;;;### (autoloads (dbus-handle-event) "dbus" "net/dbus.el" (20176
5622;;;;;; 34052)) 5628;;;;;; 51947))
5623;;; Generated autoloads from net/dbus.el 5629;;; Generated autoloads from net/dbus.el
5624 5630
5625(autoload 'dbus-handle-event "dbus" "\ 5631(autoload 'dbus-handle-event "dbus" "\
@@ -5632,8 +5638,8 @@ If the HANDLER returns a `dbus-error', it is propagated as return message.
5632 5638
5633;;;*** 5639;;;***
5634 5640
5635;;;### (autoloads (dcl-mode) "dcl-mode" "progmodes/dcl-mode.el" (20119 5641;;;### (autoloads (dcl-mode) "dcl-mode" "progmodes/dcl-mode.el" (20162
5636;;;;;; 34052)) 5642;;;;;; 63140))
5637;;; Generated autoloads from progmodes/dcl-mode.el 5643;;; Generated autoloads from progmodes/dcl-mode.el
5638 5644
5639(autoload 'dcl-mode "dcl-mode" "\ 5645(autoload 'dcl-mode "dcl-mode" "\
@@ -5760,7 +5766,7 @@ There is some minimal font-lock support (see vars
5760;;;*** 5766;;;***
5761 5767
5762;;;### (autoloads (cancel-debug-on-entry debug-on-entry debug) "debug" 5768;;;### (autoloads (cancel-debug-on-entry debug-on-entry debug) "debug"
5763;;;;;; "emacs-lisp/debug.el" (20119 34052)) 5769;;;;;; "emacs-lisp/debug.el" (20098 62550))
5764;;; Generated autoloads from emacs-lisp/debug.el 5770;;; Generated autoloads from emacs-lisp/debug.el
5765 5771
5766(setq debugger 'debug) 5772(setq debugger 'debug)
@@ -5804,7 +5810,7 @@ To specify a nil argument interactively, exit with an empty minibuffer.
5804;;;*** 5810;;;***
5805 5811
5806;;;### (autoloads (decipher-mode decipher) "decipher" "play/decipher.el" 5812;;;### (autoloads (decipher-mode decipher) "decipher" "play/decipher.el"
5807;;;;;; (20119 34052)) 5813;;;;;; (20164 60780))
5808;;; Generated autoloads from play/decipher.el 5814;;; Generated autoloads from play/decipher.el
5809 5815
5810(autoload 'decipher "decipher" "\ 5816(autoload 'decipher "decipher" "\
@@ -5833,8 +5839,8 @@ The most useful commands are:
5833;;;*** 5839;;;***
5834 5840
5835;;;### (autoloads (delimit-columns-rectangle delimit-columns-region 5841;;;### (autoloads (delimit-columns-rectangle delimit-columns-region
5836;;;;;; delimit-columns-customize) "delim-col" "delim-col.el" (20119 5842;;;;;; delimit-columns-customize) "delim-col" "delim-col.el" (20154
5837;;;;;; 34052)) 5843;;;;;; 24929))
5838;;; Generated autoloads from delim-col.el 5844;;; Generated autoloads from delim-col.el
5839 5845
5840(autoload 'delimit-columns-customize "delim-col" "\ 5846(autoload 'delimit-columns-customize "delim-col" "\
@@ -5858,8 +5864,8 @@ START and END delimits the corners of text rectangle.
5858 5864
5859;;;*** 5865;;;***
5860 5866
5861;;;### (autoloads (delphi-mode) "delphi" "progmodes/delphi.el" (20119 5867;;;### (autoloads (delphi-mode) "delphi" "progmodes/delphi.el" (20153
5862;;;;;; 34052)) 5868;;;;;; 32900))
5863;;; Generated autoloads from progmodes/delphi.el 5869;;; Generated autoloads from progmodes/delphi.el
5864 5870
5865(autoload 'delphi-mode "delphi" "\ 5871(autoload 'delphi-mode "delphi" "\
@@ -5910,8 +5916,8 @@ with no args, if that value is non-nil.
5910 5916
5911;;;*** 5917;;;***
5912 5918
5913;;;### (autoloads (delete-selection-mode) "delsel" "delsel.el" (20126 5919;;;### (autoloads (delete-selection-mode) "delsel" "delsel.el" (20127
5914;;;;;; 50889)) 5920;;;;;; 62865))
5915;;; Generated autoloads from delsel.el 5921;;; Generated autoloads from delsel.el
5916 5922
5917(defalias 'pending-delete-mode 'delete-selection-mode) 5923(defalias 'pending-delete-mode 'delete-selection-mode)
@@ -5941,7 +5947,7 @@ any selection.
5941;;;*** 5947;;;***
5942 5948
5943;;;### (autoloads (derived-mode-init-mode-variables define-derived-mode) 5949;;;### (autoloads (derived-mode-init-mode-variables define-derived-mode)
5944;;;;;; "derived" "emacs-lisp/derived.el" (20134 8296)) 5950;;;;;; "derived" "emacs-lisp/derived.el" (20137 12290))
5945;;; Generated autoloads from emacs-lisp/derived.el 5951;;; Generated autoloads from emacs-lisp/derived.el
5946 5952
5947(autoload 'define-derived-mode "derived" "\ 5953(autoload 'define-derived-mode "derived" "\
@@ -6008,7 +6014,7 @@ the first time the mode is used.
6008;;;*** 6014;;;***
6009 6015
6010;;;### (autoloads (describe-char describe-text-properties) "descr-text" 6016;;;### (autoloads (describe-char describe-text-properties) "descr-text"
6011;;;;;; "descr-text.el" (20127 27092)) 6017;;;;;; "descr-text.el" (20170 13157))
6012;;; Generated autoloads from descr-text.el 6018;;; Generated autoloads from descr-text.el
6013 6019
6014(autoload 'describe-text-properties "descr-text" "\ 6020(autoload 'describe-text-properties "descr-text" "\
@@ -6036,7 +6042,7 @@ as well as widgets, buttons, overlays, and text properties.
6036;;;### (autoloads (desktop-revert desktop-save-in-desktop-dir desktop-change-dir 6042;;;### (autoloads (desktop-revert desktop-save-in-desktop-dir desktop-change-dir
6037;;;;;; desktop-load-default desktop-read desktop-remove desktop-save 6043;;;;;; desktop-load-default desktop-read desktop-remove desktop-save
6038;;;;;; desktop-clear desktop-locals-to-save desktop-save-mode) "desktop" 6044;;;;;; desktop-clear desktop-locals-to-save desktop-save-mode) "desktop"
6039;;;;;; "desktop.el" (20126 50898)) 6045;;;;;; "desktop.el" (20165 31925))
6040;;; Generated autoloads from desktop.el 6046;;; Generated autoloads from desktop.el
6041 6047
6042(defvar desktop-save-mode nil "\ 6048(defvar desktop-save-mode nil "\
@@ -6223,7 +6229,7 @@ Revert to the last loaded desktop.
6223 6229
6224;;;### (autoloads (gnus-article-outlook-deuglify-article gnus-outlook-deuglify-article 6230;;;### (autoloads (gnus-article-outlook-deuglify-article gnus-outlook-deuglify-article
6225;;;;;; gnus-article-outlook-repair-attribution gnus-article-outlook-unwrap-lines) 6231;;;;;; gnus-article-outlook-repair-attribution gnus-article-outlook-unwrap-lines)
6226;;;;;; "deuglify" "gnus/deuglify.el" (20119 34052)) 6232;;;;;; "deuglify" "gnus/deuglify.el" (19845 45374))
6227;;; Generated autoloads from gnus/deuglify.el 6233;;; Generated autoloads from gnus/deuglify.el
6228 6234
6229(autoload 'gnus-article-outlook-unwrap-lines "deuglify" "\ 6235(autoload 'gnus-article-outlook-unwrap-lines "deuglify" "\
@@ -6256,7 +6262,7 @@ Deuglify broken Outlook (Express) articles and redisplay.
6256;;;*** 6262;;;***
6257 6263
6258;;;### (autoloads (diary-mode diary-mail-entries diary) "diary-lib" 6264;;;### (autoloads (diary-mode diary-mail-entries diary) "diary-lib"
6259;;;;;; "calendar/diary-lib.el" (20119 34052)) 6265;;;;;; "calendar/diary-lib.el" (20168 57844))
6260;;; Generated autoloads from calendar/diary-lib.el 6266;;; Generated autoloads from calendar/diary-lib.el
6261 6267
6262(autoload 'diary "diary-lib" "\ 6268(autoload 'diary "diary-lib" "\
@@ -6299,7 +6305,7 @@ Major mode for editing the diary file.
6299;;;*** 6305;;;***
6300 6306
6301;;;### (autoloads (diff-buffer-with-file diff-backup diff diff-command 6307;;;### (autoloads (diff-buffer-with-file diff-backup diff diff-command
6302;;;;;; diff-switches) "diff" "vc/diff.el" (20119 34052)) 6308;;;;;; diff-switches) "diff" "vc/diff.el" (19999 41597))
6303;;; Generated autoloads from vc/diff.el 6309;;; Generated autoloads from vc/diff.el
6304 6310
6305(defvar diff-switches (purecopy "-c") "\ 6311(defvar diff-switches (purecopy "-c") "\
@@ -6343,7 +6349,7 @@ This requires the external program `diff' to be in your `exec-path'.
6343;;;*** 6349;;;***
6344 6350
6345;;;### (autoloads (diff-minor-mode diff-mode) "diff-mode" "vc/diff-mode.el" 6351;;;### (autoloads (diff-minor-mode diff-mode) "diff-mode" "vc/diff-mode.el"
6346;;;;;; (20127 23725)) 6352;;;;;; (20181 13366))
6347;;; Generated autoloads from vc/diff-mode.el 6353;;; Generated autoloads from vc/diff-mode.el
6348 6354
6349(autoload 'diff-mode "diff-mode" "\ 6355(autoload 'diff-mode "diff-mode" "\
@@ -6375,7 +6381,7 @@ the mode if ARG is omitted or nil.
6375 6381
6376;;;*** 6382;;;***
6377 6383
6378;;;### (autoloads (dig) "dig" "net/dig.el" (20119 34052)) 6384;;;### (autoloads (dig) "dig" "net/dig.el" (19845 45374))
6379;;; Generated autoloads from net/dig.el 6385;;; Generated autoloads from net/dig.el
6380 6386
6381(autoload 'dig "dig" "\ 6387(autoload 'dig "dig" "\
@@ -6387,7 +6393,7 @@ Optional arguments are passed to `dig-invoke'.
6387;;;*** 6393;;;***
6388 6394
6389;;;### (autoloads (dired-mode dired-noselect dired-other-frame dired-other-window 6395;;;### (autoloads (dired-mode dired-noselect dired-other-frame dired-other-window
6390;;;;;; dired dired-listing-switches) "dired" "dired.el" (20140 44600)) 6396;;;;;; dired dired-listing-switches) "dired" "dired.el" (20167 36967))
6391;;; Generated autoloads from dired.el 6397;;; Generated autoloads from dired.el
6392 6398
6393(defvar dired-listing-switches (purecopy "-al") "\ 6399(defvar dired-listing-switches (purecopy "-al") "\
@@ -6509,7 +6515,7 @@ Keybindings:
6509;;;*** 6515;;;***
6510 6516
6511;;;### (autoloads (dirtrack dirtrack-mode) "dirtrack" "dirtrack.el" 6517;;;### (autoloads (dirtrack dirtrack-mode) "dirtrack" "dirtrack.el"
6512;;;;;; (20126 50922)) 6518;;;;;; (20127 62865))
6513;;; Generated autoloads from dirtrack.el 6519;;; Generated autoloads from dirtrack.el
6514 6520
6515(autoload 'dirtrack-mode "dirtrack" "\ 6521(autoload 'dirtrack-mode "dirtrack" "\
@@ -6539,8 +6545,8 @@ function `dirtrack-debug-mode' to turn on debugging output.
6539 6545
6540;;;*** 6546;;;***
6541 6547
6542;;;### (autoloads (disassemble) "disass" "emacs-lisp/disass.el" (20119 6548;;;### (autoloads (disassemble) "disass" "emacs-lisp/disass.el" (19931
6543;;;;;; 34052)) 6549;;;;;; 11784))
6544;;; Generated autoloads from emacs-lisp/disass.el 6550;;; Generated autoloads from emacs-lisp/disass.el
6545 6551
6546(autoload 'disassemble "disass" "\ 6552(autoload 'disassemble "disass" "\
@@ -6559,7 +6565,7 @@ redefine OBJECT if it is a symbol.
6559;;;;;; standard-display-g1 standard-display-ascii standard-display-default 6565;;;;;; standard-display-g1 standard-display-ascii standard-display-default
6560;;;;;; standard-display-8bit describe-current-display-table describe-display-table 6566;;;;;; standard-display-8bit describe-current-display-table describe-display-table
6561;;;;;; set-display-table-slot display-table-slot make-display-table) 6567;;;;;; set-display-table-slot display-table-slot make-display-table)
6562;;;;;; "disp-table" "disp-table.el" (20119 34052)) 6568;;;;;; "disp-table" "disp-table.el" (19984 16846))
6563;;; Generated autoloads from disp-table.el 6569;;; Generated autoloads from disp-table.el
6564 6570
6565(autoload 'make-display-table "disp-table" "\ 6571(autoload 'make-display-table "disp-table" "\
@@ -6681,7 +6687,7 @@ in `.emacs'.
6681;;;*** 6687;;;***
6682 6688
6683;;;### (autoloads (dissociated-press) "dissociate" "play/dissociate.el" 6689;;;### (autoloads (dissociated-press) "dissociate" "play/dissociate.el"
6684;;;;;; (20119 34052)) 6690;;;;;; (19845 45374))
6685;;; Generated autoloads from play/dissociate.el 6691;;; Generated autoloads from play/dissociate.el
6686 6692
6687(autoload 'dissociated-press "dissociate" "\ 6693(autoload 'dissociated-press "dissociate" "\
@@ -6697,7 +6703,7 @@ Default is 2.
6697 6703
6698;;;*** 6704;;;***
6699 6705
6700;;;### (autoloads (dnd-protocol-alist) "dnd" "dnd.el" (20119 34052)) 6706;;;### (autoloads (dnd-protocol-alist) "dnd" "dnd.el" (19886 45771))
6701;;; Generated autoloads from dnd.el 6707;;; Generated autoloads from dnd.el
6702 6708
6703(defvar dnd-protocol-alist `((,(purecopy "^file:///") . dnd-open-local-file) (,(purecopy "^file://") . dnd-open-file) (,(purecopy "^file:") . dnd-open-local-file) (,(purecopy "^\\(https?\\|ftp\\|file\\|nfs\\)://") . dnd-open-file)) "\ 6709(defvar dnd-protocol-alist `((,(purecopy "^file:///") . dnd-open-local-file) (,(purecopy "^file://") . dnd-open-file) (,(purecopy "^file:") . dnd-open-local-file) (,(purecopy "^\\(https?\\|ftp\\|file\\|nfs\\)://") . dnd-open-file)) "\
@@ -6718,7 +6724,7 @@ if some action was made, or nil if the URL is ignored.")
6718;;;*** 6724;;;***
6719 6725
6720;;;### (autoloads (dns-mode-soa-increment-serial dns-mode) "dns-mode" 6726;;;### (autoloads (dns-mode-soa-increment-serial dns-mode) "dns-mode"
6721;;;;;; "textmodes/dns-mode.el" (20119 34052)) 6727;;;;;; "textmodes/dns-mode.el" (19845 45374))
6722;;; Generated autoloads from textmodes/dns-mode.el 6728;;; Generated autoloads from textmodes/dns-mode.el
6723 6729
6724(autoload 'dns-mode "dns-mode" "\ 6730(autoload 'dns-mode "dns-mode" "\
@@ -6742,8 +6748,8 @@ Locate SOA record and increment the serial field.
6742;;;*** 6748;;;***
6743 6749
6744;;;### (autoloads (doc-view-bookmark-jump doc-view-minor-mode doc-view-mode-maybe 6750;;;### (autoloads (doc-view-bookmark-jump doc-view-minor-mode doc-view-mode-maybe
6745;;;;;; doc-view-mode doc-view-mode-p) "doc-view" "doc-view.el" (20139 6751;;;;;; doc-view-mode doc-view-mode-p) "doc-view" "doc-view.el" (20172
6746;;;;;; 28158)) 6752;;;;;; 54913))
6747;;; Generated autoloads from doc-view.el 6753;;; Generated autoloads from doc-view.el
6748 6754
6749(autoload 'doc-view-mode-p "doc-view" "\ 6755(autoload 'doc-view-mode-p "doc-view" "\
@@ -6789,7 +6795,7 @@ See the command `doc-view-mode' for more information on this mode.
6789 6795
6790;;;*** 6796;;;***
6791 6797
6792;;;### (autoloads (doctor) "doctor" "play/doctor.el" (20119 34052)) 6798;;;### (autoloads (doctor) "doctor" "play/doctor.el" (20077 56412))
6793;;; Generated autoloads from play/doctor.el 6799;;; Generated autoloads from play/doctor.el
6794 6800
6795(autoload 'doctor "doctor" "\ 6801(autoload 'doctor "doctor" "\
@@ -6799,7 +6805,7 @@ Switch to *doctor* buffer and start giving psychotherapy.
6799 6805
6800;;;*** 6806;;;***
6801 6807
6802;;;### (autoloads (double-mode) "double" "double.el" (20126 50942)) 6808;;;### (autoloads (double-mode) "double" "double.el" (20127 62865))
6803;;; Generated autoloads from double.el 6809;;; Generated autoloads from double.el
6804 6810
6805(autoload 'double-mode "double" "\ 6811(autoload 'double-mode "double" "\
@@ -6815,7 +6821,7 @@ strings when pressed twice. See `double-map' for details.
6815 6821
6816;;;*** 6822;;;***
6817 6823
6818;;;### (autoloads (dunnet) "dunnet" "play/dunnet.el" (20119 34052)) 6824;;;### (autoloads (dunnet) "dunnet" "play/dunnet.el" (19845 45374))
6819;;; Generated autoloads from play/dunnet.el 6825;;; Generated autoloads from play/dunnet.el
6820 6826
6821(autoload 'dunnet "dunnet" "\ 6827(autoload 'dunnet "dunnet" "\
@@ -6827,7 +6833,7 @@ Switch to *dungeon* buffer and start game.
6827 6833
6828;;;### (autoloads (easy-mmode-defsyntax easy-mmode-defmap easy-mmode-define-keymap 6834;;;### (autoloads (easy-mmode-defsyntax easy-mmode-defmap easy-mmode-define-keymap
6829;;;;;; define-globalized-minor-mode define-minor-mode) "easy-mmode" 6835;;;;;; define-globalized-minor-mode define-minor-mode) "easy-mmode"
6830;;;;;; "emacs-lisp/easy-mmode.el" (20136 49226)) 6836;;;;;; "emacs-lisp/easy-mmode.el" (20179 28130))
6831;;; Generated autoloads from emacs-lisp/easy-mmode.el 6837;;; Generated autoloads from emacs-lisp/easy-mmode.el
6832 6838
6833(defalias 'easy-mmode-define-minor-mode 'define-minor-mode) 6839(defalias 'easy-mmode-define-minor-mode 'define-minor-mode)
@@ -6938,8 +6944,8 @@ CSS contains a list of syntax specifications of the form (CHAR . SYNTAX).
6938;;;*** 6944;;;***
6939 6945
6940;;;### (autoloads (easy-menu-change easy-menu-create-menu easy-menu-do-define 6946;;;### (autoloads (easy-menu-change easy-menu-create-menu easy-menu-do-define
6941;;;;;; easy-menu-define) "easymenu" "emacs-lisp/easymenu.el" (20119 6947;;;;;; easy-menu-define) "easymenu" "emacs-lisp/easymenu.el" (19845
6942;;;;;; 34052)) 6948;;;;;; 45374))
6943;;; Generated autoloads from emacs-lisp/easymenu.el 6949;;; Generated autoloads from emacs-lisp/easymenu.el
6944 6950
6945(autoload 'easy-menu-define "easymenu" "\ 6951(autoload 'easy-menu-define "easymenu" "\
@@ -7093,7 +7099,7 @@ To implement dynamic menus, either call this from
7093;;;;;; ebnf-eps-file ebnf-eps-directory ebnf-spool-region ebnf-spool-buffer 7099;;;;;; ebnf-eps-file ebnf-eps-directory ebnf-spool-region ebnf-spool-buffer
7094;;;;;; ebnf-spool-file ebnf-spool-directory ebnf-print-region ebnf-print-buffer 7100;;;;;; ebnf-spool-file ebnf-spool-directory ebnf-print-region ebnf-print-buffer
7095;;;;;; ebnf-print-file ebnf-print-directory ebnf-customize) "ebnf2ps" 7101;;;;;; ebnf-print-file ebnf-print-directory ebnf-customize) "ebnf2ps"
7096;;;;;; "progmodes/ebnf2ps.el" (20119 34052)) 7102;;;;;; "progmodes/ebnf2ps.el" (20166 16092))
7097;;; Generated autoloads from progmodes/ebnf2ps.el 7103;;; Generated autoloads from progmodes/ebnf2ps.el
7098 7104
7099(autoload 'ebnf-customize "ebnf2ps" "\ 7105(autoload 'ebnf-customize "ebnf2ps" "\
@@ -7367,8 +7373,8 @@ See `ebnf-style-database' documentation.
7367;;;;;; ebrowse-tags-find-declaration-other-window ebrowse-tags-find-definition 7373;;;;;; ebrowse-tags-find-declaration-other-window ebrowse-tags-find-definition
7368;;;;;; ebrowse-tags-view-definition ebrowse-tags-find-declaration 7374;;;;;; ebrowse-tags-view-definition ebrowse-tags-find-declaration
7369;;;;;; ebrowse-tags-view-declaration ebrowse-member-mode ebrowse-electric-choose-tree 7375;;;;;; ebrowse-tags-view-declaration ebrowse-member-mode ebrowse-electric-choose-tree
7370;;;;;; ebrowse-tree-mode) "ebrowse" "progmodes/ebrowse.el" (20119 7376;;;;;; ebrowse-tree-mode) "ebrowse" "progmodes/ebrowse.el" (20104
7371;;;;;; 34052)) 7377;;;;;; 14925))
7372;;; Generated autoloads from progmodes/ebrowse.el 7378;;; Generated autoloads from progmodes/ebrowse.el
7373 7379
7374(autoload 'ebrowse-tree-mode "ebrowse" "\ 7380(autoload 'ebrowse-tree-mode "ebrowse" "\
@@ -7517,7 +7523,7 @@ Display statistics for a class tree.
7517;;;*** 7523;;;***
7518 7524
7519;;;### (autoloads (electric-buffer-list) "ebuff-menu" "ebuff-menu.el" 7525;;;### (autoloads (electric-buffer-list) "ebuff-menu" "ebuff-menu.el"
7520;;;;;; (20119 34052)) 7526;;;;;; (20104 14925))
7521;;; Generated autoloads from ebuff-menu.el 7527;;; Generated autoloads from ebuff-menu.el
7522 7528
7523(autoload 'electric-buffer-list "ebuff-menu" "\ 7529(autoload 'electric-buffer-list "ebuff-menu" "\
@@ -7542,7 +7548,7 @@ Run hooks in `electric-buffer-menu-mode-hook' on entry.
7542;;;*** 7548;;;***
7543 7549
7544;;;### (autoloads (Electric-command-history-redo-expression) "echistory" 7550;;;### (autoloads (Electric-command-history-redo-expression) "echistory"
7545;;;;;; "echistory.el" (20119 34052)) 7551;;;;;; "echistory.el" (19886 45771))
7546;;; Generated autoloads from echistory.el 7552;;; Generated autoloads from echistory.el
7547 7553
7548(autoload 'Electric-command-history-redo-expression "echistory" "\ 7554(autoload 'Electric-command-history-redo-expression "echistory" "\
@@ -7554,7 +7560,7 @@ With prefix arg NOCONFIRM, execute current line as-is without editing.
7554;;;*** 7560;;;***
7555 7561
7556;;;### (autoloads (ecomplete-setup) "ecomplete" "gnus/ecomplete.el" 7562;;;### (autoloads (ecomplete-setup) "ecomplete" "gnus/ecomplete.el"
7557;;;;;; (20119 34052)) 7563;;;;;; (20110 24804))
7558;;; Generated autoloads from gnus/ecomplete.el 7564;;; Generated autoloads from gnus/ecomplete.el
7559 7565
7560(autoload 'ecomplete-setup "ecomplete" "\ 7566(autoload 'ecomplete-setup "ecomplete" "\
@@ -7564,7 +7570,7 @@ With prefix arg NOCONFIRM, execute current line as-is without editing.
7564 7570
7565;;;*** 7571;;;***
7566 7572
7567;;;### (autoloads (global-ede-mode) "ede" "cedet/ede.el" (20131 35255)) 7573;;;### (autoloads (global-ede-mode) "ede" "cedet/ede.el" (20168 57844))
7568;;; Generated autoloads from cedet/ede.el 7574;;; Generated autoloads from cedet/ede.el
7569 7575
7570(defvar global-ede-mode nil "\ 7576(defvar global-ede-mode nil "\
@@ -7591,7 +7597,7 @@ an EDE controlled project.
7591 7597
7592;;;### (autoloads (edebug-all-forms edebug-all-defs edebug-eval-top-level-form 7598;;;### (autoloads (edebug-all-forms edebug-all-defs edebug-eval-top-level-form
7593;;;;;; edebug-basic-spec edebug-all-forms edebug-all-defs) "edebug" 7599;;;;;; edebug-basic-spec edebug-all-forms edebug-all-defs) "edebug"
7594;;;;;; "emacs-lisp/edebug.el" (20119 34052)) 7600;;;;;; "emacs-lisp/edebug.el" (20166 16092))
7595;;; Generated autoloads from emacs-lisp/edebug.el 7601;;; Generated autoloads from emacs-lisp/edebug.el
7596 7602
7597(defvar edebug-all-defs nil "\ 7603(defvar edebug-all-defs nil "\
@@ -7664,7 +7670,7 @@ Toggle edebugging of all forms.
7664;;;;;; ediff-merge-directories-with-ancestor ediff-merge-directories 7670;;;;;; ediff-merge-directories-with-ancestor ediff-merge-directories
7665;;;;;; ediff-directories3 ediff-directory-revisions ediff-directories 7671;;;;;; ediff-directories3 ediff-directory-revisions ediff-directories
7666;;;;;; ediff-buffers3 ediff-buffers ediff-backup ediff-current-file 7672;;;;;; ediff-buffers3 ediff-buffers ediff-backup ediff-current-file
7667;;;;;; ediff-files3 ediff-files) "ediff" "vc/ediff.el" (20119 34052)) 7673;;;;;; ediff-files3 ediff-files) "ediff" "vc/ediff.el" (19996 8027))
7668;;; Generated autoloads from vc/ediff.el 7674;;; Generated autoloads from vc/ediff.el
7669 7675
7670(autoload 'ediff-files "ediff" "\ 7676(autoload 'ediff-files "ediff" "\
@@ -7896,7 +7902,7 @@ With optional NODE, goes to that node.
7896;;;*** 7902;;;***
7897 7903
7898;;;### (autoloads (ediff-customize) "ediff-help" "vc/ediff-help.el" 7904;;;### (autoloads (ediff-customize) "ediff-help" "vc/ediff-help.el"
7899;;;;;; (20119 34052)) 7905;;;;;; (20178 7273))
7900;;; Generated autoloads from vc/ediff-help.el 7906;;; Generated autoloads from vc/ediff-help.el
7901 7907
7902(autoload 'ediff-customize "ediff-help" "\ 7908(autoload 'ediff-customize "ediff-help" "\
@@ -7907,7 +7913,7 @@ With optional NODE, goes to that node.
7907;;;*** 7913;;;***
7908 7914
7909;;;### (autoloads (ediff-show-registry) "ediff-mult" "vc/ediff-mult.el" 7915;;;### (autoloads (ediff-show-registry) "ediff-mult" "vc/ediff-mult.el"
7910;;;;;; (20119 34052)) 7916;;;;;; (20168 57844))
7911;;; Generated autoloads from vc/ediff-mult.el 7917;;; Generated autoloads from vc/ediff-mult.el
7912 7918
7913(autoload 'ediff-show-registry "ediff-mult" "\ 7919(autoload 'ediff-show-registry "ediff-mult" "\
@@ -7920,7 +7926,7 @@ Display Ediff's registry.
7920;;;*** 7926;;;***
7921 7927
7922;;;### (autoloads (ediff-toggle-use-toolbar ediff-toggle-multiframe) 7928;;;### (autoloads (ediff-toggle-use-toolbar ediff-toggle-multiframe)
7923;;;;;; "ediff-util" "vc/ediff-util.el" (20140 44390)) 7929;;;;;; "ediff-util" "vc/ediff-util.el" (20175 31160))
7924;;; Generated autoloads from vc/ediff-util.el 7930;;; Generated autoloads from vc/ediff-util.el
7925 7931
7926(autoload 'ediff-toggle-multiframe "ediff-util" "\ 7932(autoload 'ediff-toggle-multiframe "ediff-util" "\
@@ -7941,7 +7947,7 @@ To change the default, set the variable `ediff-use-toolbar-p', which see.
7941 7947
7942;;;### (autoloads (format-kbd-macro read-kbd-macro edit-named-kbd-macro 7948;;;### (autoloads (format-kbd-macro read-kbd-macro edit-named-kbd-macro
7943;;;;;; edit-last-kbd-macro edit-kbd-macro) "edmacro" "edmacro.el" 7949;;;;;; edit-last-kbd-macro edit-kbd-macro) "edmacro" "edmacro.el"
7944;;;;;; (20119 34052)) 7950;;;;;; (19886 45771))
7945;;; Generated autoloads from edmacro.el 7951;;; Generated autoloads from edmacro.el
7946 7952
7947(autoload 'edit-kbd-macro "edmacro" "\ 7953(autoload 'edit-kbd-macro "edmacro" "\
@@ -7990,7 +7996,7 @@ or nil, use a compact 80-column format.
7990;;;*** 7996;;;***
7991 7997
7992;;;### (autoloads (edt-emulation-on edt-set-scroll-margins) "edt" 7998;;;### (autoloads (edt-emulation-on edt-set-scroll-margins) "edt"
7993;;;;;; "emulation/edt.el" (20140 44303)) 7999;;;;;; "emulation/edt.el" (20154 24929))
7994;;; Generated autoloads from emulation/edt.el 8000;;; Generated autoloads from emulation/edt.el
7995 8001
7996(autoload 'edt-set-scroll-margins "edt" "\ 8002(autoload 'edt-set-scroll-margins "edt" "\
@@ -8008,7 +8014,7 @@ Turn on EDT Emulation.
8008;;;*** 8014;;;***
8009 8015
8010;;;### (autoloads (electric-helpify with-electric-help) "ehelp" "ehelp.el" 8016;;;### (autoloads (electric-helpify with-electric-help) "ehelp" "ehelp.el"
8011;;;;;; (20119 34052)) 8017;;;;;; (19865 50420))
8012;;; Generated autoloads from ehelp.el 8018;;; Generated autoloads from ehelp.el
8013 8019
8014(autoload 'with-electric-help "ehelp" "\ 8020(autoload 'with-electric-help "ehelp" "\
@@ -8045,7 +8051,7 @@ BUFFER is put back into its original major mode.
8045;;;*** 8051;;;***
8046 8052
8047;;;### (autoloads (turn-on-eldoc-mode eldoc-mode eldoc-minor-mode-string) 8053;;;### (autoloads (turn-on-eldoc-mode eldoc-mode eldoc-minor-mode-string)
8048;;;;;; "eldoc" "emacs-lisp/eldoc.el" (20127 23532)) 8054;;;;;; "eldoc" "emacs-lisp/eldoc.el" (20161 45793))
8049;;; Generated autoloads from emacs-lisp/eldoc.el 8055;;; Generated autoloads from emacs-lisp/eldoc.el
8050 8056
8051(defvar eldoc-minor-mode-string (purecopy " ElDoc") "\ 8057(defvar eldoc-minor-mode-string (purecopy " ElDoc") "\
@@ -8092,11 +8098,15 @@ Emacs Lisp mode) that support ElDoc.")
8092;;;*** 8098;;;***
8093 8099
8094;;;### (autoloads (electric-layout-mode electric-pair-mode electric-indent-mode) 8100;;;### (autoloads (electric-layout-mode electric-pair-mode electric-indent-mode)
8095;;;;;; "electric" "electric.el" (20126 50965)) 8101;;;;;; "electric" "electric.el" (20168 57844))
8096;;; Generated autoloads from electric.el 8102;;; Generated autoloads from electric.el
8097 8103
8098(defvar electric-indent-chars '(10) "\ 8104(defvar electric-indent-chars '(10) "\
8099Characters that should cause automatic reindentation.") 8105Characters that should cause automatic reindentation.
8106Each entry of the list can be either a character or a cons of the
8107form (CHAR . PREDICATE) which means that CHAR should cause reindentation
8108only if PREDICATE returns non-nil. PREDICATE is called with no arguments
8109and with point before the inserted char.")
8100 8110
8101(defvar electric-indent-mode nil "\ 8111(defvar electric-indent-mode nil "\
8102Non-nil if Electric-Indent mode is enabled. 8112Non-nil if Electric-Indent mode is enabled.
@@ -8156,8 +8166,8 @@ Automatically insert newlines around some chars.
8156 8166
8157;;;*** 8167;;;***
8158 8168
8159;;;### (autoloads (elide-head) "elide-head" "elide-head.el" (20119 8169;;;### (autoloads (elide-head) "elide-head" "elide-head.el" (19845
8160;;;;;; 34052)) 8170;;;;;; 45374))
8161;;; Generated autoloads from elide-head.el 8171;;; Generated autoloads from elide-head.el
8162 8172
8163(autoload 'elide-head "elide-head" "\ 8173(autoload 'elide-head "elide-head" "\
@@ -8174,7 +8184,7 @@ This is suitable as an entry on `find-file-hook' or appropriate mode hooks.
8174 8184
8175;;;### (autoloads (elint-initialize elint-defun elint-current-buffer 8185;;;### (autoloads (elint-initialize elint-defun elint-current-buffer
8176;;;;;; elint-directory elint-file) "elint" "emacs-lisp/elint.el" 8186;;;;;; elint-directory elint-file) "elint" "emacs-lisp/elint.el"
8177;;;;;; (20119 34052)) 8187;;;;;; (20172 54913))
8178;;; Generated autoloads from emacs-lisp/elint.el 8188;;; Generated autoloads from emacs-lisp/elint.el
8179 8189
8180(autoload 'elint-file "elint" "\ 8190(autoload 'elint-file "elint" "\
@@ -8210,8 +8220,8 @@ optional prefix argument REINIT is non-nil.
8210;;;*** 8220;;;***
8211 8221
8212;;;### (autoloads (elp-results elp-instrument-package elp-instrument-list 8222;;;### (autoloads (elp-results elp-instrument-package elp-instrument-list
8213;;;;;; elp-instrument-function) "elp" "emacs-lisp/elp.el" (20119 8223;;;;;; elp-instrument-function) "elp" "emacs-lisp/elp.el" (19981
8214;;;;;; 34052)) 8224;;;;;; 40664))
8215;;; Generated autoloads from emacs-lisp/elp.el 8225;;; Generated autoloads from emacs-lisp/elp.el
8216 8226
8217(autoload 'elp-instrument-function "elp" "\ 8227(autoload 'elp-instrument-function "elp" "\
@@ -8246,7 +8256,7 @@ displayed.
8246;;;*** 8256;;;***
8247 8257
8248;;;### (autoloads (emacs-lock-mode) "emacs-lock" "emacs-lock.el" 8258;;;### (autoloads (emacs-lock-mode) "emacs-lock" "emacs-lock.el"
8249;;;;;; (20126 50977)) 8259;;;;;; (20127 62865))
8250;;; Generated autoloads from emacs-lock.el 8260;;; Generated autoloads from emacs-lock.el
8251 8261
8252(autoload 'emacs-lock-mode "emacs-lock" "\ 8262(autoload 'emacs-lock-mode "emacs-lock" "\
@@ -8274,7 +8284,7 @@ Other values are interpreted as usual.
8274;;;*** 8284;;;***
8275 8285
8276;;;### (autoloads (report-emacs-bug-query-existing-bugs report-emacs-bug) 8286;;;### (autoloads (report-emacs-bug-query-existing-bugs report-emacs-bug)
8277;;;;;; "emacsbug" "mail/emacsbug.el" (20119 34052)) 8287;;;;;; "emacsbug" "mail/emacsbug.el" (20093 44623))
8278;;; Generated autoloads from mail/emacsbug.el 8288;;; Generated autoloads from mail/emacsbug.el
8279 8289
8280(autoload 'report-emacs-bug "emacsbug" "\ 8290(autoload 'report-emacs-bug "emacsbug" "\
@@ -8295,7 +8305,7 @@ The result is an alist with items of the form (URL SUBJECT NO).
8295;;;;;; emerge-revisions emerge-files-with-ancestor-remote emerge-files-remote 8305;;;;;; emerge-revisions emerge-files-with-ancestor-remote emerge-files-remote
8296;;;;;; emerge-files-with-ancestor-command emerge-files-command emerge-buffers-with-ancestor 8306;;;;;; emerge-files-with-ancestor-command emerge-files-command emerge-buffers-with-ancestor
8297;;;;;; emerge-buffers emerge-files-with-ancestor emerge-files) "emerge" 8307;;;;;; emerge-buffers emerge-files-with-ancestor emerge-files) "emerge"
8298;;;;;; "vc/emerge.el" (20140 44401)) 8308;;;;;; "vc/emerge.el" (20141 9296))
8299;;; Generated autoloads from vc/emerge.el 8309;;; Generated autoloads from vc/emerge.el
8300 8310
8301(autoload 'emerge-files "emerge" "\ 8311(autoload 'emerge-files "emerge" "\
@@ -8356,7 +8366,7 @@ Emerge two RCS revisions of a file, with another revision as ancestor.
8356;;;*** 8366;;;***
8357 8367
8358;;;### (autoloads (enriched-decode enriched-encode enriched-mode) 8368;;;### (autoloads (enriched-decode enriched-encode enriched-mode)
8359;;;;;; "enriched" "textmodes/enriched.el" (20127 24788)) 8369;;;;;; "enriched" "textmodes/enriched.el" (19845 45374))
8360;;; Generated autoloads from textmodes/enriched.el 8370;;; Generated autoloads from textmodes/enriched.el
8361 8371
8362(autoload 'enriched-mode "enriched" "\ 8372(autoload 'enriched-mode "enriched" "\
@@ -8391,8 +8401,8 @@ Commands:
8391;;;;;; epa-sign-region epa-verify-cleartext-in-region epa-verify-region 8401;;;;;; epa-sign-region epa-verify-cleartext-in-region epa-verify-region
8392;;;;;; epa-decrypt-armor-in-region epa-decrypt-region epa-encrypt-file 8402;;;;;; epa-decrypt-armor-in-region epa-decrypt-region epa-encrypt-file
8393;;;;;; epa-sign-file epa-verify-file epa-decrypt-file epa-select-keys 8403;;;;;; epa-sign-file epa-verify-file epa-decrypt-file epa-select-keys
8394;;;;;; epa-list-secret-keys epa-list-keys) "epa" "epa.el" (20119 8404;;;;;; epa-list-secret-keys epa-list-keys) "epa" "epa.el" (20104
8395;;;;;; 34052)) 8405;;;;;; 14925))
8396;;; Generated autoloads from epa.el 8406;;; Generated autoloads from epa.el
8397 8407
8398(autoload 'epa-list-keys "epa" "\ 8408(autoload 'epa-list-keys "epa" "\
@@ -8570,7 +8580,7 @@ Insert selected KEYS after the point.
8570;;;*** 8580;;;***
8571 8581
8572;;;### (autoloads (epa-dired-do-encrypt epa-dired-do-sign epa-dired-do-verify 8582;;;### (autoloads (epa-dired-do-encrypt epa-dired-do-sign epa-dired-do-verify
8573;;;;;; epa-dired-do-decrypt) "epa-dired" "epa-dired.el" (20119 34052)) 8583;;;;;; epa-dired-do-decrypt) "epa-dired" "epa-dired.el" (19865 50420))
8574;;; Generated autoloads from epa-dired.el 8584;;; Generated autoloads from epa-dired.el
8575 8585
8576(autoload 'epa-dired-do-decrypt "epa-dired" "\ 8586(autoload 'epa-dired-do-decrypt "epa-dired" "\
@@ -8596,7 +8606,7 @@ Encrypt marked files.
8596;;;*** 8606;;;***
8597 8607
8598;;;### (autoloads (epa-file-disable epa-file-enable epa-file-handler) 8608;;;### (autoloads (epa-file-disable epa-file-enable epa-file-handler)
8599;;;;;; "epa-file" "epa-file.el" (20119 34052)) 8609;;;;;; "epa-file" "epa-file.el" (20038 20303))
8600;;; Generated autoloads from epa-file.el 8610;;; Generated autoloads from epa-file.el
8601 8611
8602(autoload 'epa-file-handler "epa-file" "\ 8612(autoload 'epa-file-handler "epa-file" "\
@@ -8618,7 +8628,7 @@ Encrypt marked files.
8618 8628
8619;;;### (autoloads (epa-global-mail-mode epa-mail-import-keys epa-mail-encrypt 8629;;;### (autoloads (epa-global-mail-mode epa-mail-import-keys epa-mail-encrypt
8620;;;;;; epa-mail-sign epa-mail-verify epa-mail-decrypt epa-mail-mode) 8630;;;;;; epa-mail-sign epa-mail-verify epa-mail-decrypt epa-mail-mode)
8621;;;;;; "epa-mail" "epa-mail.el" (20119 34052)) 8631;;;;;; "epa-mail" "epa-mail.el" (20043 38232))
8622;;; Generated autoloads from epa-mail.el 8632;;; Generated autoloads from epa-mail.el
8623 8633
8624(autoload 'epa-mail-mode "epa-mail" "\ 8634(autoload 'epa-mail-mode "epa-mail" "\
@@ -8682,7 +8692,7 @@ Minor mode to hook EasyPG into Mail mode.
8682 8692
8683;;;*** 8693;;;***
8684 8694
8685;;;### (autoloads (epg-make-context) "epg" "epg.el" (20119 34052)) 8695;;;### (autoloads (epg-make-context) "epg" "epg.el" (20172 54913))
8686;;; Generated autoloads from epg.el 8696;;; Generated autoloads from epg.el
8687 8697
8688(autoload 'epg-make-context "epg" "\ 8698(autoload 'epg-make-context "epg" "\
@@ -8693,7 +8703,7 @@ Return a context object.
8693;;;*** 8703;;;***
8694 8704
8695;;;### (autoloads (epg-expand-group epg-check-configuration epg-configuration) 8705;;;### (autoloads (epg-expand-group epg-check-configuration epg-configuration)
8696;;;;;; "epg-config" "epg-config.el" (20119 34052)) 8706;;;;;; "epg-config" "epg-config.el" (19845 45374))
8697;;; Generated autoloads from epg-config.el 8707;;; Generated autoloads from epg-config.el
8698 8708
8699(autoload 'epg-configuration "epg-config" "\ 8709(autoload 'epg-configuration "epg-config" "\
@@ -8714,7 +8724,7 @@ Look at CONFIG and try to expand GROUP.
8714;;;*** 8724;;;***
8715 8725
8716;;;### (autoloads (erc-handle-irc-url erc erc-select-read-args) "erc" 8726;;;### (autoloads (erc-handle-irc-url erc erc-select-read-args) "erc"
8717;;;;;; "erc/erc.el" (20127 26333)) 8727;;;;;; "erc/erc.el" (20172 54913))
8718;;; Generated autoloads from erc/erc.el 8728;;; Generated autoloads from erc/erc.el
8719 8729
8720(autoload 'erc-select-read-args "erc" "\ 8730(autoload 'erc-select-read-args "erc" "\
@@ -8756,33 +8766,33 @@ Otherwise, connect to HOST:PORT as USER and /join CHANNEL.
8756 8766
8757;;;*** 8767;;;***
8758 8768
8759;;;### (autoloads nil "erc-autoaway" "erc/erc-autoaway.el" (20119 8769;;;### (autoloads nil "erc-autoaway" "erc/erc-autoaway.el" (20161
8760;;;;;; 34052)) 8770;;;;;; 45793))
8761;;; Generated autoloads from erc/erc-autoaway.el 8771;;; Generated autoloads from erc/erc-autoaway.el
8762 (autoload 'erc-autoaway-mode "erc-autoaway") 8772 (autoload 'erc-autoaway-mode "erc-autoaway")
8763 8773
8764;;;*** 8774;;;***
8765 8775
8766;;;### (autoloads nil "erc-button" "erc/erc-button.el" (20119 34052)) 8776;;;### (autoloads nil "erc-button" "erc/erc-button.el" (20093 44623))
8767;;; Generated autoloads from erc/erc-button.el 8777;;; Generated autoloads from erc/erc-button.el
8768 (autoload 'erc-button-mode "erc-button" nil t) 8778 (autoload 'erc-button-mode "erc-button" nil t)
8769 8779
8770;;;*** 8780;;;***
8771 8781
8772;;;### (autoloads nil "erc-capab" "erc/erc-capab.el" (20119 34052)) 8782;;;### (autoloads nil "erc-capab" "erc/erc-capab.el" (19845 45374))
8773;;; Generated autoloads from erc/erc-capab.el 8783;;; Generated autoloads from erc/erc-capab.el
8774 (autoload 'erc-capab-identify-mode "erc-capab" nil t) 8784 (autoload 'erc-capab-identify-mode "erc-capab" nil t)
8775 8785
8776;;;*** 8786;;;***
8777 8787
8778;;;### (autoloads nil "erc-compat" "erc/erc-compat.el" (20119 34052)) 8788;;;### (autoloads nil "erc-compat" "erc/erc-compat.el" (19845 45374))
8779;;; Generated autoloads from erc/erc-compat.el 8789;;; Generated autoloads from erc/erc-compat.el
8780 (autoload 'erc-define-minor-mode "erc-compat") 8790 (autoload 'erc-define-minor-mode "erc-compat")
8781 8791
8782;;;*** 8792;;;***
8783 8793
8784;;;### (autoloads (erc-ctcp-query-DCC pcomplete/erc-mode/DCC erc-cmd-DCC) 8794;;;### (autoloads (erc-ctcp-query-DCC pcomplete/erc-mode/DCC erc-cmd-DCC)
8785;;;;;; "erc-dcc" "erc/erc-dcc.el" (20119 34052)) 8795;;;;;; "erc-dcc" "erc/erc-dcc.el" (20179 28130))
8786;;; Generated autoloads from erc/erc-dcc.el 8796;;; Generated autoloads from erc/erc-dcc.el
8787 (autoload 'erc-dcc-mode "erc-dcc") 8797 (autoload 'erc-dcc-mode "erc-dcc")
8788 8798
@@ -8815,7 +8825,7 @@ that subcommand.
8815;;;;;; erc-ezb-add-session erc-ezb-end-of-session-list erc-ezb-init-session-list 8825;;;;;; erc-ezb-add-session erc-ezb-end-of-session-list erc-ezb-init-session-list
8816;;;;;; erc-ezb-identify erc-ezb-notice-autodetect erc-ezb-lookup-action 8826;;;;;; erc-ezb-identify erc-ezb-notice-autodetect erc-ezb-lookup-action
8817;;;;;; erc-ezb-get-login erc-cmd-ezb) "erc-ezbounce" "erc/erc-ezbounce.el" 8827;;;;;; erc-ezb-get-login erc-cmd-ezb) "erc-ezbounce" "erc/erc-ezbounce.el"
8818;;;;;; (20119 34052)) 8828;;;;;; (19845 45374))
8819;;; Generated autoloads from erc/erc-ezbounce.el 8829;;; Generated autoloads from erc/erc-ezbounce.el
8820 8830
8821(autoload 'erc-cmd-ezb "erc-ezbounce" "\ 8831(autoload 'erc-cmd-ezb "erc-ezbounce" "\
@@ -8878,7 +8888,7 @@ Add EZBouncer convenience functions to ERC.
8878;;;*** 8888;;;***
8879 8889
8880;;;### (autoloads (erc-fill) "erc-fill" "erc/erc-fill.el" (20127 8890;;;### (autoloads (erc-fill) "erc-fill" "erc/erc-fill.el" (20127
8881;;;;;; 26298)) 8891;;;;;; 62865))
8882;;; Generated autoloads from erc/erc-fill.el 8892;;; Generated autoloads from erc/erc-fill.el
8883 (autoload 'erc-fill-mode "erc-fill" nil t) 8893 (autoload 'erc-fill-mode "erc-fill" nil t)
8884 8894
@@ -8891,7 +8901,7 @@ You can put this on `erc-insert-modify-hook' and/or `erc-send-modify-hook'.
8891;;;*** 8901;;;***
8892 8902
8893;;;### (autoloads (erc-identd-stop erc-identd-start) "erc-identd" 8903;;;### (autoloads (erc-identd-stop erc-identd-start) "erc-identd"
8894;;;;;; "erc/erc-identd.el" (20119 34052)) 8904;;;;;; "erc/erc-identd.el" (19845 45374))
8895;;; Generated autoloads from erc/erc-identd.el 8905;;; Generated autoloads from erc/erc-identd.el
8896 (autoload 'erc-identd-mode "erc-identd") 8906 (autoload 'erc-identd-mode "erc-identd")
8897 8907
@@ -8913,7 +8923,7 @@ system.
8913;;;*** 8923;;;***
8914 8924
8915;;;### (autoloads (erc-create-imenu-index) "erc-imenu" "erc/erc-imenu.el" 8925;;;### (autoloads (erc-create-imenu-index) "erc-imenu" "erc/erc-imenu.el"
8916;;;;;; (20119 34052)) 8926;;;;;; (19845 45374))
8917;;; Generated autoloads from erc/erc-imenu.el 8927;;; Generated autoloads from erc/erc-imenu.el
8918 8928
8919(autoload 'erc-create-imenu-index "erc-imenu" "\ 8929(autoload 'erc-create-imenu-index "erc-imenu" "\
@@ -8923,20 +8933,20 @@ system.
8923 8933
8924;;;*** 8934;;;***
8925 8935
8926;;;### (autoloads nil "erc-join" "erc/erc-join.el" (20119 34052)) 8936;;;### (autoloads nil "erc-join" "erc/erc-join.el" (19845 45374))
8927;;; Generated autoloads from erc/erc-join.el 8937;;; Generated autoloads from erc/erc-join.el
8928 (autoload 'erc-autojoin-mode "erc-join" nil t) 8938 (autoload 'erc-autojoin-mode "erc-join" nil t)
8929 8939
8930;;;*** 8940;;;***
8931 8941
8932;;;### (autoloads nil "erc-list" "erc/erc-list.el" (20119 34052)) 8942;;;### (autoloads nil "erc-list" "erc/erc-list.el" (19845 45374))
8933;;; Generated autoloads from erc/erc-list.el 8943;;; Generated autoloads from erc/erc-list.el
8934 (autoload 'erc-list-mode "erc-list") 8944 (autoload 'erc-list-mode "erc-list")
8935 8945
8936;;;*** 8946;;;***
8937 8947
8938;;;### (autoloads (erc-save-buffer-in-logs erc-logging-enabled) "erc-log" 8948;;;### (autoloads (erc-save-buffer-in-logs erc-logging-enabled) "erc-log"
8939;;;;;; "erc/erc-log.el" (20119 34052)) 8949;;;;;; "erc/erc-log.el" (20168 57844))
8940;;; Generated autoloads from erc/erc-log.el 8950;;; Generated autoloads from erc/erc-log.el
8941 (autoload 'erc-log-mode "erc-log" nil t) 8951 (autoload 'erc-log-mode "erc-log" nil t)
8942 8952
@@ -8968,7 +8978,7 @@ You can save every individual message by putting this function on
8968;;;### (autoloads (erc-delete-dangerous-host erc-add-dangerous-host 8978;;;### (autoloads (erc-delete-dangerous-host erc-add-dangerous-host
8969;;;;;; erc-delete-keyword erc-add-keyword erc-delete-fool erc-add-fool 8979;;;;;; erc-delete-keyword erc-add-keyword erc-delete-fool erc-add-fool
8970;;;;;; erc-delete-pal erc-add-pal) "erc-match" "erc/erc-match.el" 8980;;;;;; erc-delete-pal erc-add-pal) "erc-match" "erc/erc-match.el"
8971;;;;;; (20119 34052)) 8981;;;;;; (20168 57844))
8972;;; Generated autoloads from erc/erc-match.el 8982;;; Generated autoloads from erc/erc-match.el
8973 (autoload 'erc-match-mode "erc-match") 8983 (autoload 'erc-match-mode "erc-match")
8974 8984
@@ -9014,14 +9024,14 @@ Delete dangerous-host interactively to `erc-dangerous-hosts'.
9014 9024
9015;;;*** 9025;;;***
9016 9026
9017;;;### (autoloads nil "erc-menu" "erc/erc-menu.el" (20119 34052)) 9027;;;### (autoloads nil "erc-menu" "erc/erc-menu.el" (19845 45374))
9018;;; Generated autoloads from erc/erc-menu.el 9028;;; Generated autoloads from erc/erc-menu.el
9019 (autoload 'erc-menu-mode "erc-menu" nil t) 9029 (autoload 'erc-menu-mode "erc-menu" nil t)
9020 9030
9021;;;*** 9031;;;***
9022 9032
9023;;;### (autoloads (erc-cmd-WHOLEFT) "erc-netsplit" "erc/erc-netsplit.el" 9033;;;### (autoloads (erc-cmd-WHOLEFT) "erc-netsplit" "erc/erc-netsplit.el"
9024;;;;;; (20119 34052)) 9034;;;;;; (19845 45374))
9025;;; Generated autoloads from erc/erc-netsplit.el 9035;;; Generated autoloads from erc/erc-netsplit.el
9026 (autoload 'erc-netsplit-mode "erc-netsplit") 9036 (autoload 'erc-netsplit-mode "erc-netsplit")
9027 9037
@@ -9033,7 +9043,7 @@ Show who's gone.
9033;;;*** 9043;;;***
9034 9044
9035;;;### (autoloads (erc-server-select erc-determine-network) "erc-networks" 9045;;;### (autoloads (erc-server-select erc-determine-network) "erc-networks"
9036;;;;;; "erc/erc-networks.el" (20119 34052)) 9046;;;;;; "erc/erc-networks.el" (19845 45374))
9037;;; Generated autoloads from erc/erc-networks.el 9047;;; Generated autoloads from erc/erc-networks.el
9038 9048
9039(autoload 'erc-determine-network "erc-networks" "\ 9049(autoload 'erc-determine-network "erc-networks" "\
@@ -9051,13 +9061,13 @@ Interactively select a server to connect to using `erc-server-alist'.
9051;;;*** 9061;;;***
9052 9062
9053;;;### (autoloads (pcomplete/erc-mode/NOTIFY erc-cmd-NOTIFY) "erc-notify" 9063;;;### (autoloads (pcomplete/erc-mode/NOTIFY erc-cmd-NOTIFY) "erc-notify"
9054;;;;;; "erc/erc-notify.el" (20119 34052)) 9064;;;;;; "erc/erc-notify.el" (20161 45793))
9055;;; Generated autoloads from erc/erc-notify.el 9065;;; Generated autoloads from erc/erc-notify.el
9056 (autoload 'erc-notify-mode "erc-notify" nil t) 9066 (autoload 'erc-notify-mode "erc-notify" nil t)
9057 9067
9058(autoload 'erc-cmd-NOTIFY "erc-notify" "\ 9068(autoload 'erc-cmd-NOTIFY "erc-notify" "\
9059Change `erc-notify-list' or list current notify-list members online. 9069Change `erc-notify-list' or list current notify-list members online.
9060Without args, list the current list of notificated people online, 9070Without args, list the current list of notified people online,
9061with args, toggle notify status of people. 9071with args, toggle notify status of people.
9062 9072
9063\(fn &rest ARGS)" nil nil) 9073\(fn &rest ARGS)" nil nil)
@@ -9069,33 +9079,33 @@ with args, toggle notify status of people.
9069 9079
9070;;;*** 9080;;;***
9071 9081
9072;;;### (autoloads nil "erc-page" "erc/erc-page.el" (20119 34052)) 9082;;;### (autoloads nil "erc-page" "erc/erc-page.el" (19845 45374))
9073;;; Generated autoloads from erc/erc-page.el 9083;;; Generated autoloads from erc/erc-page.el
9074 (autoload 'erc-page-mode "erc-page") 9084 (autoload 'erc-page-mode "erc-page")
9075 9085
9076;;;*** 9086;;;***
9077 9087
9078;;;### (autoloads nil "erc-pcomplete" "erc/erc-pcomplete.el" (20119 9088;;;### (autoloads nil "erc-pcomplete" "erc/erc-pcomplete.el" (19936
9079;;;;;; 34052)) 9089;;;;;; 52203))
9080;;; Generated autoloads from erc/erc-pcomplete.el 9090;;; Generated autoloads from erc/erc-pcomplete.el
9081 (autoload 'erc-completion-mode "erc-pcomplete" nil t) 9091 (autoload 'erc-completion-mode "erc-pcomplete" nil t)
9082 9092
9083;;;*** 9093;;;***
9084 9094
9085;;;### (autoloads nil "erc-replace" "erc/erc-replace.el" (20119 34052)) 9095;;;### (autoloads nil "erc-replace" "erc/erc-replace.el" (19845 45374))
9086;;; Generated autoloads from erc/erc-replace.el 9096;;; Generated autoloads from erc/erc-replace.el
9087 (autoload 'erc-replace-mode "erc-replace") 9097 (autoload 'erc-replace-mode "erc-replace")
9088 9098
9089;;;*** 9099;;;***
9090 9100
9091;;;### (autoloads nil "erc-ring" "erc/erc-ring.el" (20119 34052)) 9101;;;### (autoloads nil "erc-ring" "erc/erc-ring.el" (19845 45374))
9092;;; Generated autoloads from erc/erc-ring.el 9102;;; Generated autoloads from erc/erc-ring.el
9093 (autoload 'erc-ring-mode "erc-ring" nil t) 9103 (autoload 'erc-ring-mode "erc-ring" nil t)
9094 9104
9095;;;*** 9105;;;***
9096 9106
9097;;;### (autoloads (erc-nickserv-identify erc-nickserv-identify-mode) 9107;;;### (autoloads (erc-nickserv-identify erc-nickserv-identify-mode)
9098;;;;;; "erc-services" "erc/erc-services.el" (20119 34052)) 9108;;;;;; "erc-services" "erc/erc-services.el" (19845 45374))
9099;;; Generated autoloads from erc/erc-services.el 9109;;; Generated autoloads from erc/erc-services.el
9100 (autoload 'erc-services-mode "erc-services" nil t) 9110 (autoload 'erc-services-mode "erc-services" nil t)
9101 9111
@@ -9112,14 +9122,14 @@ When called interactively, read the password using `read-passwd'.
9112 9122
9113;;;*** 9123;;;***
9114 9124
9115;;;### (autoloads nil "erc-sound" "erc/erc-sound.el" (20119 34052)) 9125;;;### (autoloads nil "erc-sound" "erc/erc-sound.el" (19845 45374))
9116;;; Generated autoloads from erc/erc-sound.el 9126;;; Generated autoloads from erc/erc-sound.el
9117 (autoload 'erc-sound-mode "erc-sound") 9127 (autoload 'erc-sound-mode "erc-sound")
9118 9128
9119;;;*** 9129;;;***
9120 9130
9121;;;### (autoloads (erc-speedbar-browser) "erc-speedbar" "erc/erc-speedbar.el" 9131;;;### (autoloads (erc-speedbar-browser) "erc-speedbar" "erc/erc-speedbar.el"
9122;;;;;; (20119 34052)) 9132;;;;;; (19845 45374))
9123;;; Generated autoloads from erc/erc-speedbar.el 9133;;; Generated autoloads from erc/erc-speedbar.el
9124 9134
9125(autoload 'erc-speedbar-browser "erc-speedbar" "\ 9135(autoload 'erc-speedbar-browser "erc-speedbar" "\
@@ -9130,21 +9140,21 @@ This will add a speedbar major display mode.
9130 9140
9131;;;*** 9141;;;***
9132 9142
9133;;;### (autoloads nil "erc-spelling" "erc/erc-spelling.el" (20119 9143;;;### (autoloads nil "erc-spelling" "erc/erc-spelling.el" (19845
9134;;;;;; 34052)) 9144;;;;;; 45374))
9135;;; Generated autoloads from erc/erc-spelling.el 9145;;; Generated autoloads from erc/erc-spelling.el
9136 (autoload 'erc-spelling-mode "erc-spelling" nil t) 9146 (autoload 'erc-spelling-mode "erc-spelling" nil t)
9137 9147
9138;;;*** 9148;;;***
9139 9149
9140;;;### (autoloads nil "erc-stamp" "erc/erc-stamp.el" (20119 34052)) 9150;;;### (autoloads nil "erc-stamp" "erc/erc-stamp.el" (19845 45374))
9141;;; Generated autoloads from erc/erc-stamp.el 9151;;; Generated autoloads from erc/erc-stamp.el
9142 (autoload 'erc-timestamp-mode "erc-stamp" nil t) 9152 (autoload 'erc-timestamp-mode "erc-stamp" nil t)
9143 9153
9144;;;*** 9154;;;***
9145 9155
9146;;;### (autoloads (erc-track-minor-mode) "erc-track" "erc/erc-track.el" 9156;;;### (autoloads (erc-track-minor-mode) "erc-track" "erc/erc-track.el"
9147;;;;;; (20127 26257)) 9157;;;;;; (20168 57844))
9148;;; Generated autoloads from erc/erc-track.el 9158;;; Generated autoloads from erc/erc-track.el
9149 9159
9150(defvar erc-track-minor-mode nil "\ 9160(defvar erc-track-minor-mode nil "\
@@ -9170,7 +9180,7 @@ keybindings will not do anything useful.
9170;;;*** 9180;;;***
9171 9181
9172;;;### (autoloads (erc-truncate-buffer erc-truncate-buffer-to-size) 9182;;;### (autoloads (erc-truncate-buffer erc-truncate-buffer-to-size)
9173;;;;;; "erc-truncate" "erc/erc-truncate.el" (20119 34052)) 9183;;;;;; "erc-truncate" "erc/erc-truncate.el" (19845 45374))
9174;;; Generated autoloads from erc/erc-truncate.el 9184;;; Generated autoloads from erc/erc-truncate.el
9175 (autoload 'erc-truncate-mode "erc-truncate" nil t) 9185 (autoload 'erc-truncate-mode "erc-truncate" nil t)
9176 9186
@@ -9190,7 +9200,7 @@ Meant to be used in hooks, like `erc-insert-post-hook'.
9190;;;*** 9200;;;***
9191 9201
9192;;;### (autoloads (erc-xdcc-add-file) "erc-xdcc" "erc/erc-xdcc.el" 9202;;;### (autoloads (erc-xdcc-add-file) "erc-xdcc" "erc/erc-xdcc.el"
9193;;;;;; (20119 34052)) 9203;;;;;; (19845 45374))
9194;;; Generated autoloads from erc/erc-xdcc.el 9204;;; Generated autoloads from erc/erc-xdcc.el
9195 (autoload 'erc-xdcc-mode "erc-xdcc") 9205 (autoload 'erc-xdcc-mode "erc-xdcc")
9196 9206
@@ -9203,7 +9213,7 @@ Add a file to `erc-xdcc-files'.
9203 9213
9204;;;### (autoloads (ert-describe-test ert-run-tests-interactively 9214;;;### (autoloads (ert-describe-test ert-run-tests-interactively
9205;;;;;; ert-run-tests-batch-and-exit ert-run-tests-batch ert-deftest) 9215;;;;;; ert-run-tests-batch-and-exit ert-run-tests-batch ert-deftest)
9206;;;;;; "ert" "emacs-lisp/ert.el" (20123 28776)) 9216;;;;;; "ert" "emacs-lisp/ert.el" (20168 57844))
9207;;; Generated autoloads from emacs-lisp/ert.el 9217;;; Generated autoloads from emacs-lisp/ert.el
9208 9218
9209(autoload 'ert-deftest "ert" "\ 9219(autoload 'ert-deftest "ert" "\
@@ -9273,7 +9283,7 @@ Display the documentation for TEST-OR-TEST-NAME (a symbol or ert-test).
9273;;;*** 9283;;;***
9274 9284
9275;;;### (autoloads (ert-kill-all-test-buffers) "ert-x" "emacs-lisp/ert-x.el" 9285;;;### (autoloads (ert-kill-all-test-buffers) "ert-x" "emacs-lisp/ert-x.el"
9276;;;;;; (20119 34052)) 9286;;;;;; (19845 45374))
9277;;; Generated autoloads from emacs-lisp/ert-x.el 9287;;; Generated autoloads from emacs-lisp/ert-x.el
9278 9288
9279(put 'ert-with-test-buffer 'lisp-indent-function 1) 9289(put 'ert-with-test-buffer 'lisp-indent-function 1)
@@ -9285,8 +9295,8 @@ Kill all test buffers that are still live.
9285 9295
9286;;;*** 9296;;;***
9287 9297
9288;;;### (autoloads (eshell-mode) "esh-mode" "eshell/esh-mode.el" (20119 9298;;;### (autoloads (eshell-mode) "esh-mode" "eshell/esh-mode.el" (20164
9289;;;;;; 34052)) 9299;;;;;; 60780))
9290;;; Generated autoloads from eshell/esh-mode.el 9300;;; Generated autoloads from eshell/esh-mode.el
9291 9301
9292(autoload 'eshell-mode "esh-mode" "\ 9302(autoload 'eshell-mode "esh-mode" "\
@@ -9299,7 +9309,7 @@ Emacs shell interactive mode.
9299;;;*** 9309;;;***
9300 9310
9301;;;### (autoloads (eshell-command-result eshell-command eshell) "eshell" 9311;;;### (autoloads (eshell-command-result eshell-command eshell) "eshell"
9302;;;;;; "eshell/eshell.el" (20119 34052)) 9312;;;;;; "eshell/eshell.el" (20116 6099))
9303;;; Generated autoloads from eshell/eshell.el 9313;;; Generated autoloads from eshell/eshell.el
9304 9314
9305(autoload 'eshell "eshell" "\ 9315(autoload 'eshell "eshell" "\
@@ -9340,7 +9350,7 @@ corresponding to a successful execution.
9340;;;;;; visit-tags-table tags-table-mode find-tag-default-function 9350;;;;;; visit-tags-table tags-table-mode find-tag-default-function
9341;;;;;; find-tag-hook tags-add-tables tags-compression-info-list 9351;;;;;; find-tag-hook tags-add-tables tags-compression-info-list
9342;;;;;; tags-table-list tags-case-fold-search) "etags" "progmodes/etags.el" 9352;;;;;; tags-table-list tags-case-fold-search) "etags" "progmodes/etags.el"
9343;;;;;; (20119 34052)) 9353;;;;;; (20168 57844))
9344;;; Generated autoloads from progmodes/etags.el 9354;;; Generated autoloads from progmodes/etags.el
9345 9355
9346(defvar tags-file-name nil "\ 9356(defvar tags-file-name nil "\
@@ -9658,7 +9668,7 @@ for \\[find-tag] (which see).
9658;;;;;; ethio-fidel-to-sera-marker ethio-fidel-to-sera-region ethio-fidel-to-sera-buffer 9668;;;;;; ethio-fidel-to-sera-marker ethio-fidel-to-sera-region ethio-fidel-to-sera-buffer
9659;;;;;; ethio-sera-to-fidel-marker ethio-sera-to-fidel-region ethio-sera-to-fidel-buffer 9669;;;;;; ethio-sera-to-fidel-marker ethio-sera-to-fidel-region ethio-sera-to-fidel-buffer
9660;;;;;; setup-ethiopic-environment-internal) "ethio-util" "language/ethio-util.el" 9670;;;;;; setup-ethiopic-environment-internal) "ethio-util" "language/ethio-util.el"
9661;;;;;; (20119 34052)) 9671;;;;;; (20175 31160))
9662;;; Generated autoloads from language/ethio-util.el 9672;;; Generated autoloads from language/ethio-util.el
9663 9673
9664(autoload 'setup-ethiopic-environment-internal "ethio-util" "\ 9674(autoload 'setup-ethiopic-environment-internal "ethio-util" "\
@@ -9828,7 +9838,7 @@ With ARG, insert that many delimiters.
9828 9838
9829;;;### (autoloads (eudc-load-eudc eudc-query-form eudc-expand-inline 9839;;;### (autoloads (eudc-load-eudc eudc-query-form eudc-expand-inline
9830;;;;;; eudc-get-phone eudc-get-email eudc-set-server) "eudc" "net/eudc.el" 9840;;;;;; eudc-get-phone eudc-get-email eudc-set-server) "eudc" "net/eudc.el"
9831;;;;;; (20119 34052)) 9841;;;;;; (19931 11784))
9832;;; Generated autoloads from net/eudc.el 9842;;; Generated autoloads from net/eudc.el
9833 9843
9834(autoload 'eudc-set-server "eudc" "\ 9844(autoload 'eudc-set-server "eudc" "\
@@ -9884,7 +9894,7 @@ This does nothing except loading eudc by autoload side-effect.
9884 9894
9885;;;### (autoloads (eudc-display-jpeg-as-button eudc-display-jpeg-inline 9895;;;### (autoloads (eudc-display-jpeg-as-button eudc-display-jpeg-inline
9886;;;;;; eudc-display-sound eudc-display-mail eudc-display-url eudc-display-generic-binary) 9896;;;;;; eudc-display-sound eudc-display-mail eudc-display-url eudc-display-generic-binary)
9887;;;;;; "eudc-bob" "net/eudc-bob.el" (20119 34052)) 9897;;;;;; "eudc-bob" "net/eudc-bob.el" (19845 45374))
9888;;; Generated autoloads from net/eudc-bob.el 9898;;; Generated autoloads from net/eudc-bob.el
9889 9899
9890(autoload 'eudc-display-generic-binary "eudc-bob" "\ 9900(autoload 'eudc-display-generic-binary "eudc-bob" "\
@@ -9920,7 +9930,7 @@ Display a button for the JPEG DATA.
9920;;;*** 9930;;;***
9921 9931
9922;;;### (autoloads (eudc-try-bbdb-insert eudc-insert-record-at-point-into-bbdb) 9932;;;### (autoloads (eudc-try-bbdb-insert eudc-insert-record-at-point-into-bbdb)
9923;;;;;; "eudc-export" "net/eudc-export.el" (20119 34052)) 9933;;;;;; "eudc-export" "net/eudc-export.el" (20175 31160))
9924;;; Generated autoloads from net/eudc-export.el 9934;;; Generated autoloads from net/eudc-export.el
9925 9935
9926(autoload 'eudc-insert-record-at-point-into-bbdb "eudc-export" "\ 9936(autoload 'eudc-insert-record-at-point-into-bbdb "eudc-export" "\
@@ -9937,7 +9947,7 @@ Call `eudc-insert-record-at-point-into-bbdb' if on a record.
9937;;;*** 9947;;;***
9938 9948
9939;;;### (autoloads (eudc-edit-hotlist) "eudc-hotlist" "net/eudc-hotlist.el" 9949;;;### (autoloads (eudc-edit-hotlist) "eudc-hotlist" "net/eudc-hotlist.el"
9940;;;;;; (20119 34052)) 9950;;;;;; (20162 19074))
9941;;; Generated autoloads from net/eudc-hotlist.el 9951;;; Generated autoloads from net/eudc-hotlist.el
9942 9952
9943(autoload 'eudc-edit-hotlist "eudc-hotlist" "\ 9953(autoload 'eudc-edit-hotlist "eudc-hotlist" "\
@@ -9947,8 +9957,8 @@ Edit the hotlist of directory servers in a specialized buffer.
9947 9957
9948;;;*** 9958;;;***
9949 9959
9950;;;### (autoloads (ewoc-create) "ewoc" "emacs-lisp/ewoc.el" (20119 9960;;;### (autoloads (ewoc-create) "ewoc" "emacs-lisp/ewoc.el" (19845
9951;;;;;; 34052)) 9961;;;;;; 45374))
9952;;; Generated autoloads from emacs-lisp/ewoc.el 9962;;; Generated autoloads from emacs-lisp/ewoc.el
9953 9963
9954(autoload 'ewoc-create "ewoc" "\ 9964(autoload 'ewoc-create "ewoc" "\
@@ -9977,7 +9987,7 @@ fourth arg NOSEP non-nil inhibits this.
9977;;;### (autoloads (executable-make-buffer-file-executable-if-script-p 9987;;;### (autoloads (executable-make-buffer-file-executable-if-script-p
9978;;;;;; executable-self-display executable-set-magic executable-interpret 9988;;;;;; executable-self-display executable-set-magic executable-interpret
9979;;;;;; executable-command-find-posix-p) "executable" "progmodes/executable.el" 9989;;;;;; executable-command-find-posix-p) "executable" "progmodes/executable.el"
9980;;;;;; (20119 34052)) 9990;;;;;; (20160 63745))
9981;;; Generated autoloads from progmodes/executable.el 9991;;; Generated autoloads from progmodes/executable.el
9982 9992
9983(autoload 'executable-command-find-posix-p "executable" "\ 9993(autoload 'executable-command-find-posix-p "executable" "\
@@ -10020,18 +10030,18 @@ file modes.
10020 10030
10021;;;### (autoloads (expand-jump-to-next-slot expand-jump-to-previous-slot 10031;;;### (autoloads (expand-jump-to-next-slot expand-jump-to-previous-slot
10022;;;;;; expand-abbrev-hook expand-add-abbrevs) "expand" "expand.el" 10032;;;;;; expand-abbrev-hook expand-add-abbrevs) "expand" "expand.el"
10023;;;;;; (20119 34052)) 10033;;;;;; (20164 29468))
10024;;; Generated autoloads from expand.el 10034;;; Generated autoloads from expand.el
10025 10035
10026(autoload 'expand-add-abbrevs "expand" "\ 10036(autoload 'expand-add-abbrevs "expand" "\
10027Add a list of abbrev to abbrev table TABLE. 10037Add a list of abbreviations to abbrev table TABLE.
10028ABBREVS is a list of abbrev definitions; each abbrev description entry 10038ABBREVS is a list of abbrev definitions; each abbrev description entry
10029has the form (ABBREV EXPANSION ARG). 10039has the form (ABBREV EXPANSION ARG).
10030 10040
10031ABBREV is the abbreviation to replace. 10041ABBREV is the abbreviation to replace.
10032 10042
10033EXPANSION is the replacement string or a function which will make the 10043EXPANSION is the replacement string or a function which will make the
10034expansion. For example you, could use the DMacros or skeleton packages 10044expansion. For example, you could use the DMacros or skeleton packages
10035to generate such functions. 10045to generate such functions.
10036 10046
10037ARG is an optional argument which can be a number or a list of 10047ARG is an optional argument which can be a number or a list of
@@ -10069,7 +10079,7 @@ This is used only in conjunction with `expand-add-abbrevs'.
10069 10079
10070;;;*** 10080;;;***
10071 10081
10072;;;### (autoloads (f90-mode) "f90" "progmodes/f90.el" (20119 34052)) 10082;;;### (autoloads (f90-mode) "f90" "progmodes/f90.el" (20178 7273))
10073;;; Generated autoloads from progmodes/f90.el 10083;;; Generated autoloads from progmodes/f90.el
10074 10084
10075(autoload 'f90-mode "f90" "\ 10085(autoload 'f90-mode "f90" "\
@@ -10139,8 +10149,8 @@ with no args, if that value is non-nil.
10139;;;### (autoloads (variable-pitch-mode buffer-face-toggle buffer-face-set 10149;;;### (autoloads (variable-pitch-mode buffer-face-toggle buffer-face-set
10140;;;;;; buffer-face-mode text-scale-adjust text-scale-decrease text-scale-increase 10150;;;;;; buffer-face-mode text-scale-adjust text-scale-decrease text-scale-increase
10141;;;;;; text-scale-set face-remap-set-base face-remap-reset-base 10151;;;;;; text-scale-set face-remap-set-base face-remap-reset-base
10142;;;;;; face-remap-add-relative) "face-remap" "face-remap.el" (20126 10152;;;;;; face-remap-add-relative) "face-remap" "face-remap.el" (20127
10143;;;;;; 41069)) 10153;;;;;; 62865))
10144;;; Generated autoloads from face-remap.el 10154;;; Generated autoloads from face-remap.el
10145 10155
10146(autoload 'face-remap-add-relative "face-remap" "\ 10156(autoload 'face-remap-add-relative "face-remap" "\
@@ -10280,7 +10290,7 @@ Besides the choice of face, it is the same as `buffer-face-mode'.
10280 10290
10281;;;### (autoloads (feedmail-queue-reminder feedmail-run-the-queue 10291;;;### (autoloads (feedmail-queue-reminder feedmail-run-the-queue
10282;;;;;; feedmail-run-the-queue-global-prompt feedmail-run-the-queue-no-prompts 10292;;;;;; feedmail-run-the-queue-global-prompt feedmail-run-the-queue-no-prompts
10283;;;;;; feedmail-send-it) "feedmail" "mail/feedmail.el" (20119 34052)) 10293;;;;;; feedmail-send-it) "feedmail" "mail/feedmail.el" (20172 54913))
10284;;; Generated autoloads from mail/feedmail.el 10294;;; Generated autoloads from mail/feedmail.el
10285 10295
10286(autoload 'feedmail-send-it "feedmail" "\ 10296(autoload 'feedmail-send-it "feedmail" "\
@@ -10334,7 +10344,7 @@ you can set `feedmail-queue-reminder-alist' to nil.
10334;;;*** 10344;;;***
10335 10345
10336;;;### (autoloads (ffap-bindings dired-at-point ffap-at-mouse ffap-menu 10346;;;### (autoloads (ffap-bindings dired-at-point ffap-at-mouse ffap-menu
10337;;;;;; find-file-at-point ffap-next) "ffap" "ffap.el" (20119 34052)) 10347;;;;;; find-file-at-point ffap-next) "ffap" "ffap.el" (20164 60780))
10338;;; Generated autoloads from ffap.el 10348;;; Generated autoloads from ffap.el
10339 10349
10340(autoload 'ffap-next "ffap" "\ 10350(autoload 'ffap-next "ffap" "\
@@ -10398,7 +10408,7 @@ Evaluate the forms in variable `ffap-bindings'.
10398;;;### (autoloads (file-cache-minibuffer-complete file-cache-add-directory-recursively 10408;;;### (autoloads (file-cache-minibuffer-complete file-cache-add-directory-recursively
10399;;;;;; file-cache-add-directory-using-locate file-cache-add-directory-using-find 10409;;;;;; file-cache-add-directory-using-locate file-cache-add-directory-using-find
10400;;;;;; file-cache-add-file file-cache-add-directory-list file-cache-add-directory) 10410;;;;;; file-cache-add-file file-cache-add-directory-list file-cache-add-directory)
10401;;;;;; "filecache" "filecache.el" (20119 34052)) 10411;;;;;; "filecache" "filecache.el" (19845 45374))
10402;;; Generated autoloads from filecache.el 10412;;; Generated autoloads from filecache.el
10403 10413
10404(autoload 'file-cache-add-directory "filecache" "\ 10414(autoload 'file-cache-add-directory "filecache" "\
@@ -10458,7 +10468,7 @@ the name is considered already unique; only the second substitution
10458;;;;;; copy-file-locals-to-dir-locals delete-dir-local-variable 10468;;;;;; copy-file-locals-to-dir-locals delete-dir-local-variable
10459;;;;;; add-dir-local-variable delete-file-local-variable-prop-line 10469;;;;;; add-dir-local-variable delete-file-local-variable-prop-line
10460;;;;;; add-file-local-variable-prop-line delete-file-local-variable 10470;;;;;; add-file-local-variable-prop-line delete-file-local-variable
10461;;;;;; add-file-local-variable) "files-x" "files-x.el" (20119 34052)) 10471;;;;;; add-file-local-variable) "files-x" "files-x.el" (20167 36967))
10462;;; Generated autoloads from files-x.el 10472;;; Generated autoloads from files-x.el
10463 10473
10464(autoload 'add-file-local-variable "files-x" "\ 10474(autoload 'add-file-local-variable "files-x" "\
@@ -10523,8 +10533,8 @@ Copy directory-local variables to the -*- line.
10523 10533
10524;;;*** 10534;;;***
10525 10535
10526;;;### (autoloads (filesets-init) "filesets" "filesets.el" (20119 10536;;;### (autoloads (filesets-init) "filesets" "filesets.el" (20178
10527;;;;;; 34052)) 10537;;;;;; 7273))
10528;;; Generated autoloads from filesets.el 10538;;; Generated autoloads from filesets.el
10529 10539
10530(autoload 'filesets-init "filesets" "\ 10540(autoload 'filesets-init "filesets" "\
@@ -10535,7 +10545,7 @@ Set up hooks, load the cache file -- if existing -- and build the menu.
10535 10545
10536;;;*** 10546;;;***
10537 10547
10538;;;### (autoloads (find-cmd) "find-cmd" "find-cmd.el" (20119 34052)) 10548;;;### (autoloads (find-cmd) "find-cmd" "find-cmd.el" (19845 45374))
10539;;; Generated autoloads from find-cmd.el 10549;;; Generated autoloads from find-cmd.el
10540 10550
10541(autoload 'find-cmd "find-cmd" "\ 10551(autoload 'find-cmd "find-cmd" "\
@@ -10555,7 +10565,7 @@ result is a string that should be ready for the command line.
10555;;;*** 10565;;;***
10556 10566
10557;;;### (autoloads (find-grep-dired find-name-dired find-dired) "find-dired" 10567;;;### (autoloads (find-grep-dired find-name-dired find-dired) "find-dired"
10558;;;;;; "find-dired.el" (20119 34052)) 10568;;;;;; "find-dired.el" (19980 19797))
10559;;; Generated autoloads from find-dired.el 10569;;; Generated autoloads from find-dired.el
10560 10570
10561(autoload 'find-dired "find-dired" "\ 10571(autoload 'find-dired "find-dired" "\
@@ -10595,7 +10605,7 @@ use in place of \"-ls\" as the final argument.
10595 10605
10596;;;### (autoloads (ff-mouse-find-other-file-other-window ff-mouse-find-other-file 10606;;;### (autoloads (ff-mouse-find-other-file-other-window ff-mouse-find-other-file
10597;;;;;; ff-find-other-file ff-get-other-file) "find-file" "find-file.el" 10607;;;;;; ff-find-other-file ff-get-other-file) "find-file" "find-file.el"
10598;;;;;; (20119 34052)) 10608;;;;;; (19845 45374))
10599;;; Generated autoloads from find-file.el 10609;;; Generated autoloads from find-file.el
10600 10610
10601(defvar ff-special-constructs `((,(purecopy "^#\\s *\\(include\\|import\\)\\s +[<\"]\\(.*\\)[>\"]") lambda nil (buffer-substring (match-beginning 2) (match-end 2)))) "\ 10611(defvar ff-special-constructs `((,(purecopy "^#\\s *\\(include\\|import\\)\\s +[<\"]\\(.*\\)[>\"]") lambda nil (buffer-substring (match-beginning 2) (match-end 2)))) "\
@@ -10689,7 +10699,7 @@ Visit the file you click on in another window.
10689;;;;;; find-variable find-variable-noselect find-function-other-frame 10699;;;;;; find-variable find-variable-noselect find-function-other-frame
10690;;;;;; find-function-other-window find-function find-function-noselect 10700;;;;;; find-function-other-window find-function find-function-noselect
10691;;;;;; find-function-search-for-symbol find-library) "find-func" 10701;;;;;; find-function-search-for-symbol find-library) "find-func"
10692;;;;;; "emacs-lisp/find-func.el" (20119 34052)) 10702;;;;;; "emacs-lisp/find-func.el" (20153 32815))
10693;;; Generated autoloads from emacs-lisp/find-func.el 10703;;; Generated autoloads from emacs-lisp/find-func.el
10694 10704
10695(autoload 'find-library "find-func" "\ 10705(autoload 'find-library "find-func" "\
@@ -10848,7 +10858,7 @@ Define some key bindings for the find-function family of functions.
10848;;;*** 10858;;;***
10849 10859
10850;;;### (autoloads (find-lisp-find-dired-filter find-lisp-find-dired-subdirectories 10860;;;### (autoloads (find-lisp-find-dired-filter find-lisp-find-dired-subdirectories
10851;;;;;; find-lisp-find-dired) "find-lisp" "find-lisp.el" (20119 34052)) 10861;;;;;; find-lisp-find-dired) "find-lisp" "find-lisp.el" (19886 45771))
10852;;; Generated autoloads from find-lisp.el 10862;;; Generated autoloads from find-lisp.el
10853 10863
10854(autoload 'find-lisp-find-dired "find-lisp" "\ 10864(autoload 'find-lisp-find-dired "find-lisp" "\
@@ -10869,7 +10879,7 @@ Change the filter on a find-lisp-find-dired buffer to REGEXP.
10869;;;*** 10879;;;***
10870 10880
10871;;;### (autoloads (finder-by-keyword finder-commentary finder-list-keywords) 10881;;;### (autoloads (finder-by-keyword finder-commentary finder-list-keywords)
10872;;;;;; "finder" "finder.el" (20119 34052)) 10882;;;;;; "finder" "finder.el" (19893 19022))
10873;;; Generated autoloads from finder.el 10883;;; Generated autoloads from finder.el
10874 10884
10875(autoload 'finder-list-keywords "finder" "\ 10885(autoload 'finder-list-keywords "finder" "\
@@ -10891,7 +10901,7 @@ Find packages matching a given keyword.
10891;;;*** 10901;;;***
10892 10902
10893;;;### (autoloads (enable-flow-control-on enable-flow-control) "flow-ctrl" 10903;;;### (autoloads (enable-flow-control-on enable-flow-control) "flow-ctrl"
10894;;;;;; "flow-ctrl.el" (20119 34052)) 10904;;;;;; "flow-ctrl.el" (19845 45374))
10895;;; Generated autoloads from flow-ctrl.el 10905;;; Generated autoloads from flow-ctrl.el
10896 10906
10897(autoload 'enable-flow-control "flow-ctrl" "\ 10907(autoload 'enable-flow-control "flow-ctrl" "\
@@ -10913,7 +10923,7 @@ to get the effect of a C-q.
10913;;;*** 10923;;;***
10914 10924
10915;;;### (autoloads (fill-flowed fill-flowed-encode) "flow-fill" "gnus/flow-fill.el" 10925;;;### (autoloads (fill-flowed fill-flowed-encode) "flow-fill" "gnus/flow-fill.el"
10916;;;;;; (20119 34052)) 10926;;;;;; (19845 45374))
10917;;; Generated autoloads from gnus/flow-fill.el 10927;;; Generated autoloads from gnus/flow-fill.el
10918 10928
10919(autoload 'fill-flowed-encode "flow-fill" "\ 10929(autoload 'fill-flowed-encode "flow-fill" "\
@@ -10929,7 +10939,7 @@ to get the effect of a C-q.
10929;;;*** 10939;;;***
10930 10940
10931;;;### (autoloads (flymake-find-file-hook flymake-mode-off flymake-mode-on 10941;;;### (autoloads (flymake-find-file-hook flymake-mode-off flymake-mode-on
10932;;;;;; flymake-mode) "flymake" "progmodes/flymake.el" (20119 34052)) 10942;;;;;; flymake-mode) "flymake" "progmodes/flymake.el" (19984 16846))
10933;;; Generated autoloads from progmodes/flymake.el 10943;;; Generated autoloads from progmodes/flymake.el
10934 10944
10935(autoload 'flymake-mode "flymake" "\ 10945(autoload 'flymake-mode "flymake" "\
@@ -10958,14 +10968,14 @@ Turn flymake mode off.
10958 10968
10959;;;### (autoloads (flyspell-buffer flyspell-region flyspell-mode-off 10969;;;### (autoloads (flyspell-buffer flyspell-region flyspell-mode-off
10960;;;;;; turn-off-flyspell turn-on-flyspell flyspell-mode flyspell-prog-mode) 10970;;;;;; turn-off-flyspell turn-on-flyspell flyspell-mode flyspell-prog-mode)
10961;;;;;; "flyspell" "textmodes/flyspell.el" (20139 33526)) 10971;;;;;; "flyspell" "textmodes/flyspell.el" (20174 10230))
10962;;; Generated autoloads from textmodes/flyspell.el 10972;;; Generated autoloads from textmodes/flyspell.el
10963 10973
10964(autoload 'flyspell-prog-mode "flyspell" "\ 10974(autoload 'flyspell-prog-mode "flyspell" "\
10965Turn on `flyspell-mode' for comments and strings. 10975Turn on `flyspell-mode' for comments and strings.
10966 10976
10967\(fn)" t nil) 10977\(fn)" t nil)
10968(defvar flyspell-mode nil) 10978(defvar flyspell-mode nil "Non-nil if Flyspell mode is enabled.")
10969 10979
10970(autoload 'flyspell-mode "flyspell" "\ 10980(autoload 'flyspell-mode "flyspell" "\
10971Toggle on-the-fly spell checking (Flyspell mode). 10981Toggle on-the-fly spell checking (Flyspell mode).
@@ -11030,7 +11040,7 @@ Flyspell whole buffer.
11030 11040
11031;;;### (autoloads (follow-delete-other-windows-and-split follow-mode 11041;;;### (autoloads (follow-delete-other-windows-and-split follow-mode
11032;;;;;; turn-off-follow-mode turn-on-follow-mode) "follow" "follow.el" 11042;;;;;; turn-off-follow-mode turn-on-follow-mode) "follow" "follow.el"
11033;;;;;; (20140 43930)) 11043;;;;;; (20178 7273))
11034;;; Generated autoloads from follow.el 11044;;; Generated autoloads from follow.el
11035 11045
11036(autoload 'turn-on-follow-mode "follow" "\ 11046(autoload 'turn-on-follow-mode "follow" "\
@@ -11106,8 +11116,8 @@ in your `~/.emacs' file, replacing [f7] by your favorite key:
11106 11116
11107;;;*** 11117;;;***
11108 11118
11109;;;### (autoloads (footnote-mode) "footnote" "mail/footnote.el" (20127 11119;;;### (autoloads (footnote-mode) "footnote" "mail/footnote.el" (20170
11110;;;;;; 26006)) 11120;;;;;; 13157))
11111;;; Generated autoloads from mail/footnote.el 11121;;; Generated autoloads from mail/footnote.el
11112 11122
11113(autoload 'footnote-mode "footnote" "\ 11123(autoload 'footnote-mode "footnote" "\
@@ -11126,7 +11136,7 @@ play around with the following keys:
11126;;;*** 11136;;;***
11127 11137
11128;;;### (autoloads (forms-find-file-other-window forms-find-file forms-mode) 11138;;;### (autoloads (forms-find-file-other-window forms-find-file forms-mode)
11129;;;;;; "forms" "forms.el" (20119 34052)) 11139;;;;;; "forms" "forms.el" (20168 57844))
11130;;; Generated autoloads from forms.el 11140;;; Generated autoloads from forms.el
11131 11141
11132(autoload 'forms-mode "forms" "\ 11142(autoload 'forms-mode "forms" "\
@@ -11163,7 +11173,7 @@ Visit a file in Forms mode in other window.
11163;;;*** 11173;;;***
11164 11174
11165;;;### (autoloads (fortran-mode) "fortran" "progmodes/fortran.el" 11175;;;### (autoloads (fortran-mode) "fortran" "progmodes/fortran.el"
11166;;;;;; (20140 44048)) 11176;;;;;; (20178 7273))
11167;;; Generated autoloads from progmodes/fortran.el 11177;;; Generated autoloads from progmodes/fortran.el
11168 11178
11169(autoload 'fortran-mode "fortran" "\ 11179(autoload 'fortran-mode "fortran" "\
@@ -11241,7 +11251,7 @@ with no args, if that value is non-nil.
11241;;;*** 11251;;;***
11242 11252
11243;;;### (autoloads (fortune fortune-to-signature fortune-compile fortune-from-region 11253;;;### (autoloads (fortune fortune-to-signature fortune-compile fortune-from-region
11244;;;;;; fortune-add-fortune) "fortune" "play/fortune.el" (20119 34052)) 11254;;;;;; fortune-add-fortune) "fortune" "play/fortune.el" (20165 31925))
11245;;; Generated autoloads from play/fortune.el 11255;;; Generated autoloads from play/fortune.el
11246 11256
11247(autoload 'fortune-add-fortune "fortune" "\ 11257(autoload 'fortune-add-fortune "fortune" "\
@@ -11290,7 +11300,7 @@ and choose the directory as the fortune-file.
11290;;;*** 11300;;;***
11291 11301
11292;;;### (autoloads (gdb gdb-enable-debug) "gdb-mi" "progmodes/gdb-mi.el" 11302;;;### (autoloads (gdb gdb-enable-debug) "gdb-mi" "progmodes/gdb-mi.el"
11293;;;;;; (20140 44067)) 11303;;;;;; (20182 4358))
11294;;; Generated autoloads from progmodes/gdb-mi.el 11304;;; Generated autoloads from progmodes/gdb-mi.el
11295 11305
11296(defvar gdb-enable-debug nil "\ 11306(defvar gdb-enable-debug nil "\
@@ -11357,8 +11367,8 @@ detailed description of this mode.
11357;;;*** 11367;;;***
11358 11368
11359;;;### (autoloads (generic-make-keywords-list generic-mode generic-mode-internal 11369;;;### (autoloads (generic-make-keywords-list generic-mode generic-mode-internal
11360;;;;;; define-generic-mode) "generic" "emacs-lisp/generic.el" (20119 11370;;;;;; define-generic-mode) "generic" "emacs-lisp/generic.el" (19845
11361;;;;;; 34052)) 11371;;;;;; 45374))
11362;;; Generated autoloads from emacs-lisp/generic.el 11372;;; Generated autoloads from emacs-lisp/generic.el
11363 11373
11364(defvar generic-mode-list nil "\ 11374(defvar generic-mode-list nil "\
@@ -11435,7 +11445,7 @@ regular expression that can be used as an element of
11435;;;*** 11445;;;***
11436 11446
11437;;;### (autoloads (glasses-mode) "glasses" "progmodes/glasses.el" 11447;;;### (autoloads (glasses-mode) "glasses" "progmodes/glasses.el"
11438;;;;;; (20119 34052)) 11448;;;;;; (19906 31087))
11439;;; Generated autoloads from progmodes/glasses.el 11449;;; Generated autoloads from progmodes/glasses.el
11440 11450
11441(autoload 'glasses-mode "glasses" "\ 11451(autoload 'glasses-mode "glasses" "\
@@ -11449,7 +11459,7 @@ at places they belong to.
11449 11459
11450;;;### (autoloads (gmm-tool-bar-from-list gmm-widget-p gmm-error 11460;;;### (autoloads (gmm-tool-bar-from-list gmm-widget-p gmm-error
11451;;;;;; gmm-message gmm-regexp-concat) "gmm-utils" "gnus/gmm-utils.el" 11461;;;;;; gmm-message gmm-regexp-concat) "gmm-utils" "gnus/gmm-utils.el"
11452;;;;;; (20119 34052)) 11462;;;;;; (20175 31160))
11453;;; Generated autoloads from gnus/gmm-utils.el 11463;;; Generated autoloads from gnus/gmm-utils.el
11454 11464
11455(autoload 'gmm-regexp-concat "gmm-utils" "\ 11465(autoload 'gmm-regexp-concat "gmm-utils" "\
@@ -11504,7 +11514,7 @@ DEFAULT-MAP specifies the default key map for ICON-LIST.
11504;;;*** 11514;;;***
11505 11515
11506;;;### (autoloads (gnus gnus-other-frame gnus-slave gnus-no-server 11516;;;### (autoloads (gnus gnus-other-frame gnus-slave gnus-no-server
11507;;;;;; gnus-slave-no-server) "gnus" "gnus/gnus.el" (20119 34052)) 11517;;;;;; gnus-slave-no-server) "gnus" "gnus/gnus.el" (20164 60780))
11508;;; Generated autoloads from gnus/gnus.el 11518;;; Generated autoloads from gnus/gnus.el
11509(when (fboundp 'custom-autoload) 11519(when (fboundp 'custom-autoload)
11510 (custom-autoload 'gnus-select-method "gnus")) 11520 (custom-autoload 'gnus-select-method "gnus"))
@@ -11557,7 +11567,7 @@ prompt the user for the name of an NNTP server to use.
11557;;;;;; gnus-agent-get-undownloaded-list gnus-agent-delete-group 11567;;;;;; gnus-agent-get-undownloaded-list gnus-agent-delete-group
11558;;;;;; gnus-agent-rename-group gnus-agent-possibly-save-gcc gnus-agentize 11568;;;;;; gnus-agent-rename-group gnus-agent-possibly-save-gcc gnus-agentize
11559;;;;;; gnus-slave-unplugged gnus-plugged gnus-unplugged) "gnus-agent" 11569;;;;;; gnus-slave-unplugged gnus-plugged gnus-unplugged) "gnus-agent"
11560;;;;;; "gnus/gnus-agent.el" (20119 34052)) 11570;;;;;; "gnus/gnus-agent.el" (20168 57844))
11561;;; Generated autoloads from gnus/gnus-agent.el 11571;;; Generated autoloads from gnus/gnus-agent.el
11562 11572
11563(autoload 'gnus-unplugged "gnus-agent" "\ 11573(autoload 'gnus-unplugged "gnus-agent" "\
@@ -11648,7 +11658,7 @@ If CLEAN, obsolete (ignore).
11648;;;*** 11658;;;***
11649 11659
11650;;;### (autoloads (gnus-article-prepare-display) "gnus-art" "gnus/gnus-art.el" 11660;;;### (autoloads (gnus-article-prepare-display) "gnus-art" "gnus/gnus-art.el"
11651;;;;;; (20119 34052)) 11661;;;;;; (20182 4358))
11652;;; Generated autoloads from gnus/gnus-art.el 11662;;; Generated autoloads from gnus/gnus-art.el
11653 11663
11654(autoload 'gnus-article-prepare-display "gnus-art" "\ 11664(autoload 'gnus-article-prepare-display "gnus-art" "\
@@ -11659,7 +11669,7 @@ Make the current buffer look like a nice article.
11659;;;*** 11669;;;***
11660 11670
11661;;;### (autoloads (gnus-bookmark-bmenu-list gnus-bookmark-jump gnus-bookmark-set) 11671;;;### (autoloads (gnus-bookmark-bmenu-list gnus-bookmark-jump gnus-bookmark-set)
11662;;;;;; "gnus-bookmark" "gnus/gnus-bookmark.el" (20119 34052)) 11672;;;;;; "gnus-bookmark" "gnus/gnus-bookmark.el" (19845 45374))
11663;;; Generated autoloads from gnus/gnus-bookmark.el 11673;;; Generated autoloads from gnus/gnus-bookmark.el
11664 11674
11665(autoload 'gnus-bookmark-set "gnus-bookmark" "\ 11675(autoload 'gnus-bookmark-set "gnus-bookmark" "\
@@ -11684,8 +11694,8 @@ deletion, or > if it is flagged for displaying.
11684 11694
11685;;;### (autoloads (gnus-cache-delete-group gnus-cache-rename-group 11695;;;### (autoloads (gnus-cache-delete-group gnus-cache-rename-group
11686;;;;;; gnus-cache-generate-nov-databases gnus-cache-generate-active 11696;;;;;; gnus-cache-generate-nov-databases gnus-cache-generate-active
11687;;;;;; gnus-jog-cache) "gnus-cache" "gnus/gnus-cache.el" (20119 11697;;;;;; gnus-jog-cache) "gnus-cache" "gnus/gnus-cache.el" (19845
11688;;;;;; 34052)) 11698;;;;;; 45374))
11689;;; Generated autoloads from gnus/gnus-cache.el 11699;;; Generated autoloads from gnus/gnus-cache.el
11690 11700
11691(autoload 'gnus-jog-cache "gnus-cache" "\ 11701(autoload 'gnus-jog-cache "gnus-cache" "\
@@ -11727,7 +11737,7 @@ supported.
11727;;;*** 11737;;;***
11728 11738
11729;;;### (autoloads (gnus-delay-initialize gnus-delay-send-queue gnus-delay-article) 11739;;;### (autoloads (gnus-delay-initialize gnus-delay-send-queue gnus-delay-article)
11730;;;;;; "gnus-delay" "gnus/gnus-delay.el" (20119 34052)) 11740;;;;;; "gnus-delay" "gnus/gnus-delay.el" (19931 11784))
11731;;; Generated autoloads from gnus/gnus-delay.el 11741;;; Generated autoloads from gnus/gnus-delay.el
11732 11742
11733(autoload 'gnus-delay-article "gnus-delay" "\ 11743(autoload 'gnus-delay-article "gnus-delay" "\
@@ -11763,7 +11773,7 @@ Checking delayed messages is skipped if optional arg NO-CHECK is non-nil.
11763;;;*** 11773;;;***
11764 11774
11765;;;### (autoloads (gnus-user-format-function-D gnus-user-format-function-d) 11775;;;### (autoloads (gnus-user-format-function-D gnus-user-format-function-d)
11766;;;;;; "gnus-diary" "gnus/gnus-diary.el" (20119 34052)) 11776;;;;;; "gnus-diary" "gnus/gnus-diary.el" (20161 45793))
11767;;; Generated autoloads from gnus/gnus-diary.el 11777;;; Generated autoloads from gnus/gnus-diary.el
11768 11778
11769(autoload 'gnus-user-format-function-d "gnus-diary" "\ 11779(autoload 'gnus-user-format-function-d "gnus-diary" "\
@@ -11779,7 +11789,7 @@ Checking delayed messages is skipped if optional arg NO-CHECK is non-nil.
11779;;;*** 11789;;;***
11780 11790
11781;;;### (autoloads (turn-on-gnus-dired-mode) "gnus-dired" "gnus/gnus-dired.el" 11791;;;### (autoloads (turn-on-gnus-dired-mode) "gnus-dired" "gnus/gnus-dired.el"
11782;;;;;; (20119 34052)) 11792;;;;;; (20167 36967))
11783;;; Generated autoloads from gnus/gnus-dired.el 11793;;; Generated autoloads from gnus/gnus-dired.el
11784 11794
11785(autoload 'turn-on-gnus-dired-mode "gnus-dired" "\ 11795(autoload 'turn-on-gnus-dired-mode "gnus-dired" "\
@@ -11790,7 +11800,7 @@ Convenience method to turn on gnus-dired-mode.
11790;;;*** 11800;;;***
11791 11801
11792;;;### (autoloads (gnus-draft-reminder) "gnus-draft" "gnus/gnus-draft.el" 11802;;;### (autoloads (gnus-draft-reminder) "gnus-draft" "gnus/gnus-draft.el"
11793;;;;;; (20119 34052)) 11803;;;;;; (19981 40664))
11794;;; Generated autoloads from gnus/gnus-draft.el 11804;;; Generated autoloads from gnus/gnus-draft.el
11795 11805
11796(autoload 'gnus-draft-reminder "gnus-draft" "\ 11806(autoload 'gnus-draft-reminder "gnus-draft" "\
@@ -11802,8 +11812,8 @@ Reminder user if there are unsent drafts.
11802 11812
11803;;;### (autoloads (gnus-convert-png-to-face gnus-convert-face-to-png 11813;;;### (autoloads (gnus-convert-png-to-face gnus-convert-face-to-png
11804;;;;;; gnus-face-from-file gnus-x-face-from-file gnus-insert-random-x-face-header 11814;;;;;; gnus-face-from-file gnus-x-face-from-file gnus-insert-random-x-face-header
11805;;;;;; gnus-random-x-face) "gnus-fun" "gnus/gnus-fun.el" (20119 11815;;;;;; gnus-random-x-face) "gnus-fun" "gnus/gnus-fun.el" (20088
11806;;;;;; 34052)) 11816;;;;;; 26718))
11807;;; Generated autoloads from gnus/gnus-fun.el 11817;;; Generated autoloads from gnus/gnus-fun.el
11808 11818
11809(autoload 'gnus-random-x-face "gnus-fun" "\ 11819(autoload 'gnus-random-x-face "gnus-fun" "\
@@ -11848,7 +11858,7 @@ FILE should be a PNG file that's 48x48 and smaller than or equal to
11848;;;*** 11858;;;***
11849 11859
11850;;;### (autoloads (gnus-treat-mail-gravatar gnus-treat-from-gravatar) 11860;;;### (autoloads (gnus-treat-mail-gravatar gnus-treat-from-gravatar)
11851;;;;;; "gnus-gravatar" "gnus/gnus-gravatar.el" (20119 34052)) 11861;;;;;; "gnus-gravatar" "gnus/gnus-gravatar.el" (19845 45374))
11852;;; Generated autoloads from gnus/gnus-gravatar.el 11862;;; Generated autoloads from gnus/gnus-gravatar.el
11853 11863
11854(autoload 'gnus-treat-from-gravatar "gnus-gravatar" "\ 11864(autoload 'gnus-treat-from-gravatar "gnus-gravatar" "\
@@ -11866,7 +11876,7 @@ If gravatars are already displayed, remove them.
11866;;;*** 11876;;;***
11867 11877
11868;;;### (autoloads (gnus-fetch-group-other-frame gnus-fetch-group) 11878;;;### (autoloads (gnus-fetch-group-other-frame gnus-fetch-group)
11869;;;;;; "gnus-group" "gnus/gnus-group.el" (20119 34052)) 11879;;;;;; "gnus-group" "gnus/gnus-group.el" (20179 28130))
11870;;; Generated autoloads from gnus/gnus-group.el 11880;;; Generated autoloads from gnus/gnus-group.el
11871 11881
11872(autoload 'gnus-fetch-group "gnus-group" "\ 11882(autoload 'gnus-fetch-group "gnus-group" "\
@@ -11884,7 +11894,7 @@ Pop up a frame and enter GROUP.
11884;;;*** 11894;;;***
11885 11895
11886;;;### (autoloads (gnus-html-prefetch-images gnus-article-html) "gnus-html" 11896;;;### (autoloads (gnus-html-prefetch-images gnus-article-html) "gnus-html"
11887;;;;;; "gnus/gnus-html.el" (20119 34052)) 11897;;;;;; "gnus/gnus-html.el" (20050 11479))
11888;;; Generated autoloads from gnus/gnus-html.el 11898;;; Generated autoloads from gnus/gnus-html.el
11889 11899
11890(autoload 'gnus-article-html "gnus-html" "\ 11900(autoload 'gnus-article-html "gnus-html" "\
@@ -11900,7 +11910,7 @@ Pop up a frame and enter GROUP.
11900;;;*** 11910;;;***
11901 11911
11902;;;### (autoloads (gnus-batch-score) "gnus-kill" "gnus/gnus-kill.el" 11912;;;### (autoloads (gnus-batch-score) "gnus-kill" "gnus/gnus-kill.el"
11903;;;;;; (20119 34052)) 11913;;;;;; (19845 45374))
11904;;; Generated autoloads from gnus/gnus-kill.el 11914;;; Generated autoloads from gnus/gnus-kill.el
11905 11915
11906(defalias 'gnus-batch-kill 'gnus-batch-score) 11916(defalias 'gnus-batch-kill 'gnus-batch-score)
@@ -11915,7 +11925,7 @@ Usage: emacs -batch -l ~/.emacs -l gnus -f gnus-batch-score
11915 11925
11916;;;### (autoloads (gnus-mailing-list-mode gnus-mailing-list-insinuate 11926;;;### (autoloads (gnus-mailing-list-mode gnus-mailing-list-insinuate
11917;;;;;; turn-on-gnus-mailing-list-mode) "gnus-ml" "gnus/gnus-ml.el" 11927;;;;;; turn-on-gnus-mailing-list-mode) "gnus-ml" "gnus/gnus-ml.el"
11918;;;;;; (20119 34052)) 11928;;;;;; (19845 45374))
11919;;; Generated autoloads from gnus/gnus-ml.el 11929;;; Generated autoloads from gnus/gnus-ml.el
11920 11930
11921(autoload 'turn-on-gnus-mailing-list-mode "gnus-ml" "\ 11931(autoload 'turn-on-gnus-mailing-list-mode "gnus-ml" "\
@@ -11940,7 +11950,7 @@ Minor mode for providing mailing-list commands.
11940 11950
11941;;;### (autoloads (gnus-group-split-fancy gnus-group-split gnus-group-split-update 11951;;;### (autoloads (gnus-group-split-fancy gnus-group-split gnus-group-split-update
11942;;;;;; gnus-group-split-setup) "gnus-mlspl" "gnus/gnus-mlspl.el" 11952;;;;;; gnus-group-split-setup) "gnus-mlspl" "gnus/gnus-mlspl.el"
11943;;;;;; (20119 34052)) 11953;;;;;; (19845 45374))
11944;;; Generated autoloads from gnus/gnus-mlspl.el 11954;;; Generated autoloads from gnus/gnus-mlspl.el
11945 11955
11946(autoload 'gnus-group-split-setup "gnus-mlspl" "\ 11956(autoload 'gnus-group-split-setup "gnus-mlspl" "\
@@ -12041,7 +12051,7 @@ Calling (gnus-group-split-fancy nil nil \"mail.others\") returns:
12041;;;*** 12051;;;***
12042 12052
12043;;;### (autoloads (gnus-button-reply gnus-button-mailto gnus-msg-mail) 12053;;;### (autoloads (gnus-button-reply gnus-button-mailto gnus-msg-mail)
12044;;;;;; "gnus-msg" "gnus/gnus-msg.el" (20119 34052)) 12054;;;;;; "gnus-msg" "gnus/gnus-msg.el" (20183 25152))
12045;;; Generated autoloads from gnus/gnus-msg.el 12055;;; Generated autoloads from gnus/gnus-msg.el
12046 12056
12047(autoload 'gnus-msg-mail "gnus-msg" "\ 12057(autoload 'gnus-msg-mail "gnus-msg" "\
@@ -12067,7 +12077,7 @@ Like `message-reply'.
12067 12077
12068;;;### (autoloads (gnus-treat-newsgroups-picon gnus-treat-mail-picon 12078;;;### (autoloads (gnus-treat-newsgroups-picon gnus-treat-mail-picon
12069;;;;;; gnus-treat-from-picon) "gnus-picon" "gnus/gnus-picon.el" 12079;;;;;; gnus-treat-from-picon) "gnus-picon" "gnus/gnus-picon.el"
12070;;;;;; (20119 34052)) 12080;;;;;; (19845 45374))
12071;;; Generated autoloads from gnus/gnus-picon.el 12081;;; Generated autoloads from gnus/gnus-picon.el
12072 12082
12073(autoload 'gnus-treat-from-picon "gnus-picon" "\ 12083(autoload 'gnus-treat-from-picon "gnus-picon" "\
@@ -12094,7 +12104,7 @@ If picons are already displayed, remove them.
12094;;;;;; gnus-sorted-nintersection gnus-sorted-range-intersection 12104;;;;;; gnus-sorted-nintersection gnus-sorted-range-intersection
12095;;;;;; gnus-sorted-intersection gnus-intersection gnus-sorted-complement 12105;;;;;; gnus-sorted-intersection gnus-intersection gnus-sorted-complement
12096;;;;;; gnus-sorted-ndifference gnus-sorted-difference) "gnus-range" 12106;;;;;; gnus-sorted-ndifference gnus-sorted-difference) "gnus-range"
12097;;;;;; "gnus/gnus-range.el" (20119 34052)) 12107;;;;;; "gnus/gnus-range.el" (19845 45374))
12098;;; Generated autoloads from gnus/gnus-range.el 12108;;; Generated autoloads from gnus/gnus-range.el
12099 12109
12100(autoload 'gnus-sorted-difference "gnus-range" "\ 12110(autoload 'gnus-sorted-difference "gnus-range" "\
@@ -12162,7 +12172,7 @@ Add NUM into sorted LIST by side effect.
12162;;;*** 12172;;;***
12163 12173
12164;;;### (autoloads (gnus-registry-install-hooks gnus-registry-initialize) 12174;;;### (autoloads (gnus-registry-install-hooks gnus-registry-initialize)
12165;;;;;; "gnus-registry" "gnus/gnus-registry.el" (20124 52030)) 12175;;;;;; "gnus-registry" "gnus/gnus-registry.el" (20143 51029))
12166;;; Generated autoloads from gnus/gnus-registry.el 12176;;; Generated autoloads from gnus/gnus-registry.el
12167 12177
12168(autoload 'gnus-registry-initialize "gnus-registry" "\ 12178(autoload 'gnus-registry-initialize "gnus-registry" "\
@@ -12178,8 +12188,8 @@ Install the registry hooks.
12178;;;*** 12188;;;***
12179 12189
12180;;;### (autoloads (gnus-sieve-article-add-rule gnus-sieve-generate 12190;;;### (autoloads (gnus-sieve-article-add-rule gnus-sieve-generate
12181;;;;;; gnus-sieve-update) "gnus-sieve" "gnus/gnus-sieve.el" (20119 12191;;;;;; gnus-sieve-update) "gnus-sieve" "gnus/gnus-sieve.el" (19845
12182;;;;;; 34052)) 12192;;;;;; 45374))
12183;;; Generated autoloads from gnus/gnus-sieve.el 12193;;; Generated autoloads from gnus/gnus-sieve.el
12184 12194
12185(autoload 'gnus-sieve-update "gnus-sieve" "\ 12195(autoload 'gnus-sieve-update "gnus-sieve" "\
@@ -12207,7 +12217,7 @@ See the documentation for these variables and functions for details.
12207;;;*** 12217;;;***
12208 12218
12209;;;### (autoloads (gnus-update-format) "gnus-spec" "gnus/gnus-spec.el" 12219;;;### (autoloads (gnus-update-format) "gnus-spec" "gnus/gnus-spec.el"
12210;;;;;; (20119 34052)) 12220;;;;;; (20076 35541))
12211;;; Generated autoloads from gnus/gnus-spec.el 12221;;; Generated autoloads from gnus/gnus-spec.el
12212 12222
12213(autoload 'gnus-update-format "gnus-spec" "\ 12223(autoload 'gnus-update-format "gnus-spec" "\
@@ -12218,7 +12228,7 @@ Update the format specification near point.
12218;;;*** 12228;;;***
12219 12229
12220;;;### (autoloads (gnus-declare-backend) "gnus-start" "gnus/gnus-start.el" 12230;;;### (autoloads (gnus-declare-backend) "gnus-start" "gnus/gnus-start.el"
12221;;;;;; (20119 34052)) 12231;;;;;; (20176 51947))
12222;;; Generated autoloads from gnus/gnus-start.el 12232;;; Generated autoloads from gnus/gnus-start.el
12223 12233
12224(autoload 'gnus-declare-backend "gnus-start" "\ 12234(autoload 'gnus-declare-backend "gnus-start" "\
@@ -12229,7 +12239,7 @@ Declare back end NAME with ABILITIES as a Gnus back end.
12229;;;*** 12239;;;***
12230 12240
12231;;;### (autoloads (gnus-summary-bookmark-jump) "gnus-sum" "gnus/gnus-sum.el" 12241;;;### (autoloads (gnus-summary-bookmark-jump) "gnus-sum" "gnus/gnus-sum.el"
12232;;;;;; (20119 34052)) 12242;;;;;; (20172 54913))
12233;;; Generated autoloads from gnus/gnus-sum.el 12243;;; Generated autoloads from gnus/gnus-sum.el
12234 12244
12235(autoload 'gnus-summary-bookmark-jump "gnus-sum" "\ 12245(autoload 'gnus-summary-bookmark-jump "gnus-sum" "\
@@ -12241,7 +12251,7 @@ BOOKMARK is a bookmark name or a bookmark record.
12241;;;*** 12251;;;***
12242 12252
12243;;;### (autoloads (gnus-sync-install-hooks gnus-sync-initialize) 12253;;;### (autoloads (gnus-sync-install-hooks gnus-sync-initialize)
12244;;;;;; "gnus-sync" "gnus/gnus-sync.el" (20119 34052)) 12254;;;;;; "gnus-sync" "gnus/gnus-sync.el" (19845 45374))
12245;;; Generated autoloads from gnus/gnus-sync.el 12255;;; Generated autoloads from gnus/gnus-sync.el
12246 12256
12247(autoload 'gnus-sync-initialize "gnus-sync" "\ 12257(autoload 'gnus-sync-initialize "gnus-sync" "\
@@ -12257,7 +12267,7 @@ Install the sync hooks.
12257;;;*** 12267;;;***
12258 12268
12259;;;### (autoloads (gnus-add-configuration) "gnus-win" "gnus/gnus-win.el" 12269;;;### (autoloads (gnus-add-configuration) "gnus-win" "gnus/gnus-win.el"
12260;;;;;; (20119 34052)) 12270;;;;;; (20161 45793))
12261;;; Generated autoloads from gnus/gnus-win.el 12271;;; Generated autoloads from gnus/gnus-win.el
12262 12272
12263(autoload 'gnus-add-configuration "gnus-win" "\ 12273(autoload 'gnus-add-configuration "gnus-win" "\
@@ -12268,7 +12278,7 @@ Add the window configuration CONF to `gnus-buffer-configuration'.
12268;;;*** 12278;;;***
12269 12279
12270;;;### (autoloads (gnutls-min-prime-bits) "gnutls" "net/gnutls.el" 12280;;;### (autoloads (gnutls-min-prime-bits) "gnutls" "net/gnutls.el"
12271;;;;;; (20119 34052)) 12281;;;;;; (20176 51947))
12272;;; Generated autoloads from net/gnutls.el 12282;;; Generated autoloads from net/gnutls.el
12273 12283
12274(defvar gnutls-min-prime-bits nil "\ 12284(defvar gnutls-min-prime-bits nil "\
@@ -12284,7 +12294,7 @@ A value of nil says to use the default gnutls value.")
12284 12294
12285;;;*** 12295;;;***
12286 12296
12287;;;### (autoloads (gomoku) "gomoku" "play/gomoku.el" (20119 34052)) 12297;;;### (autoloads (gomoku) "gomoku" "play/gomoku.el" (20178 7273))
12288;;; Generated autoloads from play/gomoku.el 12298;;; Generated autoloads from play/gomoku.el
12289 12299
12290(autoload 'gomoku "gomoku" "\ 12300(autoload 'gomoku "gomoku" "\
@@ -12312,7 +12322,7 @@ Use \\[describe-mode] for more info.
12312 12322
12313;;;### (autoloads (goto-address-prog-mode goto-address-mode goto-address 12323;;;### (autoloads (goto-address-prog-mode goto-address-mode goto-address
12314;;;;;; goto-address-at-point) "goto-addr" "net/goto-addr.el" (20127 12324;;;;;; goto-address-at-point) "goto-addr" "net/goto-addr.el" (20127
12315;;;;;; 25813)) 12325;;;;;; 62865))
12316;;; Generated autoloads from net/goto-addr.el 12326;;; Generated autoloads from net/goto-addr.el
12317 12327
12318(define-obsolete-function-alias 'goto-address-at-mouse 'goto-address-at-point "22.1") 12328(define-obsolete-function-alias 'goto-address-at-mouse 'goto-address-at-point "22.1")
@@ -12351,7 +12361,7 @@ Like `goto-address-mode', but only for comments and strings.
12351;;;*** 12361;;;***
12352 12362
12353;;;### (autoloads (gravatar-retrieve-synchronously gravatar-retrieve) 12363;;;### (autoloads (gravatar-retrieve-synchronously gravatar-retrieve)
12354;;;;;; "gravatar" "gnus/gravatar.el" (20119 34052)) 12364;;;;;; "gravatar" "gnus/gravatar.el" (19845 45374))
12355;;; Generated autoloads from gnus/gravatar.el 12365;;; Generated autoloads from gnus/gravatar.el
12356 12366
12357(autoload 'gravatar-retrieve "gravatar" "\ 12367(autoload 'gravatar-retrieve "gravatar" "\
@@ -12369,7 +12379,7 @@ Retrieve MAIL-ADDRESS gravatar and returns it.
12369 12379
12370;;;### (autoloads (zrgrep rgrep lgrep grep-find grep grep-mode grep-compute-defaults 12380;;;### (autoloads (zrgrep rgrep lgrep grep-find grep grep-mode grep-compute-defaults
12371;;;;;; grep-process-setup grep-setup-hook grep-find-command grep-command 12381;;;;;; grep-process-setup grep-setup-hook grep-find-command grep-command
12372;;;;;; grep-window-height) "grep" "progmodes/grep.el" (20119 34052)) 12382;;;;;; grep-window-height) "grep" "progmodes/grep.el" (20174 10230))
12373;;; Generated autoloads from progmodes/grep.el 12383;;; Generated autoloads from progmodes/grep.el
12374 12384
12375(defvar grep-window-height nil "\ 12385(defvar grep-window-height nil "\
@@ -12427,9 +12437,11 @@ Any other value means to use `find -print' and `xargs'.
12427 12437
12428This variable's value takes effect when `grep-compute-defaults' is called.") 12438This variable's value takes effect when `grep-compute-defaults' is called.")
12429 12439
12430(defvar grep-history nil) 12440(defvar grep-history nil "\
12441History list for grep.")
12431 12442
12432(defvar grep-find-history nil) 12443(defvar grep-find-history nil "\
12444History list for grep-find.")
12433 12445
12434(autoload 'grep-process-setup "grep" "\ 12446(autoload 'grep-process-setup "grep" "\
12435Setup compilation variables and buffer for `grep'. 12447Setup compilation variables and buffer for `grep'.
@@ -12526,7 +12538,7 @@ file name to `*.gz', and sets `grep-highlight-matches' to `always'.
12526 12538
12527;;;*** 12539;;;***
12528 12540
12529;;;### (autoloads (gs-load-image) "gs" "gs.el" (20119 34052)) 12541;;;### (autoloads (gs-load-image) "gs" "gs.el" (19845 45374))
12530;;; Generated autoloads from gs.el 12542;;; Generated autoloads from gs.el
12531 12543
12532(autoload 'gs-load-image "gs" "\ 12544(autoload 'gs-load-image "gs" "\
@@ -12540,7 +12552,7 @@ the form \"WINDOW-ID PIXMAP-ID\". Value is non-nil if successful.
12540;;;*** 12552;;;***
12541 12553
12542;;;### (autoloads (gud-tooltip-mode gdb-script-mode jdb pdb perldb 12554;;;### (autoloads (gud-tooltip-mode gdb-script-mode jdb pdb perldb
12543;;;;;; xdb dbx sdb gud-gdb) "gud" "progmodes/gud.el" (20127 25495)) 12555;;;;;; xdb dbx sdb gud-gdb) "gud" "progmodes/gud.el" (20178 7273))
12544;;; Generated autoloads from progmodes/gud.el 12556;;; Generated autoloads from progmodes/gud.el
12545 12557
12546(autoload 'gud-gdb "gud" "\ 12558(autoload 'gud-gdb "gud" "\
@@ -12628,8 +12640,8 @@ it if ARG is omitted or nil.
12628 12640
12629;;;*** 12641;;;***
12630 12642
12631;;;### (autoloads (handwrite) "handwrite" "play/handwrite.el" (20119 12643;;;### (autoloads (handwrite) "handwrite" "play/handwrite.el" (19889
12632;;;;;; 34052)) 12644;;;;;; 21967))
12633;;; Generated autoloads from play/handwrite.el 12645;;; Generated autoloads from play/handwrite.el
12634 12646
12635(autoload 'handwrite "handwrite" "\ 12647(autoload 'handwrite "handwrite" "\
@@ -12647,7 +12659,7 @@ Variables: `handwrite-linespace' (default 12)
12647;;;*** 12659;;;***
12648 12660
12649;;;### (autoloads (hanoi-unix-64 hanoi-unix hanoi) "hanoi" "play/hanoi.el" 12661;;;### (autoloads (hanoi-unix-64 hanoi-unix hanoi) "hanoi" "play/hanoi.el"
12650;;;;;; (20119 34052)) 12662;;;;;; (19981 40664))
12651;;; Generated autoloads from play/hanoi.el 12663;;; Generated autoloads from play/hanoi.el
12652 12664
12653(autoload 'hanoi "hanoi" "\ 12665(autoload 'hanoi "hanoi" "\
@@ -12676,7 +12688,7 @@ to be updated.
12676 12688
12677;;;### (autoloads (mail-check-payment mail-add-payment-async mail-add-payment 12689;;;### (autoloads (mail-check-payment mail-add-payment-async mail-add-payment
12678;;;;;; hashcash-verify-payment hashcash-insert-payment-async hashcash-insert-payment) 12690;;;;;; hashcash-verify-payment hashcash-insert-payment-async hashcash-insert-payment)
12679;;;;;; "hashcash" "mail/hashcash.el" (20119 34052)) 12691;;;;;; "hashcash" "mail/hashcash.el" (19845 45374))
12680;;; Generated autoloads from mail/hashcash.el 12692;;; Generated autoloads from mail/hashcash.el
12681 12693
12682(autoload 'hashcash-insert-payment "hashcash" "\ 12694(autoload 'hashcash-insert-payment "hashcash" "\
@@ -12721,7 +12733,7 @@ Prefix arg sets default accept amount temporarily.
12721;;;### (autoloads (scan-buf-previous-region scan-buf-next-region 12733;;;### (autoloads (scan-buf-previous-region scan-buf-next-region
12722;;;;;; scan-buf-move-to-region help-at-pt-display-when-idle help-at-pt-set-timer 12734;;;;;; scan-buf-move-to-region help-at-pt-display-when-idle help-at-pt-set-timer
12723;;;;;; help-at-pt-cancel-timer display-local-help help-at-pt-kbd-string 12735;;;;;; help-at-pt-cancel-timer display-local-help help-at-pt-kbd-string
12724;;;;;; help-at-pt-string) "help-at-pt" "help-at-pt.el" (20119 34052)) 12736;;;;;; help-at-pt-string) "help-at-pt" "help-at-pt.el" (19845 45374))
12725;;; Generated autoloads from help-at-pt.el 12737;;; Generated autoloads from help-at-pt.el
12726 12738
12727(autoload 'help-at-pt-string "help-at-pt" "\ 12739(autoload 'help-at-pt-string "help-at-pt" "\
@@ -12851,7 +12863,7 @@ different regions. With numeric argument ARG, behaves like
12851;;;### (autoloads (doc-file-to-info doc-file-to-man describe-categories 12863;;;### (autoloads (doc-file-to-info doc-file-to-man describe-categories
12852;;;;;; describe-syntax describe-variable variable-at-point describe-function-1 12864;;;;;; describe-syntax describe-variable variable-at-point describe-function-1
12853;;;;;; find-lisp-object-file-name help-C-file-name describe-function) 12865;;;;;; find-lisp-object-file-name help-C-file-name describe-function)
12854;;;;;; "help-fns" "help-fns.el" (20119 34052)) 12866;;;;;; "help-fns" "help-fns.el" (20161 45793))
12855;;; Generated autoloads from help-fns.el 12867;;; Generated autoloads from help-fns.el
12856 12868
12857(autoload 'describe-function "help-fns" "\ 12869(autoload 'describe-function "help-fns" "\
@@ -12931,7 +12943,7 @@ Produce a texinfo buffer with sorted doc-strings from the DOC file.
12931;;;*** 12943;;;***
12932 12944
12933;;;### (autoloads (three-step-help) "help-macro" "help-macro.el" 12945;;;### (autoloads (three-step-help) "help-macro" "help-macro.el"
12934;;;;;; (20119 34052)) 12946;;;;;; (19845 45374))
12935;;; Generated autoloads from help-macro.el 12947;;; Generated autoloads from help-macro.el
12936 12948
12937(defvar three-step-help nil "\ 12949(defvar three-step-help nil "\
@@ -12947,8 +12959,8 @@ gives the window that lists the options.")
12947 12959
12948;;;### (autoloads (help-xref-on-pp help-insert-xref-button help-xref-button 12960;;;### (autoloads (help-xref-on-pp help-insert-xref-button help-xref-button
12949;;;;;; help-make-xrefs help-buffer help-setup-xref help-mode-finish 12961;;;;;; help-make-xrefs help-buffer help-setup-xref help-mode-finish
12950;;;;;; help-mode-setup help-mode) "help-mode" "help-mode.el" (20119 12962;;;;;; help-mode-setup help-mode) "help-mode" "help-mode.el" (20167
12951;;;;;; 34052)) 12963;;;;;; 36967))
12952;;; Generated autoloads from help-mode.el 12964;;; Generated autoloads from help-mode.el
12953 12965
12954(autoload 'help-mode "help-mode" "\ 12966(autoload 'help-mode "help-mode" "\
@@ -13041,7 +13053,7 @@ Add xrefs for symbols in `pp's output between FROM and TO.
13041;;;*** 13053;;;***
13042 13054
13043;;;### (autoloads (Helper-help Helper-describe-bindings) "helper" 13055;;;### (autoloads (Helper-help Helper-describe-bindings) "helper"
13044;;;;;; "emacs-lisp/helper.el" (20119 34052)) 13056;;;;;; "emacs-lisp/helper.el" (19845 45374))
13045;;; Generated autoloads from emacs-lisp/helper.el 13057;;; Generated autoloads from emacs-lisp/helper.el
13046 13058
13047(autoload 'Helper-describe-bindings "helper" "\ 13059(autoload 'Helper-describe-bindings "helper" "\
@@ -13057,7 +13069,7 @@ Provide help for current mode.
13057;;;*** 13069;;;***
13058 13070
13059;;;### (autoloads (hexlify-buffer hexl-find-file hexl-mode) "hexl" 13071;;;### (autoloads (hexlify-buffer hexl-find-file hexl-mode) "hexl"
13060;;;;;; "hexl.el" (20119 34052)) 13072;;;;;; "hexl.el" (19865 50420))
13061;;; Generated autoloads from hexl.el 13073;;; Generated autoloads from hexl.el
13062 13074
13063(autoload 'hexl-mode "hexl" "\ 13075(autoload 'hexl-mode "hexl" "\
@@ -13154,7 +13166,7 @@ This discards the buffer's undo information.
13154;;;### (autoloads (hi-lock-write-interactive-patterns hi-lock-unface-buffer 13166;;;### (autoloads (hi-lock-write-interactive-patterns hi-lock-unface-buffer
13155;;;;;; hi-lock-face-phrase-buffer hi-lock-face-buffer hi-lock-line-face-buffer 13167;;;;;; hi-lock-face-phrase-buffer hi-lock-face-buffer hi-lock-line-face-buffer
13156;;;;;; global-hi-lock-mode hi-lock-mode) "hi-lock" "hi-lock.el" 13168;;;;;; global-hi-lock-mode hi-lock-mode) "hi-lock" "hi-lock.el"
13157;;;;;; (20126 50093)) 13169;;;;;; (20127 62865))
13158;;; Generated autoloads from hi-lock.el 13170;;; Generated autoloads from hi-lock.el
13159 13171
13160(autoload 'hi-lock-mode "hi-lock" "\ 13172(autoload 'hi-lock-mode "hi-lock" "\
@@ -13293,7 +13305,7 @@ be found in variable `hi-lock-interactive-patterns'.
13293;;;*** 13305;;;***
13294 13306
13295;;;### (autoloads (hide-ifdef-mode) "hideif" "progmodes/hideif.el" 13307;;;### (autoloads (hide-ifdef-mode) "hideif" "progmodes/hideif.el"
13296;;;;;; (20127 25465)) 13308;;;;;; (20127 62865))
13297;;; Generated autoloads from progmodes/hideif.el 13309;;; Generated autoloads from progmodes/hideif.el
13298 13310
13299(autoload 'hide-ifdef-mode "hideif" "\ 13311(autoload 'hide-ifdef-mode "hideif" "\
@@ -13337,7 +13349,7 @@ Several variables affect how the hiding is done:
13337;;;*** 13349;;;***
13338 13350
13339;;;### (autoloads (turn-off-hideshow hs-minor-mode) "hideshow" "progmodes/hideshow.el" 13351;;;### (autoloads (turn-off-hideshow hs-minor-mode) "hideshow" "progmodes/hideshow.el"
13340;;;;;; (20119 34052)) 13352;;;;;; (20172 54913))
13341;;; Generated autoloads from progmodes/hideshow.el 13353;;; Generated autoloads from progmodes/hideshow.el
13342 13354
13343(defvar hs-special-modes-alist (mapcar 'purecopy '((c-mode "{" "}" "/[*/]" nil nil) (c++-mode "{" "}" "/[*/]" nil nil) (bibtex-mode ("@\\S(*\\(\\s(\\)" 1)) (java-mode "{" "}" "/[*/]" nil nil) (js-mode "{" "}" "/[*/]" nil))) "\ 13355(defvar hs-special-modes-alist (mapcar 'purecopy '((c-mode "{" "}" "/[*/]" nil nil) (c++-mode "{" "}" "/[*/]" nil nil) (bibtex-mode ("@\\S(*\\(\\s(\\)" 1)) (java-mode "{" "}" "/[*/]" nil nil) (js-mode "{" "}" "/[*/]" nil))) "\
@@ -13399,8 +13411,8 @@ Unconditionally turn off `hs-minor-mode'.
13399;;;;;; highlight-compare-buffers highlight-changes-rotate-faces 13411;;;;;; highlight-compare-buffers highlight-changes-rotate-faces
13400;;;;;; highlight-changes-previous-change highlight-changes-next-change 13412;;;;;; highlight-changes-previous-change highlight-changes-next-change
13401;;;;;; highlight-changes-remove-highlight highlight-changes-visible-mode 13413;;;;;; highlight-changes-remove-highlight highlight-changes-visible-mode
13402;;;;;; highlight-changes-mode) "hilit-chg" "hilit-chg.el" (20126 13414;;;;;; highlight-changes-mode) "hilit-chg" "hilit-chg.el" (20164
13403;;;;;; 50110)) 13415;;;;;; 60780))
13404;;; Generated autoloads from hilit-chg.el 13416;;; Generated autoloads from hilit-chg.el
13405 13417
13406(autoload 'highlight-changes-mode "hilit-chg" "\ 13418(autoload 'highlight-changes-mode "hilit-chg" "\
@@ -13535,7 +13547,7 @@ See `highlight-changes-mode' for more information on Highlight-Changes mode.
13535;;;;;; hippie-expand-ignore-buffers hippie-expand-max-buffers hippie-expand-no-restriction 13547;;;;;; hippie-expand-ignore-buffers hippie-expand-max-buffers hippie-expand-no-restriction
13536;;;;;; hippie-expand-dabbrev-as-symbol hippie-expand-dabbrev-skip-space 13548;;;;;; hippie-expand-dabbrev-as-symbol hippie-expand-dabbrev-skip-space
13537;;;;;; hippie-expand-verbose hippie-expand-try-functions-list) "hippie-exp" 13549;;;;;; hippie-expand-verbose hippie-expand-try-functions-list) "hippie-exp"
13538;;;;;; "hippie-exp.el" (20119 34052)) 13550;;;;;; "hippie-exp.el" (20167 36967))
13539;;; Generated autoloads from hippie-exp.el 13551;;; Generated autoloads from hippie-exp.el
13540 13552
13541(defvar hippie-expand-try-functions-list '(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) "\ 13553(defvar hippie-expand-try-functions-list '(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) "\
@@ -13608,7 +13620,7 @@ argument VERBOSE non-nil makes the function verbose.
13608;;;*** 13620;;;***
13609 13621
13610;;;### (autoloads (global-hl-line-mode hl-line-mode) "hl-line" "hl-line.el" 13622;;;### (autoloads (global-hl-line-mode hl-line-mode) "hl-line" "hl-line.el"
13611;;;;;; (20126 50128)) 13623;;;;;; (20127 62865))
13612;;; Generated autoloads from hl-line.el 13624;;; Generated autoloads from hl-line.el
13613 13625
13614(autoload 'hl-line-mode "hl-line" "\ 13626(autoload 'hl-line-mode "hl-line" "\
@@ -13661,7 +13673,7 @@ Global-Hl-Line mode uses the functions `global-hl-line-unhighlight' and
13661;;;;;; holiday-bahai-holidays holiday-islamic-holidays holiday-christian-holidays 13673;;;;;; holiday-bahai-holidays holiday-islamic-holidays holiday-christian-holidays
13662;;;;;; holiday-hebrew-holidays holiday-other-holidays holiday-local-holidays 13674;;;;;; holiday-hebrew-holidays holiday-other-holidays holiday-local-holidays
13663;;;;;; holiday-oriental-holidays holiday-general-holidays) "holidays" 13675;;;;;; holiday-oriental-holidays holiday-general-holidays) "holidays"
13664;;;;;; "calendar/holidays.el" (20119 34052)) 13676;;;;;; "calendar/holidays.el" (20107 16822))
13665;;; Generated autoloads from calendar/holidays.el 13677;;; Generated autoloads from calendar/holidays.el
13666 13678
13667(define-obsolete-variable-alias 'general-holidays 'holiday-general-holidays "23.1") 13679(define-obsolete-variable-alias 'general-holidays 'holiday-general-holidays "23.1")
@@ -13809,8 +13821,8 @@ The optional LABEL is used to label the buffer created.
13809 13821
13810;;;*** 13822;;;***
13811 13823
13812;;;### (autoloads (html2text) "html2text" "gnus/html2text.el" (20119 13824;;;### (autoloads (html2text) "html2text" "gnus/html2text.el" (20164
13813;;;;;; 34052)) 13825;;;;;; 60780))
13814;;; Generated autoloads from gnus/html2text.el 13826;;; Generated autoloads from gnus/html2text.el
13815 13827
13816(autoload 'html2text "html2text" "\ 13828(autoload 'html2text "html2text" "\
@@ -13821,7 +13833,7 @@ Convert HTML to plain text in the current buffer.
13821;;;*** 13833;;;***
13822 13834
13823;;;### (autoloads (htmlfontify-copy-and-link-dir htmlfontify-buffer) 13835;;;### (autoloads (htmlfontify-copy-and-link-dir htmlfontify-buffer)
13824;;;;;; "htmlfontify" "htmlfontify.el" (20119 34052)) 13836;;;;;; "htmlfontify" "htmlfontify.el" (20183 25152))
13825;;; Generated autoloads from htmlfontify.el 13837;;; Generated autoloads from htmlfontify.el
13826 13838
13827(autoload 'htmlfontify-buffer "htmlfontify" "\ 13839(autoload 'htmlfontify-buffer "htmlfontify" "\
@@ -13854,8 +13866,8 @@ You may also want to set `hfy-page-header' and `hfy-page-footer'.
13854;;;*** 13866;;;***
13855 13867
13856;;;### (autoloads (define-ibuffer-filter define-ibuffer-op define-ibuffer-sorter 13868;;;### (autoloads (define-ibuffer-filter define-ibuffer-op define-ibuffer-sorter
13857;;;;;; define-ibuffer-column) "ibuf-macs" "ibuf-macs.el" (20119 13869;;;;;; define-ibuffer-column) "ibuf-macs" "ibuf-macs.el" (19845
13858;;;;;; 34052)) 13870;;;;;; 45374))
13859;;; Generated autoloads from ibuf-macs.el 13871;;; Generated autoloads from ibuf-macs.el
13860 13872
13861(autoload 'define-ibuffer-column "ibuf-macs" "\ 13873(autoload 'define-ibuffer-column "ibuf-macs" "\
@@ -13952,7 +13964,7 @@ bound to the current value of the filter.
13952;;;*** 13964;;;***
13953 13965
13954;;;### (autoloads (ibuffer ibuffer-other-window ibuffer-list-buffers) 13966;;;### (autoloads (ibuffer ibuffer-other-window ibuffer-list-buffers)
13955;;;;;; "ibuffer" "ibuffer.el" (20126 50992)) 13967;;;;;; "ibuffer" "ibuffer.el" (20162 19074))
13956;;; Generated autoloads from ibuffer.el 13968;;; Generated autoloads from ibuffer.el
13957 13969
13958(autoload 'ibuffer-list-buffers "ibuffer" "\ 13970(autoload 'ibuffer-list-buffers "ibuffer" "\
@@ -13993,7 +14005,7 @@ FORMATS is the value to use for `ibuffer-formats'.
13993 14005
13994;;;### (autoloads (icalendar-import-buffer icalendar-import-file 14006;;;### (autoloads (icalendar-import-buffer icalendar-import-file
13995;;;;;; icalendar-export-region icalendar-export-file) "icalendar" 14007;;;;;; icalendar-export-region icalendar-export-file) "icalendar"
13996;;;;;; "calendar/icalendar.el" (20119 34052)) 14008;;;;;; "calendar/icalendar.el" (20164 29468))
13997;;; Generated autoloads from calendar/icalendar.el 14009;;; Generated autoloads from calendar/icalendar.el
13998 14010
13999(autoload 'icalendar-export-file "icalendar" "\ 14011(autoload 'icalendar-export-file "icalendar" "\
@@ -14045,8 +14057,8 @@ buffer `*icalendar-errors*'.
14045 14057
14046;;;*** 14058;;;***
14047 14059
14048;;;### (autoloads (icomplete-mode) "icomplete" "icomplete.el" (20126 14060;;;### (autoloads (icomplete-mode) "icomplete" "icomplete.el" (20127
14049;;;;;; 50158)) 14061;;;;;; 62865))
14050;;; Generated autoloads from icomplete.el 14062;;; Generated autoloads from icomplete.el
14051 14063
14052(defvar icomplete-mode nil "\ 14064(defvar icomplete-mode nil "\
@@ -14068,7 +14080,7 @@ the mode if ARG is omitted or nil.
14068 14080
14069;;;*** 14081;;;***
14070 14082
14071;;;### (autoloads (icon-mode) "icon" "progmodes/icon.el" (20119 34052)) 14083;;;### (autoloads (icon-mode) "icon" "progmodes/icon.el" (19890 42850))
14072;;; Generated autoloads from progmodes/icon.el 14084;;; Generated autoloads from progmodes/icon.el
14073 14085
14074(autoload 'icon-mode "icon" "\ 14086(autoload 'icon-mode "icon" "\
@@ -14109,7 +14121,7 @@ with no args, if that value is non-nil.
14109;;;*** 14121;;;***
14110 14122
14111;;;### (autoloads (idlwave-shell) "idlw-shell" "progmodes/idlw-shell.el" 14123;;;### (autoloads (idlwave-shell) "idlw-shell" "progmodes/idlw-shell.el"
14112;;;;;; (20127 25340)) 14124;;;;;; (20178 7273))
14113;;; Generated autoloads from progmodes/idlw-shell.el 14125;;; Generated autoloads from progmodes/idlw-shell.el
14114 14126
14115(autoload 'idlwave-shell "idlw-shell" "\ 14127(autoload 'idlwave-shell "idlw-shell" "\
@@ -14135,7 +14147,7 @@ See also the variable `idlwave-shell-prompt-pattern'.
14135;;;*** 14147;;;***
14136 14148
14137;;;### (autoloads (idlwave-mode) "idlwave" "progmodes/idlwave.el" 14149;;;### (autoloads (idlwave-mode) "idlwave" "progmodes/idlwave.el"
14138;;;;;; (20129 34279)) 14150;;;;;; (20168 57844))
14139;;; Generated autoloads from progmodes/idlwave.el 14151;;; Generated autoloads from progmodes/idlwave.el
14140 14152
14141(autoload 'idlwave-mode "idlwave" "\ 14153(autoload 'idlwave-mode "idlwave" "\
@@ -14269,8 +14281,8 @@ The main features of this mode are
14269;;;;;; ido-find-alternate-file ido-find-file-other-window ido-find-file 14281;;;;;; ido-find-alternate-file ido-find-file-other-window ido-find-file
14270;;;;;; ido-find-file-in-dir ido-switch-buffer-other-frame ido-insert-buffer 14282;;;;;; ido-find-file-in-dir ido-switch-buffer-other-frame ido-insert-buffer
14271;;;;;; ido-kill-buffer ido-display-buffer ido-switch-buffer-other-window 14283;;;;;; ido-kill-buffer ido-display-buffer ido-switch-buffer-other-window
14272;;;;;; ido-switch-buffer ido-mode ido-mode) "ido" "ido.el" (20139 14284;;;;;; ido-switch-buffer ido-mode ido-mode) "ido" "ido.el" (20178
14273;;;;;; 37519)) 14285;;;;;; 7273))
14274;;; Generated autoloads from ido.el 14286;;; Generated autoloads from ido.el
14275 14287
14276(defvar ido-mode nil "\ 14288(defvar ido-mode nil "\
@@ -14531,7 +14543,7 @@ DEF, if non-nil, is the default value.
14531 14543
14532;;;*** 14544;;;***
14533 14545
14534;;;### (autoloads (ielm) "ielm" "ielm.el" (20119 34052)) 14546;;;### (autoloads (ielm) "ielm" "ielm.el" (20077 56412))
14535;;; Generated autoloads from ielm.el 14547;;; Generated autoloads from ielm.el
14536 14548
14537(autoload 'ielm "ielm" "\ 14549(autoload 'ielm "ielm" "\
@@ -14542,7 +14554,7 @@ Switches to the buffer `*ielm*', or creates it if it does not exist.
14542 14554
14543;;;*** 14555;;;***
14544 14556
14545;;;### (autoloads (iimage-mode) "iimage" "iimage.el" (20119 34052)) 14557;;;### (autoloads (iimage-mode) "iimage" "iimage.el" (19845 45374))
14546;;; Generated autoloads from iimage.el 14558;;; Generated autoloads from iimage.el
14547 14559
14548(define-obsolete-function-alias 'turn-on-iimage-mode 'iimage-mode "24.1") 14560(define-obsolete-function-alias 'turn-on-iimage-mode 'iimage-mode "24.1")
@@ -14559,7 +14571,7 @@ Toggle inline image minor mode.
14559;;;;;; create-image image-type-auto-detected-p image-type-available-p 14571;;;;;; create-image image-type-auto-detected-p image-type-available-p
14560;;;;;; image-type image-type-from-file-name image-type-from-file-header 14572;;;;;; image-type image-type-from-file-name image-type-from-file-header
14561;;;;;; image-type-from-buffer image-type-from-data) "image" "image.el" 14573;;;;;; image-type-from-buffer image-type-from-data) "image" "image.el"
14562;;;;;; (20119 34052)) 14574;;;;;; (20084 29660))
14563;;; Generated autoloads from image.el 14575;;; Generated autoloads from image.el
14564 14576
14565(autoload 'image-type-from-data "image" "\ 14577(autoload 'image-type-from-data "image" "\
@@ -14756,7 +14768,7 @@ If Emacs is compiled without ImageMagick support, do nothing.
14756;;;;;; image-dired-jump-thumbnail-buffer image-dired-delete-tag 14768;;;;;; image-dired-jump-thumbnail-buffer image-dired-delete-tag
14757;;;;;; image-dired-tag-files image-dired-show-all-from-dir image-dired-display-thumbs 14769;;;;;; image-dired-tag-files image-dired-show-all-from-dir image-dired-display-thumbs
14758;;;;;; image-dired-dired-with-window-configuration image-dired-dired-toggle-marked-thumbs) 14770;;;;;; image-dired-dired-with-window-configuration image-dired-dired-toggle-marked-thumbs)
14759;;;;;; "image-dired" "image-dired.el" (20140 44252)) 14771;;;;;; "image-dired" "image-dired.el" (20168 57844))
14760;;; Generated autoloads from image-dired.el 14772;;; Generated autoloads from image-dired.el
14761 14773
14762(autoload 'image-dired-dired-toggle-marked-thumbs "image-dired" "\ 14774(autoload 'image-dired-dired-toggle-marked-thumbs "image-dired" "\
@@ -14894,7 +14906,7 @@ easy-to-use form.
14894 14906
14895;;;### (autoloads (auto-image-file-mode insert-image-file image-file-name-regexp 14907;;;### (autoloads (auto-image-file-mode insert-image-file image-file-name-regexp
14896;;;;;; image-file-name-regexps image-file-name-extensions) "image-file" 14908;;;;;; image-file-name-regexps image-file-name-extensions) "image-file"
14897;;;;;; "image-file.el" (20126 50176)) 14909;;;;;; "image-file.el" (20127 62865))
14898;;; Generated autoloads from image-file.el 14910;;; Generated autoloads from image-file.el
14899 14911
14900(defvar image-file-name-extensions (purecopy '("png" "jpeg" "jpg" "gif" "tiff" "tif" "xbm" "xpm" "pbm" "pgm" "ppm" "pnm" "svg")) "\ 14912(defvar image-file-name-extensions (purecopy '("png" "jpeg" "jpg" "gif" "tiff" "tif" "xbm" "xpm" "pbm" "pgm" "ppm" "pnm" "svg")) "\
@@ -14957,7 +14969,7 @@ An image file is one whose name has an extension in
14957;;;*** 14969;;;***
14958 14970
14959;;;### (autoloads (image-bookmark-jump image-mode-as-text image-minor-mode 14971;;;### (autoloads (image-bookmark-jump image-mode-as-text image-minor-mode
14960;;;;;; image-mode) "image-mode" "image-mode.el" (20126 50186)) 14972;;;;;; image-mode) "image-mode" "image-mode.el" (20160 63745))
14961;;; Generated autoloads from image-mode.el 14973;;; Generated autoloads from image-mode.el
14962 14974
14963(autoload 'image-mode "image-mode" "\ 14975(autoload 'image-mode "image-mode" "\
@@ -15002,7 +15014,7 @@ on these modes.
15002;;;*** 15014;;;***
15003 15015
15004;;;### (autoloads (imenu imenu-add-menubar-index imenu-add-to-menubar 15016;;;### (autoloads (imenu imenu-add-menubar-index imenu-add-to-menubar
15005;;;;;; imenu-sort-function) "imenu" "imenu.el" (20119 34052)) 15017;;;;;; imenu-sort-function) "imenu" "imenu.el" (19845 45374))
15006;;; Generated autoloads from imenu.el 15018;;; Generated autoloads from imenu.el
15007 15019
15008(defvar imenu-sort-function nil "\ 15020(defvar imenu-sort-function nil "\
@@ -15119,7 +15131,7 @@ for more information.
15119 15131
15120;;;### (autoloads (indian-2-column-to-ucs-region in-is13194-pre-write-conversion 15132;;;### (autoloads (indian-2-column-to-ucs-region in-is13194-pre-write-conversion
15121;;;;;; in-is13194-post-read-conversion indian-compose-string indian-compose-region) 15133;;;;;; in-is13194-post-read-conversion indian-compose-string indian-compose-region)
15122;;;;;; "ind-util" "language/ind-util.el" (20119 34052)) 15134;;;;;; "ind-util" "language/ind-util.el" (20097 41737))
15123;;; Generated autoloads from language/ind-util.el 15135;;; Generated autoloads from language/ind-util.el
15124 15136
15125(autoload 'indian-compose-region "ind-util" "\ 15137(autoload 'indian-compose-region "ind-util" "\
@@ -15151,7 +15163,7 @@ Convert old Emacs Devanagari characters to UCS.
15151 15163
15152;;;### (autoloads (inferior-lisp inferior-lisp-prompt inferior-lisp-load-command 15164;;;### (autoloads (inferior-lisp inferior-lisp-prompt inferior-lisp-load-command
15153;;;;;; inferior-lisp-program inferior-lisp-filter-regexp) "inf-lisp" 15165;;;;;; inferior-lisp-program inferior-lisp-filter-regexp) "inf-lisp"
15154;;;;;; "progmodes/inf-lisp.el" (20119 34052)) 15166;;;;;; "progmodes/inf-lisp.el" (20168 57844))
15155;;; Generated autoloads from progmodes/inf-lisp.el 15167;;; Generated autoloads from progmodes/inf-lisp.el
15156 15168
15157(defvar inferior-lisp-filter-regexp (purecopy "\\`\\s *\\(:\\(\\w\\|\\s_\\)\\)?\\s *\\'") "\ 15169(defvar inferior-lisp-filter-regexp (purecopy "\\`\\s *\\(:\\(\\w\\|\\s_\\)\\)?\\s *\\'") "\
@@ -15218,7 +15230,7 @@ of `inferior-lisp-program'). Runs the hooks from
15218;;;;;; Info-goto-emacs-key-command-node Info-goto-emacs-command-node 15230;;;;;; Info-goto-emacs-key-command-node Info-goto-emacs-command-node
15219;;;;;; Info-mode info-finder info-apropos Info-index Info-directory 15231;;;;;; Info-mode info-finder info-apropos Info-index Info-directory
15220;;;;;; Info-on-current-buffer info-standalone info-emacs-manual 15232;;;;;; Info-on-current-buffer info-standalone info-emacs-manual
15221;;;;;; info info-other-window) "info" "info.el" (20134 14214)) 15233;;;;;; info info-other-window) "info" "info.el" (20172 54913))
15222;;; Generated autoloads from info.el 15234;;; Generated autoloads from info.el
15223 15235
15224(autoload 'info-other-window "info" "\ 15236(autoload 'info-other-window "info" "\
@@ -15404,7 +15416,7 @@ Go to Info buffer that displays MANUAL, creating it if none already exists.
15404 15416
15405;;;### (autoloads (info-complete-file info-complete-symbol info-lookup-file 15417;;;### (autoloads (info-complete-file info-complete-symbol info-lookup-file
15406;;;;;; info-lookup-symbol info-lookup-reset) "info-look" "info-look.el" 15418;;;;;; info-lookup-symbol info-lookup-reset) "info-look" "info-look.el"
15407;;;;;; (20119 34052)) 15419;;;;;; (19984 16846))
15408;;; Generated autoloads from info-look.el 15420;;; Generated autoloads from info-look.el
15409 15421
15410(autoload 'info-lookup-reset "info-look" "\ 15422(autoload 'info-lookup-reset "info-look" "\
@@ -15453,7 +15465,7 @@ Perform completion on file preceding point.
15453 15465
15454;;;### (autoloads (info-xref-docstrings info-xref-check-all-custom 15466;;;### (autoloads (info-xref-docstrings info-xref-check-all-custom
15455;;;;;; info-xref-check-all info-xref-check) "info-xref" "info-xref.el" 15467;;;;;; info-xref-check-all info-xref-check) "info-xref" "info-xref.el"
15456;;;;;; (20119 34052)) 15468;;;;;; (20168 57844))
15457;;; Generated autoloads from info-xref.el 15469;;; Generated autoloads from info-xref.el
15458 15470
15459(autoload 'info-xref-check "info-xref" "\ 15471(autoload 'info-xref-check "info-xref" "\
@@ -15536,7 +15548,7 @@ the sources handy.
15536;;;*** 15548;;;***
15537 15549
15538;;;### (autoloads (batch-info-validate Info-validate Info-split Info-split-threshold 15550;;;### (autoloads (batch-info-validate Info-validate Info-split Info-split-threshold
15539;;;;;; Info-tagify) "informat" "informat.el" (20119 34052)) 15551;;;;;; Info-tagify) "informat" "informat.el" (19886 45771))
15540;;; Generated autoloads from informat.el 15552;;; Generated autoloads from informat.el
15541 15553
15542(autoload 'Info-tagify "informat" "\ 15554(autoload 'Info-tagify "informat" "\
@@ -15583,7 +15595,7 @@ For example, invoke \"emacs -batch -f batch-info-validate $info/ ~/*.info\"
15583 15595
15584;;;### (autoloads (isearch-process-search-multibyte-characters isearch-toggle-input-method 15596;;;### (autoloads (isearch-process-search-multibyte-characters isearch-toggle-input-method
15585;;;;;; isearch-toggle-specified-input-method) "isearch-x" "international/isearch-x.el" 15597;;;;;; isearch-toggle-specified-input-method) "isearch-x" "international/isearch-x.el"
15586;;;;;; (20119 34052)) 15598;;;;;; (19845 45374))
15587;;; Generated autoloads from international/isearch-x.el 15599;;; Generated autoloads from international/isearch-x.el
15588 15600
15589(autoload 'isearch-toggle-specified-input-method "isearch-x" "\ 15601(autoload 'isearch-toggle-specified-input-method "isearch-x" "\
@@ -15603,8 +15615,8 @@ Toggle input method in interactive search.
15603 15615
15604;;;*** 15616;;;***
15605 15617
15606;;;### (autoloads (isearchb-activate) "isearchb" "isearchb.el" (20119 15618;;;### (autoloads (isearchb-activate) "isearchb" "isearchb.el" (19845
15607;;;;;; 34052)) 15619;;;;;; 45374))
15608;;; Generated autoloads from isearchb.el 15620;;; Generated autoloads from isearchb.el
15609 15621
15610(autoload 'isearchb-activate "isearchb" "\ 15622(autoload 'isearchb-activate "isearchb" "\
@@ -15620,7 +15632,7 @@ accessed via isearchb.
15620;;;### (autoloads (iso-cvt-define-menu iso-cvt-write-only iso-cvt-read-only 15632;;;### (autoloads (iso-cvt-define-menu iso-cvt-write-only iso-cvt-read-only
15621;;;;;; iso-sgml2iso iso-iso2sgml iso-iso2duden iso-iso2gtex iso-gtex2iso 15633;;;;;; iso-sgml2iso iso-iso2sgml iso-iso2duden iso-iso2gtex iso-gtex2iso
15622;;;;;; iso-tex2iso iso-iso2tex iso-german iso-spanish) "iso-cvt" 15634;;;;;; iso-tex2iso iso-iso2tex iso-german iso-spanish) "iso-cvt"
15623;;;;;; "international/iso-cvt.el" (20119 34052)) 15635;;;;;; "international/iso-cvt.el" (19845 45374))
15624;;; Generated autoloads from international/iso-cvt.el 15636;;; Generated autoloads from international/iso-cvt.el
15625 15637
15626(autoload 'iso-spanish "iso-cvt" "\ 15638(autoload 'iso-spanish "iso-cvt" "\
@@ -15711,7 +15723,7 @@ Add submenus to the File menu, to convert to and from various formats.
15711;;;*** 15723;;;***
15712 15724
15713;;;### (autoloads nil "iso-transl" "international/iso-transl.el" 15725;;;### (autoloads nil "iso-transl" "international/iso-transl.el"
15714;;;;;; (20119 34052)) 15726;;;;;; (19845 45374))
15715;;; Generated autoloads from international/iso-transl.el 15727;;; Generated autoloads from international/iso-transl.el
15716 (or key-translation-map (setq key-translation-map (make-sparse-keymap))) 15728 (or key-translation-map (setq key-translation-map (make-sparse-keymap)))
15717 (define-key key-translation-map "\C-x8" 'iso-transl-ctl-x-8-map) 15729 (define-key key-translation-map "\C-x8" 'iso-transl-ctl-x-8-map)
@@ -15723,7 +15735,7 @@ Add submenus to the File menu, to convert to and from various formats.
15723;;;;;; ispell-complete-word ispell-continue ispell-buffer ispell-comments-and-strings 15735;;;;;; ispell-complete-word ispell-continue ispell-buffer ispell-comments-and-strings
15724;;;;;; ispell-region ispell-change-dictionary ispell-kill-ispell 15736;;;;;; ispell-region ispell-change-dictionary ispell-kill-ispell
15725;;;;;; ispell-help ispell-pdict-save ispell-word ispell-personal-dictionary) 15737;;;;;; ispell-help ispell-pdict-save ispell-word ispell-personal-dictionary)
15726;;;;;; "ispell" "textmodes/ispell.el" (20139 33409)) 15738;;;;;; "ispell" "textmodes/ispell.el" (20178 7273))
15727;;; Generated autoloads from textmodes/ispell.el 15739;;; Generated autoloads from textmodes/ispell.el
15728 15740
15729(put 'ispell-check-comments 'safe-local-variable (lambda (a) (memq a '(nil t exclusive)))) 15741(put 'ispell-check-comments 'safe-local-variable (lambda (a) (memq a '(nil t exclusive))))
@@ -15949,8 +15961,8 @@ You can bind this to the key C-c i in GNUS or mail by adding to
15949 15961
15950;;;*** 15962;;;***
15951 15963
15952;;;### (autoloads (iswitchb-mode) "iswitchb" "iswitchb.el" (20126 15964;;;### (autoloads (iswitchb-mode) "iswitchb" "iswitchb.el" (20168
15953;;;;;; 50194)) 15965;;;;;; 57844))
15954;;; Generated autoloads from iswitchb.el 15966;;; Generated autoloads from iswitchb.el
15955 15967
15956(defvar iswitchb-mode nil "\ 15968(defvar iswitchb-mode nil "\
@@ -15978,7 +15990,7 @@ between buffers using substrings. See `iswitchb' for details.
15978;;;### (autoloads (read-hiragana-string japanese-zenkaku-region japanese-hankaku-region 15990;;;### (autoloads (read-hiragana-string japanese-zenkaku-region japanese-hankaku-region
15979;;;;;; japanese-hiragana-region japanese-katakana-region japanese-zenkaku 15991;;;;;; japanese-hiragana-region japanese-katakana-region japanese-zenkaku
15980;;;;;; japanese-hankaku japanese-hiragana japanese-katakana setup-japanese-environment-internal) 15992;;;;;; japanese-hankaku japanese-hiragana japanese-katakana setup-japanese-environment-internal)
15981;;;;;; "japan-util" "language/japan-util.el" (20119 34052)) 15993;;;;;; "japan-util" "language/japan-util.el" (19845 45374))
15982;;; Generated autoloads from language/japan-util.el 15994;;; Generated autoloads from language/japan-util.el
15983 15995
15984(autoload 'setup-japanese-environment-internal "japan-util" "\ 15996(autoload 'setup-japanese-environment-internal "japan-util" "\
@@ -16056,7 +16068,7 @@ If non-nil, second arg INITIAL-INPUT is a string to insert before reading.
16056;;;*** 16068;;;***
16057 16069
16058;;;### (autoloads (jka-compr-uninstall jka-compr-handler) "jka-compr" 16070;;;### (autoloads (jka-compr-uninstall jka-compr-handler) "jka-compr"
16059;;;;;; "jka-compr.el" (20119 34052)) 16071;;;;;; "jka-compr.el" (20000 30139))
16060;;; Generated autoloads from jka-compr.el 16072;;; Generated autoloads from jka-compr.el
16061 16073
16062(defvar jka-compr-inhibit nil "\ 16074(defvar jka-compr-inhibit nil "\
@@ -16079,7 +16091,7 @@ by `jka-compr-installed'.
16079 16091
16080;;;*** 16092;;;***
16081 16093
16082;;;### (autoloads (js-mode) "js" "progmodes/js.el" (20119 34052)) 16094;;;### (autoloads (js-mode) "js" "progmodes/js.el" (20167 36967))
16083;;; Generated autoloads from progmodes/js.el 16095;;; Generated autoloads from progmodes/js.el
16084 16096
16085(autoload 'js-mode "js" "\ 16097(autoload 'js-mode "js" "\
@@ -16093,7 +16105,7 @@ Major mode for editing JavaScript.
16093 16105
16094;;;### (autoloads (keypad-setup keypad-numlock-shifted-setup keypad-shifted-setup 16106;;;### (autoloads (keypad-setup keypad-numlock-shifted-setup keypad-shifted-setup
16095;;;;;; keypad-numlock-setup keypad-setup) "keypad" "emulation/keypad.el" 16107;;;;;; keypad-numlock-setup keypad-setup) "keypad" "emulation/keypad.el"
16096;;;;;; (20119 34052)) 16108;;;;;; (19845 45374))
16097;;; Generated autoloads from emulation/keypad.el 16109;;; Generated autoloads from emulation/keypad.el
16098 16110
16099(defvar keypad-setup nil "\ 16111(defvar keypad-setup nil "\
@@ -16149,7 +16161,7 @@ the decimal key on the keypad is mapped to DECIMAL instead of `.'
16149;;;*** 16161;;;***
16150 16162
16151;;;### (autoloads (kinsoku) "kinsoku" "international/kinsoku.el" 16163;;;### (autoloads (kinsoku) "kinsoku" "international/kinsoku.el"
16152;;;;;; (20119 34052)) 16164;;;;;; (19845 45374))
16153;;; Generated autoloads from international/kinsoku.el 16165;;; Generated autoloads from international/kinsoku.el
16154 16166
16155(autoload 'kinsoku "kinsoku" "\ 16167(autoload 'kinsoku "kinsoku" "\
@@ -16170,8 +16182,8 @@ the context of text formatting.
16170 16182
16171;;;*** 16183;;;***
16172 16184
16173;;;### (autoloads (kkc-region) "kkc" "international/kkc.el" (20119 16185;;;### (autoloads (kkc-region) "kkc" "international/kkc.el" (19845
16174;;;;;; 34052)) 16186;;;;;; 45374))
16175;;; Generated autoloads from international/kkc.el 16187;;; Generated autoloads from international/kkc.el
16176 16188
16177(defvar kkc-after-update-conversion-functions nil "\ 16189(defvar kkc-after-update-conversion-functions nil "\
@@ -16196,7 +16208,7 @@ and the return value is the length of the conversion.
16196;;;### (autoloads (kmacro-end-call-mouse kmacro-end-and-call-macro 16208;;;### (autoloads (kmacro-end-call-mouse kmacro-end-and-call-macro
16197;;;;;; kmacro-end-or-call-macro kmacro-start-macro-or-insert-counter 16209;;;;;; kmacro-end-or-call-macro kmacro-start-macro-or-insert-counter
16198;;;;;; kmacro-call-macro kmacro-end-macro kmacro-start-macro kmacro-exec-ring-item) 16210;;;;;; kmacro-call-macro kmacro-end-macro kmacro-start-macro kmacro-exec-ring-item)
16199;;;;;; "kmacro" "kmacro.el" (20119 34052)) 16211;;;;;; "kmacro" "kmacro.el" (20164 60780))
16200;;; Generated autoloads from kmacro.el 16212;;; Generated autoloads from kmacro.el
16201 (global-set-key "\C-x(" 'kmacro-start-macro) 16213 (global-set-key "\C-x(" 'kmacro-start-macro)
16202 (global-set-key "\C-x)" 'kmacro-end-macro) 16214 (global-set-key "\C-x)" 'kmacro-end-macro)
@@ -16307,7 +16319,7 @@ If kbd macro currently being defined end it before activating it.
16307;;;*** 16319;;;***
16308 16320
16309;;;### (autoloads (setup-korean-environment-internal) "korea-util" 16321;;;### (autoloads (setup-korean-environment-internal) "korea-util"
16310;;;;;; "language/korea-util.el" (20119 34052)) 16322;;;;;; "language/korea-util.el" (19845 45374))
16311;;; Generated autoloads from language/korea-util.el 16323;;; Generated autoloads from language/korea-util.el
16312 16324
16313(defvar default-korean-keyboard (purecopy (if (string-match "3" (or (getenv "HANGUL_KEYBOARD_TYPE") "")) "3" "")) "\ 16325(defvar default-korean-keyboard (purecopy (if (string-match "3" (or (getenv "HANGUL_KEYBOARD_TYPE") "")) "3" "")) "\
@@ -16322,7 +16334,7 @@ If kbd macro currently being defined end it before activating it.
16322;;;*** 16334;;;***
16323 16335
16324;;;### (autoloads (landmark landmark-test-run) "landmark" "play/landmark.el" 16336;;;### (autoloads (landmark landmark-test-run) "landmark" "play/landmark.el"
16325;;;;;; (20119 34052)) 16337;;;;;; (20178 7273))
16326;;; Generated autoloads from play/landmark.el 16338;;; Generated autoloads from play/landmark.el
16327 16339
16328(defalias 'landmark-repeat 'landmark-test-run) 16340(defalias 'landmark-repeat 'landmark-test-run)
@@ -16354,7 +16366,7 @@ Use \\[describe-mode] for more info.
16354 16366
16355;;;### (autoloads (lao-compose-region lao-composition-function lao-transcribe-roman-to-lao-string 16367;;;### (autoloads (lao-compose-region lao-composition-function lao-transcribe-roman-to-lao-string
16356;;;;;; lao-transcribe-single-roman-syllable-to-lao lao-compose-string) 16368;;;;;; lao-transcribe-single-roman-syllable-to-lao lao-compose-string)
16357;;;;;; "lao-util" "language/lao-util.el" (20119 34052)) 16369;;;;;; "lao-util" "language/lao-util.el" (20165 31925))
16358;;; Generated autoloads from language/lao-util.el 16370;;; Generated autoloads from language/lao-util.el
16359 16371
16360(autoload 'lao-compose-string "lao-util" "\ 16372(autoload 'lao-compose-string "lao-util" "\
@@ -16393,7 +16405,7 @@ Transcribe Romanized Lao string STR to Lao character string.
16393 16405
16394;;;### (autoloads (latexenc-find-file-coding-system latexenc-coding-system-to-inputenc 16406;;;### (autoloads (latexenc-find-file-coding-system latexenc-coding-system-to-inputenc
16395;;;;;; latexenc-inputenc-to-coding-system latex-inputenc-coding-alist) 16407;;;;;; latexenc-inputenc-to-coding-system latex-inputenc-coding-alist)
16396;;;;;; "latexenc" "international/latexenc.el" (20119 34052)) 16408;;;;;; "latexenc" "international/latexenc.el" (19845 45374))
16397;;; Generated autoloads from international/latexenc.el 16409;;; Generated autoloads from international/latexenc.el
16398 16410
16399(defvar latex-inputenc-coding-alist (purecopy '(("ansinew" . windows-1252) ("applemac" . mac-roman) ("ascii" . us-ascii) ("cp1250" . windows-1250) ("cp1252" . windows-1252) ("cp1257" . cp1257) ("cp437de" . cp437) ("cp437" . cp437) ("cp850" . cp850) ("cp852" . cp852) ("cp858" . cp858) ("cp865" . cp865) ("latin1" . iso-8859-1) ("latin2" . iso-8859-2) ("latin3" . iso-8859-3) ("latin4" . iso-8859-4) ("latin5" . iso-8859-5) ("latin9" . iso-8859-15) ("next" . next) ("utf8" . utf-8) ("utf8x" . utf-8))) "\ 16411(defvar latex-inputenc-coding-alist (purecopy '(("ansinew" . windows-1252) ("applemac" . mac-roman) ("ascii" . us-ascii) ("cp1250" . windows-1250) ("cp1252" . windows-1252) ("cp1257" . cp1257) ("cp437de" . cp437) ("cp437" . cp437) ("cp850" . cp850) ("cp852" . cp852) ("cp858" . cp858) ("cp865" . cp865) ("latin1" . iso-8859-1) ("latin2" . iso-8859-2) ("latin3" . iso-8859-3) ("latin4" . iso-8859-4) ("latin5" . iso-8859-5) ("latin9" . iso-8859-15) ("next" . next) ("utf8" . utf-8) ("utf8x" . utf-8))) "\
@@ -16425,7 +16437,7 @@ coding system names is determined from `latex-inputenc-coding-alist'.
16425;;;*** 16437;;;***
16426 16438
16427;;;### (autoloads (latin1-display-ucs-per-lynx latin1-display latin1-display) 16439;;;### (autoloads (latin1-display-ucs-per-lynx latin1-display latin1-display)
16428;;;;;; "latin1-disp" "international/latin1-disp.el" (20119 34052)) 16440;;;;;; "latin1-disp" "international/latin1-disp.el" (19845 45374))
16429;;; Generated autoloads from international/latin1-disp.el 16441;;; Generated autoloads from international/latin1-disp.el
16430 16442
16431(defvar latin1-display nil "\ 16443(defvar latin1-display nil "\
@@ -16467,7 +16479,7 @@ use either \\[customize] or the function `latin1-display'.")
16467;;;*** 16479;;;***
16468 16480
16469;;;### (autoloads (ld-script-mode) "ld-script" "progmodes/ld-script.el" 16481;;;### (autoloads (ld-script-mode) "ld-script" "progmodes/ld-script.el"
16470;;;;;; (20119 34052)) 16482;;;;;; (19961 55377))
16471;;; Generated autoloads from progmodes/ld-script.el 16483;;; Generated autoloads from progmodes/ld-script.el
16472 16484
16473(autoload 'ld-script-mode "ld-script" "\ 16485(autoload 'ld-script-mode "ld-script" "\
@@ -16478,7 +16490,7 @@ A major mode to edit GNU ld script files
16478;;;*** 16490;;;***
16479 16491
16480;;;### (autoloads (ledit-from-lisp-mode ledit-mode) "ledit" "ledit.el" 16492;;;### (autoloads (ledit-from-lisp-mode ledit-mode) "ledit" "ledit.el"
16481;;;;;; (20119 34052)) 16493;;;;;; (19845 45374))
16482;;; Generated autoloads from ledit.el 16494;;; Generated autoloads from ledit.el
16483 16495
16484(defconst ledit-save-files t "\ 16496(defconst ledit-save-files t "\
@@ -16513,7 +16525,7 @@ do (setq lisp-mode-hook 'ledit-from-lisp-mode)
16513 16525
16514;;;*** 16526;;;***
16515 16527
16516;;;### (autoloads (life) "life" "play/life.el" (20119 34052)) 16528;;;### (autoloads (life) "life" "play/life.el" (19845 45374))
16517;;; Generated autoloads from play/life.el 16529;;; Generated autoloads from play/life.el
16518 16530
16519(autoload 'life "life" "\ 16531(autoload 'life "life" "\
@@ -16527,7 +16539,7 @@ generations (this defaults to 1).
16527;;;*** 16539;;;***
16528 16540
16529;;;### (autoloads (global-linum-mode linum-mode linum-format) "linum" 16541;;;### (autoloads (global-linum-mode linum-mode linum-format) "linum"
16530;;;;;; "linum.el" (20126 50215)) 16542;;;;;; "linum.el" (20127 62865))
16531;;; Generated autoloads from linum.el 16543;;; Generated autoloads from linum.el
16532 16544
16533(defvar linum-format 'dynamic "\ 16545(defvar linum-format 'dynamic "\
@@ -16572,8 +16584,8 @@ See `linum-mode' for more information on Linum mode.
16572 16584
16573;;;*** 16585;;;***
16574 16586
16575;;;### (autoloads (unload-feature) "loadhist" "loadhist.el" (20119 16587;;;### (autoloads (unload-feature) "loadhist" "loadhist.el" (20168
16576;;;;;; 34052)) 16588;;;;;; 57844))
16577;;; Generated autoloads from loadhist.el 16589;;; Generated autoloads from loadhist.el
16578 16590
16579(autoload 'unload-feature "loadhist" "\ 16591(autoload 'unload-feature "loadhist" "\
@@ -16605,7 +16617,7 @@ something strange, such as redefining an Emacs function.
16605;;;*** 16617;;;***
16606 16618
16607;;;### (autoloads (locate-with-filter locate locate-ls-subdir-switches) 16619;;;### (autoloads (locate-with-filter locate locate-ls-subdir-switches)
16608;;;;;; "locate" "locate.el" (20119 34052)) 16620;;;;;; "locate" "locate.el" (19886 45771))
16609;;; Generated autoloads from locate.el 16621;;; Generated autoloads from locate.el
16610 16622
16611(defvar locate-ls-subdir-switches (purecopy "-al") "\ 16623(defvar locate-ls-subdir-switches (purecopy "-al") "\
@@ -16657,7 +16669,7 @@ except that FILTER is not optional.
16657 16669
16658;;;*** 16670;;;***
16659 16671
16660;;;### (autoloads (log-edit) "log-edit" "vc/log-edit.el" (20138 48832)) 16672;;;### (autoloads (log-edit) "log-edit" "vc/log-edit.el" (20138 33157))
16661;;; Generated autoloads from vc/log-edit.el 16673;;; Generated autoloads from vc/log-edit.el
16662 16674
16663(autoload 'log-edit "log-edit" "\ 16675(autoload 'log-edit "log-edit" "\
@@ -16684,8 +16696,8 @@ uses the current buffer.
16684 16696
16685;;;*** 16697;;;***
16686 16698
16687;;;### (autoloads (log-view-mode) "log-view" "vc/log-view.el" (20119 16699;;;### (autoloads (log-view-mode) "log-view" "vc/log-view.el" (19946
16688;;;;;; 34052)) 16700;;;;;; 1612))
16689;;; Generated autoloads from vc/log-view.el 16701;;; Generated autoloads from vc/log-view.el
16690 16702
16691(autoload 'log-view-mode "log-view" "\ 16703(autoload 'log-view-mode "log-view" "\
@@ -16695,8 +16707,8 @@ Major mode for browsing CVS log output.
16695 16707
16696;;;*** 16708;;;***
16697 16709
16698;;;### (autoloads (longlines-mode) "longlines" "longlines.el" (20126 16710;;;### (autoloads (longlines-mode) "longlines" "longlines.el" (20127
16699;;;;;; 50224)) 16711;;;;;; 62865))
16700;;; Generated autoloads from longlines.el 16712;;; Generated autoloads from longlines.el
16701 16713
16702(autoload 'longlines-mode "longlines" "\ 16714(autoload 'longlines-mode "longlines" "\
@@ -16722,13 +16734,15 @@ newlines are indicated with a symbol.
16722;;;*** 16734;;;***
16723 16735
16724;;;### (autoloads (print-region lpr-region print-buffer lpr-buffer 16736;;;### (autoloads (print-region lpr-region print-buffer lpr-buffer
16725;;;;;; lpr-command lpr-switches printer-name) "lpr" "lpr.el" (20119 16737;;;;;; lpr-command lpr-switches printer-name) "lpr" "lpr.el" (20174
16726;;;;;; 34052)) 16738;;;;;; 10230))
16727;;; Generated autoloads from lpr.el 16739;;; Generated autoloads from lpr.el
16728 16740
16729(defvar lpr-windows-system (memq system-type '(ms-dos windows-nt))) 16741(defvar lpr-windows-system (memq system-type '(ms-dos windows-nt)) "\
16742Non-nil if running on MS-DOS or MS Windows.")
16730 16743
16731(defvar lpr-lp-system (memq system-type '(usg-unix-v hpux irix))) 16744(defvar lpr-lp-system (memq system-type '(usg-unix-v hpux irix)) "\
16745Non-nil if running on a system type that uses the \"lp\" command.")
16732 16746
16733(defvar printer-name (and (eq system-type 'ms-dos) "PRN") "\ 16747(defvar printer-name (and (eq system-type 'ms-dos) "PRN") "\
16734The name of a local printer to which data is sent for printing. 16748The name of a local printer to which data is sent for printing.
@@ -16817,7 +16831,7 @@ for further customization of the printer command.
16817;;;*** 16831;;;***
16818 16832
16819;;;### (autoloads (ls-lisp-support-shell-wildcards) "ls-lisp" "ls-lisp.el" 16833;;;### (autoloads (ls-lisp-support-shell-wildcards) "ls-lisp" "ls-lisp.el"
16820;;;;;; (20119 34052)) 16834;;;;;; (19886 45771))
16821;;; Generated autoloads from ls-lisp.el 16835;;; Generated autoloads from ls-lisp.el
16822 16836
16823(defvar ls-lisp-support-shell-wildcards t "\ 16837(defvar ls-lisp-support-shell-wildcards t "\
@@ -16828,8 +16842,8 @@ Otherwise they are treated as Emacs regexps (for backward compatibility).")
16828 16842
16829;;;*** 16843;;;***
16830 16844
16831;;;### (autoloads (lunar-phases) "lunar" "calendar/lunar.el" (20119 16845;;;### (autoloads (lunar-phases) "lunar" "calendar/lunar.el" (19845
16832;;;;;; 34052)) 16846;;;;;; 45374))
16833;;; Generated autoloads from calendar/lunar.el 16847;;; Generated autoloads from calendar/lunar.el
16834 16848
16835(autoload 'lunar-phases "lunar" "\ 16849(autoload 'lunar-phases "lunar" "\
@@ -16843,8 +16857,8 @@ This function is suitable for execution in a .emacs file.
16843 16857
16844;;;*** 16858;;;***
16845 16859
16846;;;### (autoloads (m4-mode) "m4-mode" "progmodes/m4-mode.el" (20119 16860;;;### (autoloads (m4-mode) "m4-mode" "progmodes/m4-mode.el" (19845
16847;;;;;; 34052)) 16861;;;;;; 45374))
16848;;; Generated autoloads from progmodes/m4-mode.el 16862;;; Generated autoloads from progmodes/m4-mode.el
16849 16863
16850(autoload 'm4-mode "m4-mode" "\ 16864(autoload 'm4-mode "m4-mode" "\
@@ -16855,7 +16869,7 @@ A major mode to edit m4 macro files.
16855;;;*** 16869;;;***
16856 16870
16857;;;### (autoloads (macroexpand-all) "macroexp" "emacs-lisp/macroexp.el" 16871;;;### (autoloads (macroexpand-all) "macroexp" "emacs-lisp/macroexp.el"
16858;;;;;; (20119 34052)) 16872;;;;;; (19930 13389))
16859;;; Generated autoloads from emacs-lisp/macroexp.el 16873;;; Generated autoloads from emacs-lisp/macroexp.el
16860 16874
16861(autoload 'macroexpand-all "macroexp" "\ 16875(autoload 'macroexpand-all "macroexp" "\
@@ -16869,7 +16883,7 @@ definitions to shadow the loaded ones for use in file byte-compilation.
16869;;;*** 16883;;;***
16870 16884
16871;;;### (autoloads (apply-macro-to-region-lines kbd-macro-query insert-kbd-macro 16885;;;### (autoloads (apply-macro-to-region-lines kbd-macro-query insert-kbd-macro
16872;;;;;; name-last-kbd-macro) "macros" "macros.el" (20119 34052)) 16886;;;;;; name-last-kbd-macro) "macros" "macros.el" (19886 45771))
16873;;; Generated autoloads from macros.el 16887;;; Generated autoloads from macros.el
16874 16888
16875(autoload 'name-last-kbd-macro "macros" "\ 16889(autoload 'name-last-kbd-macro "macros" "\
@@ -16958,7 +16972,7 @@ and then select the region of un-tablified names and use
16958;;;*** 16972;;;***
16959 16973
16960;;;### (autoloads (what-domain mail-extract-address-components) "mail-extr" 16974;;;### (autoloads (what-domain mail-extract-address-components) "mail-extr"
16961;;;;;; "mail/mail-extr.el" (20119 34052)) 16975;;;;;; "mail/mail-extr.el" (20160 63745))
16962;;; Generated autoloads from mail/mail-extr.el 16976;;; Generated autoloads from mail/mail-extr.el
16963 16977
16964(autoload 'mail-extract-address-components "mail-extr" "\ 16978(autoload 'mail-extract-address-components "mail-extr" "\
@@ -16990,7 +17004,7 @@ Convert mail domain DOMAIN to the country it corresponds to.
16990 17004
16991;;;### (autoloads (mail-hist-put-headers-into-history mail-hist-keep-history 17005;;;### (autoloads (mail-hist-put-headers-into-history mail-hist-keep-history
16992;;;;;; mail-hist-enable mail-hist-define-keys) "mail-hist" "mail/mail-hist.el" 17006;;;;;; mail-hist-enable mail-hist-define-keys) "mail-hist" "mail/mail-hist.el"
16993;;;;;; (20119 34052)) 17007;;;;;; (19845 45374))
16994;;; Generated autoloads from mail/mail-hist.el 17008;;; Generated autoloads from mail/mail-hist.el
16995 17009
16996(autoload 'mail-hist-define-keys "mail-hist" "\ 17010(autoload 'mail-hist-define-keys "mail-hist" "\
@@ -17022,7 +17036,7 @@ This function normally would be called when the message is sent.
17022;;;### (autoloads (mail-fetch-field mail-unquote-printable-region 17036;;;### (autoloads (mail-fetch-field mail-unquote-printable-region
17023;;;;;; mail-unquote-printable mail-quote-printable-region mail-quote-printable 17037;;;;;; mail-unquote-printable mail-quote-printable-region mail-quote-printable
17024;;;;;; mail-file-babyl-p mail-dont-reply-to-names mail-use-rfc822) 17038;;;;;; mail-file-babyl-p mail-dont-reply-to-names mail-use-rfc822)
17025;;;;;; "mail-utils" "mail/mail-utils.el" (20119 34052)) 17039;;;;;; "mail-utils" "mail/mail-utils.el" (19922 19303))
17026;;; Generated autoloads from mail/mail-utils.el 17040;;; Generated autoloads from mail/mail-utils.el
17027 17041
17028(defvar mail-use-rfc822 nil "\ 17042(defvar mail-use-rfc822 nil "\
@@ -17095,7 +17109,7 @@ matches may be returned from the message body.
17095 17109
17096;;;### (autoloads (define-mail-abbrev build-mail-abbrevs mail-abbrevs-setup 17110;;;### (autoloads (define-mail-abbrev build-mail-abbrevs mail-abbrevs-setup
17097;;;;;; mail-abbrevs-mode) "mailabbrev" "mail/mailabbrev.el" (20127 17111;;;;;; mail-abbrevs-mode) "mailabbrev" "mail/mailabbrev.el" (20127
17098;;;;;; 25972)) 17112;;;;;; 62865))
17099;;; Generated autoloads from mail/mailabbrev.el 17113;;; Generated autoloads from mail/mailabbrev.el
17100 17114
17101(defvar mail-abbrevs-mode nil "\ 17115(defvar mail-abbrevs-mode nil "\
@@ -17146,7 +17160,7 @@ double-quotes.
17146 17160
17147;;;### (autoloads (mail-complete mail-completion-at-point-function 17161;;;### (autoloads (mail-complete mail-completion-at-point-function
17148;;;;;; define-mail-alias expand-mail-aliases mail-complete-style) 17162;;;;;; define-mail-alias expand-mail-aliases mail-complete-style)
17149;;;;;; "mailalias" "mail/mailalias.el" (20119 34052)) 17163;;;;;; "mailalias" "mail/mailalias.el" (19881 27850))
17150;;; Generated autoloads from mail/mailalias.el 17164;;; Generated autoloads from mail/mailalias.el
17151 17165
17152(defvar mail-complete-style 'angles "\ 17166(defvar mail-complete-style 'angles "\
@@ -17198,7 +17212,7 @@ current header, calls `mail-complete-function' and passes prefix ARG if any.
17198;;;*** 17212;;;***
17199 17213
17200;;;### (autoloads (mailclient-send-it) "mailclient" "mail/mailclient.el" 17214;;;### (autoloads (mailclient-send-it) "mailclient" "mail/mailclient.el"
17201;;;;;; (20119 34052)) 17215;;;;;; (19845 45374))
17202;;; Generated autoloads from mail/mailclient.el 17216;;; Generated autoloads from mail/mailclient.el
17203 17217
17204(autoload 'mailclient-send-it "mailclient" "\ 17218(autoload 'mailclient-send-it "mailclient" "\
@@ -17212,7 +17226,7 @@ The mail client is taken to be the handler of mailto URLs.
17212 17226
17213;;;### (autoloads (makefile-imake-mode makefile-bsdmake-mode makefile-makepp-mode 17227;;;### (autoloads (makefile-imake-mode makefile-bsdmake-mode makefile-makepp-mode
17214;;;;;; makefile-gmake-mode makefile-automake-mode makefile-mode) 17228;;;;;; makefile-gmake-mode makefile-automake-mode makefile-mode)
17215;;;;;; "make-mode" "progmodes/make-mode.el" (20119 34052)) 17229;;;;;; "make-mode" "progmodes/make-mode.el" (20176 51947))
17216;;; Generated autoloads from progmodes/make-mode.el 17230;;; Generated autoloads from progmodes/make-mode.el
17217 17231
17218(autoload 'makefile-mode "make-mode" "\ 17232(autoload 'makefile-mode "make-mode" "\
@@ -17329,8 +17343,8 @@ An adapted `makefile-mode' that knows about imake.
17329 17343
17330;;;*** 17344;;;***
17331 17345
17332;;;### (autoloads (make-command-summary) "makesum" "makesum.el" (20119 17346;;;### (autoloads (make-command-summary) "makesum" "makesum.el" (19886
17333;;;;;; 34052)) 17347;;;;;; 45771))
17334;;; Generated autoloads from makesum.el 17348;;; Generated autoloads from makesum.el
17335 17349
17336(autoload 'make-command-summary "makesum" "\ 17350(autoload 'make-command-summary "makesum" "\
@@ -17342,7 +17356,7 @@ Previous contents of that buffer are killed first.
17342;;;*** 17356;;;***
17343 17357
17344;;;### (autoloads (Man-bookmark-jump man-follow man) "man" "man.el" 17358;;;### (autoloads (Man-bookmark-jump man-follow man) "man" "man.el"
17345;;;;;; (20119 34052)) 17359;;;;;; (20178 7273))
17346;;; Generated autoloads from man.el 17360;;; Generated autoloads from man.el
17347 17361
17348(defalias 'manual-entry 'man) 17362(defalias 'manual-entry 'man)
@@ -17396,7 +17410,7 @@ Default bookmark handler for Man buffers.
17396 17410
17397;;;*** 17411;;;***
17398 17412
17399;;;### (autoloads (master-mode) "master" "master.el" (20126 50238)) 17413;;;### (autoloads (master-mode) "master" "master.el" (20127 62865))
17400;;; Generated autoloads from master.el 17414;;; Generated autoloads from master.el
17401 17415
17402(autoload 'master-mode "master" "\ 17416(autoload 'master-mode "master" "\
@@ -17419,7 +17433,7 @@ yourself the value of `master-of' by calling `master-show-slave'.
17419;;;*** 17433;;;***
17420 17434
17421;;;### (autoloads (minibuffer-depth-indicate-mode) "mb-depth" "mb-depth.el" 17435;;;### (autoloads (minibuffer-depth-indicate-mode) "mb-depth" "mb-depth.el"
17422;;;;;; (20126 50247)) 17436;;;;;; (20127 62865))
17423;;; Generated autoloads from mb-depth.el 17437;;; Generated autoloads from mb-depth.el
17424 17438
17425(defvar minibuffer-depth-indicate-mode nil "\ 17439(defvar minibuffer-depth-indicate-mode nil "\
@@ -17452,7 +17466,7 @@ recursion depth in the minibuffer prompt. This is only useful if
17452;;;;;; message-forward-make-body message-forward message-recover 17466;;;;;; message-forward-make-body message-forward message-recover
17453;;;;;; message-supersede message-cancel-news message-followup message-wide-reply 17467;;;;;; message-supersede message-cancel-news message-followup message-wide-reply
17454;;;;;; message-reply message-news message-mail message-mode) "message" 17468;;;;;; message-reply message-news message-mail message-mode) "message"
17455;;;;;; "gnus/message.el" (20136 50092)) 17469;;;;;; "gnus/message.el" (20183 25152))
17456;;; Generated autoloads from gnus/message.el 17470;;; Generated autoloads from gnus/message.el
17457 17471
17458(define-mail-user-agent 'message-user-agent 'message-mail 'message-send-and-exit 'message-kill-buffer 'message-send-hook) 17472(define-mail-user-agent 'message-user-agent 'message-mail 'message-send-and-exit 'message-kill-buffer 'message-send-hook)
@@ -17618,7 +17632,7 @@ which specify the range to operate on.
17618;;;*** 17632;;;***
17619 17633
17620;;;### (autoloads (metapost-mode metafont-mode) "meta-mode" "progmodes/meta-mode.el" 17634;;;### (autoloads (metapost-mode metafont-mode) "meta-mode" "progmodes/meta-mode.el"
17621;;;;;; (20119 34052)) 17635;;;;;; (20164 60780))
17622;;; Generated autoloads from progmodes/meta-mode.el 17636;;; Generated autoloads from progmodes/meta-mode.el
17623 17637
17624(autoload 'metafont-mode "meta-mode" "\ 17638(autoload 'metafont-mode "meta-mode" "\
@@ -17635,7 +17649,7 @@ Major mode for editing MetaPost sources.
17635 17649
17636;;;### (autoloads (metamail-region metamail-buffer metamail-interpret-body 17650;;;### (autoloads (metamail-region metamail-buffer metamail-interpret-body
17637;;;;;; metamail-interpret-header) "metamail" "mail/metamail.el" 17651;;;;;; metamail-interpret-header) "metamail" "mail/metamail.el"
17638;;;;;; (20119 34052)) 17652;;;;;; (20168 57844))
17639;;; Generated autoloads from mail/metamail.el 17653;;; Generated autoloads from mail/metamail.el
17640 17654
17641(autoload 'metamail-interpret-header "metamail" "\ 17655(autoload 'metamail-interpret-header "metamail" "\
@@ -17680,7 +17694,7 @@ redisplayed as output is inserted.
17680 17694
17681;;;### (autoloads (mh-fully-kill-draft mh-send-letter mh-user-agent-compose 17695;;;### (autoloads (mh-fully-kill-draft mh-send-letter mh-user-agent-compose
17682;;;;;; mh-smail-batch mh-smail-other-window mh-smail) "mh-comp" 17696;;;;;; mh-smail-batch mh-smail-other-window mh-smail) "mh-comp"
17683;;;;;; "mh-e/mh-comp.el" (20119 34052)) 17697;;;;;; "mh-e/mh-comp.el" (20160 63745))
17684;;; Generated autoloads from mh-e/mh-comp.el 17698;;; Generated autoloads from mh-e/mh-comp.el
17685 17699
17686(autoload 'mh-smail "mh-comp" "\ 17700(autoload 'mh-smail "mh-comp" "\
@@ -17770,7 +17784,7 @@ delete the draft message.
17770 17784
17771;;;*** 17785;;;***
17772 17786
17773;;;### (autoloads (mh-version) "mh-e" "mh-e/mh-e.el" (20119 34052)) 17787;;;### (autoloads (mh-version) "mh-e" "mh-e/mh-e.el" (20170 13157))
17774;;; Generated autoloads from mh-e/mh-e.el 17788;;; Generated autoloads from mh-e/mh-e.el
17775 17789
17776(put 'mh-progs 'risky-local-variable t) 17790(put 'mh-progs 'risky-local-variable t)
@@ -17787,7 +17801,7 @@ Display version information about MH-E and the MH mail handling system.
17787;;;*** 17801;;;***
17788 17802
17789;;;### (autoloads (mh-folder-mode mh-nmail mh-rmail) "mh-folder" 17803;;;### (autoloads (mh-folder-mode mh-nmail mh-rmail) "mh-folder"
17790;;;;;; "mh-e/mh-folder.el" (20119 34052)) 17804;;;;;; "mh-e/mh-folder.el" (20004 2139))
17791;;; Generated autoloads from mh-e/mh-folder.el 17805;;; Generated autoloads from mh-e/mh-folder.el
17792 17806
17793(autoload 'mh-rmail "mh-folder" "\ 17807(autoload 'mh-rmail "mh-folder" "\
@@ -17869,7 +17883,7 @@ perform the operation on all messages in that region.
17869;;;*** 17883;;;***
17870 17884
17871;;;### (autoloads (midnight-delay-set clean-buffer-list) "midnight" 17885;;;### (autoloads (midnight-delay-set clean-buffer-list) "midnight"
17872;;;;;; "midnight.el" (20119 34052)) 17886;;;;;; "midnight.el" (19853 59245))
17873;;; Generated autoloads from midnight.el 17887;;; Generated autoloads from midnight.el
17874 17888
17875(autoload 'clean-buffer-list "midnight" "\ 17889(autoload 'clean-buffer-list "midnight" "\
@@ -17896,7 +17910,7 @@ to its second argument TM.
17896;;;*** 17910;;;***
17897 17911
17898;;;### (autoloads (minibuffer-electric-default-mode) "minibuf-eldef" 17912;;;### (autoloads (minibuffer-electric-default-mode) "minibuf-eldef"
17899;;;;;; "minibuf-eldef.el" (20126 50271)) 17913;;;;;; "minibuf-eldef.el" (20127 62865))
17900;;; Generated autoloads from minibuf-eldef.el 17914;;; Generated autoloads from minibuf-eldef.el
17901 17915
17902(defvar minibuffer-electric-default-mode nil "\ 17916(defvar minibuffer-electric-default-mode nil "\
@@ -17926,7 +17940,7 @@ is modified to remove the default indication.
17926;;;*** 17940;;;***
17927 17941
17928;;;### (autoloads (list-dynamic-libraries butterfly) "misc" "misc.el" 17942;;;### (autoloads (list-dynamic-libraries butterfly) "misc" "misc.el"
17929;;;;;; (20119 34052)) 17943;;;;;; (19968 28627))
17930;;; Generated autoloads from misc.el 17944;;; Generated autoloads from misc.el
17931 17945
17932(autoload 'butterfly "misc" "\ 17946(autoload 'butterfly "misc" "\
@@ -17956,7 +17970,7 @@ The return value is always nil.
17956 17970
17957;;;### (autoloads (multi-isearch-files-regexp multi-isearch-files 17971;;;### (autoloads (multi-isearch-files-regexp multi-isearch-files
17958;;;;;; multi-isearch-buffers-regexp multi-isearch-buffers multi-isearch-setup) 17972;;;;;; multi-isearch-buffers-regexp multi-isearch-buffers multi-isearch-setup)
17959;;;;;; "misearch" "misearch.el" (20119 34052)) 17973;;;;;; "misearch" "misearch.el" (20168 57844))
17960;;; Generated autoloads from misearch.el 17974;;; Generated autoloads from misearch.el
17961 (add-hook 'isearch-mode-hook 'multi-isearch-setup) 17975 (add-hook 'isearch-mode-hook 'multi-isearch-setup)
17962 17976
@@ -18038,7 +18052,7 @@ whose file names match the specified wildcard.
18038;;;*** 18052;;;***
18039 18053
18040;;;### (autoloads (mixal-mode) "mixal-mode" "progmodes/mixal-mode.el" 18054;;;### (autoloads (mixal-mode) "mixal-mode" "progmodes/mixal-mode.el"
18041;;;;;; (20119 34052)) 18055;;;;;; (20162 19074))
18042;;; Generated autoloads from progmodes/mixal-mode.el 18056;;; Generated autoloads from progmodes/mixal-mode.el
18043 18057
18044(autoload 'mixal-mode "mixal-mode" "\ 18058(autoload 'mixal-mode "mixal-mode" "\
@@ -18049,7 +18063,7 @@ Major mode for the mixal asm language.
18049;;;*** 18063;;;***
18050 18064
18051;;;### (autoloads (mm-default-file-encoding) "mm-encode" "gnus/mm-encode.el" 18065;;;### (autoloads (mm-default-file-encoding) "mm-encode" "gnus/mm-encode.el"
18052;;;;;; (20119 34052)) 18066;;;;;; (20075 14682))
18053;;; Generated autoloads from gnus/mm-encode.el 18067;;; Generated autoloads from gnus/mm-encode.el
18054 18068
18055(autoload 'mm-default-file-encoding "mm-encode" "\ 18069(autoload 'mm-default-file-encoding "mm-encode" "\
@@ -18060,7 +18074,7 @@ Return a default encoding for FILE.
18060;;;*** 18074;;;***
18061 18075
18062;;;### (autoloads (mm-inline-external-body mm-extern-cache-contents) 18076;;;### (autoloads (mm-inline-external-body mm-extern-cache-contents)
18063;;;;;; "mm-extern" "gnus/mm-extern.el" (20119 34052)) 18077;;;;;; "mm-extern" "gnus/mm-extern.el" (19845 45374))
18064;;; Generated autoloads from gnus/mm-extern.el 18078;;; Generated autoloads from gnus/mm-extern.el
18065 18079
18066(autoload 'mm-extern-cache-contents "mm-extern" "\ 18080(autoload 'mm-extern-cache-contents "mm-extern" "\
@@ -18079,7 +18093,7 @@ If NO-DISPLAY is nil, display it. Otherwise, do nothing after replacing.
18079;;;*** 18093;;;***
18080 18094
18081;;;### (autoloads (mm-inline-partial) "mm-partial" "gnus/mm-partial.el" 18095;;;### (autoloads (mm-inline-partial) "mm-partial" "gnus/mm-partial.el"
18082;;;;;; (20119 34052)) 18096;;;;;; (19845 45374))
18083;;; Generated autoloads from gnus/mm-partial.el 18097;;; Generated autoloads from gnus/mm-partial.el
18084 18098
18085(autoload 'mm-inline-partial "mm-partial" "\ 18099(autoload 'mm-inline-partial "mm-partial" "\
@@ -18093,7 +18107,7 @@ If NO-DISPLAY is nil, display it. Otherwise, do nothing after replacing.
18093;;;*** 18107;;;***
18094 18108
18095;;;### (autoloads (mm-url-insert-file-contents-external mm-url-insert-file-contents) 18109;;;### (autoloads (mm-url-insert-file-contents-external mm-url-insert-file-contents)
18096;;;;;; "mm-url" "gnus/mm-url.el" (20119 34052)) 18110;;;;;; "mm-url" "gnus/mm-url.el" (19877 30798))
18097;;; Generated autoloads from gnus/mm-url.el 18111;;; Generated autoloads from gnus/mm-url.el
18098 18112
18099(autoload 'mm-url-insert-file-contents "mm-url" "\ 18113(autoload 'mm-url-insert-file-contents "mm-url" "\
@@ -18110,7 +18124,7 @@ Insert file contents of URL using `mm-url-program'.
18110;;;*** 18124;;;***
18111 18125
18112;;;### (autoloads (mm-uu-dissect-text-parts mm-uu-dissect) "mm-uu" 18126;;;### (autoloads (mm-uu-dissect-text-parts mm-uu-dissect) "mm-uu"
18113;;;;;; "gnus/mm-uu.el" (20119 34052)) 18127;;;;;; "gnus/mm-uu.el" (19845 45374))
18114;;; Generated autoloads from gnus/mm-uu.el 18128;;; Generated autoloads from gnus/mm-uu.el
18115 18129
18116(autoload 'mm-uu-dissect "mm-uu" "\ 18130(autoload 'mm-uu-dissect "mm-uu" "\
@@ -18130,7 +18144,7 @@ Assume text has been decoded if DECODED is non-nil.
18130;;;*** 18144;;;***
18131 18145
18132;;;### (autoloads (mml-attach-file mml-to-mime) "mml" "gnus/mml.el" 18146;;;### (autoloads (mml-attach-file mml-to-mime) "mml" "gnus/mml.el"
18133;;;;;; (20136 50092)) 18147;;;;;; (20183 25152))
18134;;; Generated autoloads from gnus/mml.el 18148;;; Generated autoloads from gnus/mml.el
18135 18149
18136(autoload 'mml-to-mime "mml" "\ 18150(autoload 'mml-to-mime "mml" "\
@@ -18155,7 +18169,7 @@ body) or \"attachment\" (separate from the body).
18155;;;*** 18169;;;***
18156 18170
18157;;;### (autoloads (mml1991-sign mml1991-encrypt) "mml1991" "gnus/mml1991.el" 18171;;;### (autoloads (mml1991-sign mml1991-encrypt) "mml1991" "gnus/mml1991.el"
18158;;;;;; (20124 17058)) 18172;;;;;; (20124 236))
18159;;; Generated autoloads from gnus/mml1991.el 18173;;; Generated autoloads from gnus/mml1991.el
18160 18174
18161(autoload 'mml1991-encrypt "mml1991" "\ 18175(autoload 'mml1991-encrypt "mml1991" "\
@@ -18172,7 +18186,7 @@ body) or \"attachment\" (separate from the body).
18172 18186
18173;;;### (autoloads (mml2015-self-encrypt mml2015-sign mml2015-encrypt 18187;;;### (autoloads (mml2015-self-encrypt mml2015-sign mml2015-encrypt
18174;;;;;; mml2015-verify-test mml2015-verify mml2015-decrypt-test mml2015-decrypt) 18188;;;;;; mml2015-verify-test mml2015-verify mml2015-decrypt-test mml2015-decrypt)
18175;;;;;; "mml2015" "gnus/mml2015.el" (20124 17058)) 18189;;;;;; "mml2015" "gnus/mml2015.el" (20124 236))
18176;;; Generated autoloads from gnus/mml2015.el 18190;;; Generated autoloads from gnus/mml2015.el
18177 18191
18178(autoload 'mml2015-decrypt "mml2015" "\ 18192(autoload 'mml2015-decrypt "mml2015" "\
@@ -18212,8 +18226,8 @@ body) or \"attachment\" (separate from the body).
18212 18226
18213;;;*** 18227;;;***
18214 18228
18215;;;### (autoloads (m2-mode) "modula2" "progmodes/modula2.el" (20119 18229;;;### (autoloads (m2-mode) "modula2" "progmodes/modula2.el" (20159
18216;;;;;; 34052)) 18230;;;;;; 42847))
18217;;; Generated autoloads from progmodes/modula2.el 18231;;; Generated autoloads from progmodes/modula2.el
18218 18232
18219(defalias 'modula-2-mode 'm2-mode) 18233(defalias 'modula-2-mode 'm2-mode)
@@ -18247,7 +18261,7 @@ followed by the first character of the construct.
18247;;;*** 18261;;;***
18248 18262
18249;;;### (autoloads (denato-region nato-region unmorse-region morse-region) 18263;;;### (autoloads (denato-region nato-region unmorse-region morse-region)
18250;;;;;; "morse" "play/morse.el" (20119 34052)) 18264;;;;;; "morse" "play/morse.el" (19869 36706))
18251;;; Generated autoloads from play/morse.el 18265;;; Generated autoloads from play/morse.el
18252 18266
18253(autoload 'morse-region "morse" "\ 18267(autoload 'morse-region "morse" "\
@@ -18273,7 +18287,7 @@ Convert NATO phonetic alphabet in region to ordinary ASCII text.
18273;;;*** 18287;;;***
18274 18288
18275;;;### (autoloads (mouse-drag-drag mouse-drag-throw) "mouse-drag" 18289;;;### (autoloads (mouse-drag-drag mouse-drag-throw) "mouse-drag"
18276;;;;;; "mouse-drag.el" (20119 34052)) 18290;;;;;; "mouse-drag.el" (19890 42850))
18277;;; Generated autoloads from mouse-drag.el 18291;;; Generated autoloads from mouse-drag.el
18278 18292
18279(autoload 'mouse-drag-throw "mouse-drag" "\ 18293(autoload 'mouse-drag-throw "mouse-drag" "\
@@ -18320,8 +18334,8 @@ To test this function, evaluate:
18320 18334
18321;;;*** 18335;;;***
18322 18336
18323;;;### (autoloads (mouse-sel-mode) "mouse-sel" "mouse-sel.el" (20126 18337;;;### (autoloads (mouse-sel-mode) "mouse-sel" "mouse-sel.el" (20168
18324;;;;;; 50277)) 18338;;;;;; 57844))
18325;;; Generated autoloads from mouse-sel.el 18339;;; Generated autoloads from mouse-sel.el
18326 18340
18327(defvar mouse-sel-mode nil "\ 18341(defvar mouse-sel-mode nil "\
@@ -18364,7 +18378,7 @@ kill ring; mouse-1 or mouse-3 kills it.
18364 18378
18365;;;*** 18379;;;***
18366 18380
18367;;;### (autoloads (mpc) "mpc" "mpc.el" (20120 43280)) 18381;;;### (autoloads (mpc) "mpc" "mpc.el" (20178 7273))
18368;;; Generated autoloads from mpc.el 18382;;; Generated autoloads from mpc.el
18369 18383
18370(autoload 'mpc "mpc" "\ 18384(autoload 'mpc "mpc" "\
@@ -18374,7 +18388,7 @@ Main entry point for MPC.
18374 18388
18375;;;*** 18389;;;***
18376 18390
18377;;;### (autoloads (mpuz) "mpuz" "play/mpuz.el" (20119 34052)) 18391;;;### (autoloads (mpuz) "mpuz" "play/mpuz.el" (19890 42850))
18378;;; Generated autoloads from play/mpuz.el 18392;;; Generated autoloads from play/mpuz.el
18379 18393
18380(autoload 'mpuz "mpuz" "\ 18394(autoload 'mpuz "mpuz" "\
@@ -18384,7 +18398,7 @@ Multiplication puzzle with GNU Emacs.
18384 18398
18385;;;*** 18399;;;***
18386 18400
18387;;;### (autoloads (msb-mode) "msb" "msb.el" (20126 50286)) 18401;;;### (autoloads (msb-mode) "msb" "msb.el" (20127 62865))
18388;;; Generated autoloads from msb.el 18402;;; Generated autoloads from msb.el
18389 18403
18390(defvar msb-mode nil "\ 18404(defvar msb-mode nil "\
@@ -18414,7 +18428,7 @@ different buffer menu using the function `msb'.
18414;;;;;; describe-current-coding-system describe-current-coding-system-briefly 18428;;;;;; describe-current-coding-system describe-current-coding-system-briefly
18415;;;;;; describe-coding-system describe-character-set list-charset-chars 18429;;;;;; describe-coding-system describe-character-set list-charset-chars
18416;;;;;; read-charset list-character-sets) "mule-diag" "international/mule-diag.el" 18430;;;;;; read-charset list-character-sets) "mule-diag" "international/mule-diag.el"
18417;;;;;; (20119 34052)) 18431;;;;;; (20160 63745))
18418;;; Generated autoloads from international/mule-diag.el 18432;;; Generated autoloads from international/mule-diag.el
18419 18433
18420(autoload 'list-character-sets "mule-diag" "\ 18434(autoload 'list-character-sets "mule-diag" "\
@@ -18551,7 +18565,7 @@ The default is 20. If LIMIT is negative, do not limit the listing.
18551;;;;;; coding-system-translation-table-for-decode coding-system-pre-write-conversion 18565;;;;;; coding-system-translation-table-for-decode coding-system-pre-write-conversion
18552;;;;;; coding-system-post-read-conversion lookup-nested-alist set-nested-alist 18566;;;;;; coding-system-post-read-conversion lookup-nested-alist set-nested-alist
18553;;;;;; truncate-string-to-width store-substring string-to-sequence) 18567;;;;;; truncate-string-to-width store-substring string-to-sequence)
18554;;;;;; "mule-util" "international/mule-util.el" (20119 34052)) 18568;;;;;; "mule-util" "international/mule-util.el" (19845 45374))
18555;;; Generated autoloads from international/mule-util.el 18569;;; Generated autoloads from international/mule-util.el
18556 18570
18557(autoload 'string-to-sequence "mule-util" "\ 18571(autoload 'string-to-sequence "mule-util" "\
@@ -18691,8 +18705,8 @@ per-character basis, this may not be accurate.
18691;;;### (autoloads (network-connection network-connection-to-service 18705;;;### (autoloads (network-connection network-connection-to-service
18692;;;;;; whois-reverse-lookup whois finger ftp run-dig dns-lookup-host 18706;;;;;; whois-reverse-lookup whois finger ftp run-dig dns-lookup-host
18693;;;;;; nslookup nslookup-host ping traceroute route arp netstat 18707;;;;;; nslookup nslookup-host ping traceroute route arp netstat
18694;;;;;; iwconfig ifconfig) "net-utils" "net/net-utils.el" (20119 18708;;;;;; iwconfig ifconfig) "net-utils" "net/net-utils.el" (19845
18695;;;;;; 34052)) 18709;;;;;; 45374))
18696;;; Generated autoloads from net/net-utils.el 18710;;; Generated autoloads from net/net-utils.el
18697 18711
18698(autoload 'ifconfig "net-utils" "\ 18712(autoload 'ifconfig "net-utils" "\
@@ -18786,8 +18800,8 @@ Open a network connection to HOST on PORT.
18786 18800
18787;;;*** 18801;;;***
18788 18802
18789;;;### (autoloads (netrc-credentials) "netrc" "net/netrc.el" (20119 18803;;;### (autoloads (netrc-credentials) "netrc" "net/netrc.el" (19845
18790;;;;;; 34052)) 18804;;;;;; 45374))
18791;;; Generated autoloads from net/netrc.el 18805;;; Generated autoloads from net/netrc.el
18792 18806
18793(autoload 'netrc-credentials "netrc" "\ 18807(autoload 'netrc-credentials "netrc" "\
@@ -18800,7 +18814,7 @@ listed in the PORTS list.
18800;;;*** 18814;;;***
18801 18815
18802;;;### (autoloads (open-network-stream) "network-stream" "net/network-stream.el" 18816;;;### (autoloads (open-network-stream) "network-stream" "net/network-stream.el"
18803;;;;;; (20121 47865)) 18817;;;;;; (20122 44898))
18804;;; Generated autoloads from net/network-stream.el 18818;;; Generated autoloads from net/network-stream.el
18805 18819
18806(autoload 'open-network-stream "network-stream" "\ 18820(autoload 'open-network-stream "network-stream" "\
@@ -18896,7 +18910,7 @@ functionality.
18896;;;;;; uncomment-region comment-kill comment-set-column comment-indent 18910;;;;;; uncomment-region comment-kill comment-set-column comment-indent
18897;;;;;; comment-indent-default comment-normalize-vars comment-multi-line 18911;;;;;; comment-indent-default comment-normalize-vars comment-multi-line
18898;;;;;; comment-padding comment-style comment-column) "newcomment" 18912;;;;;; comment-padding comment-style comment-column) "newcomment"
18899;;;;;; "newcomment.el" (20119 34052)) 18913;;;;;; "newcomment.el" (20087 5852))
18900;;; Generated autoloads from newcomment.el 18914;;; Generated autoloads from newcomment.el
18901 18915
18902(defalias 'indent-for-comment 'comment-indent) 18916(defalias 'indent-for-comment 'comment-indent)
@@ -19096,7 +19110,7 @@ unless optional argument SOFT is non-nil.
19096;;;*** 19110;;;***
19097 19111
19098;;;### (autoloads (newsticker-start newsticker-running-p) "newst-backend" 19112;;;### (autoloads (newsticker-start newsticker-running-p) "newst-backend"
19099;;;;;; "net/newst-backend.el" (20119 34052)) 19113;;;;;; "net/newst-backend.el" (19918 22236))
19100;;; Generated autoloads from net/newst-backend.el 19114;;; Generated autoloads from net/newst-backend.el
19101 19115
19102(autoload 'newsticker-running-p "newst-backend" "\ 19116(autoload 'newsticker-running-p "newst-backend" "\
@@ -19118,7 +19132,7 @@ Run `newsticker-start-hook' if newsticker was not running already.
19118;;;*** 19132;;;***
19119 19133
19120;;;### (autoloads (newsticker-plainview) "newst-plainview" "net/newst-plainview.el" 19134;;;### (autoloads (newsticker-plainview) "newst-plainview" "net/newst-plainview.el"
19121;;;;;; (20119 34052)) 19135;;;;;; (20167 36967))
19122;;; Generated autoloads from net/newst-plainview.el 19136;;; Generated autoloads from net/newst-plainview.el
19123 19137
19124(autoload 'newsticker-plainview "newst-plainview" "\ 19138(autoload 'newsticker-plainview "newst-plainview" "\
@@ -19129,7 +19143,7 @@ Start newsticker plainview.
19129;;;*** 19143;;;***
19130 19144
19131;;;### (autoloads (newsticker-show-news) "newst-reader" "net/newst-reader.el" 19145;;;### (autoloads (newsticker-show-news) "newst-reader" "net/newst-reader.el"
19132;;;;;; (20139 41953)) 19146;;;;;; (20094 65493))
19133;;; Generated autoloads from net/newst-reader.el 19147;;; Generated autoloads from net/newst-reader.el
19134 19148
19135(autoload 'newsticker-show-news "newst-reader" "\ 19149(autoload 'newsticker-show-news "newst-reader" "\
@@ -19140,7 +19154,7 @@ Start reading news. You may want to bind this to a key.
19140;;;*** 19154;;;***
19141 19155
19142;;;### (autoloads (newsticker-start-ticker newsticker-ticker-running-p) 19156;;;### (autoloads (newsticker-start-ticker newsticker-ticker-running-p)
19143;;;;;; "newst-ticker" "net/newst-ticker.el" (20119 34052)) 19157;;;;;; "newst-ticker" "net/newst-ticker.el" (19845 45374))
19144;;; Generated autoloads from net/newst-ticker.el 19158;;; Generated autoloads from net/newst-ticker.el
19145 19159
19146(autoload 'newsticker-ticker-running-p "newst-ticker" "\ 19160(autoload 'newsticker-ticker-running-p "newst-ticker" "\
@@ -19161,7 +19175,7 @@ running already.
19161;;;*** 19175;;;***
19162 19176
19163;;;### (autoloads (newsticker-treeview) "newst-treeview" "net/newst-treeview.el" 19177;;;### (autoloads (newsticker-treeview) "newst-treeview" "net/newst-treeview.el"
19164;;;;;; (20141 61905)) 19178;;;;;; (20168 57844))
19165;;; Generated autoloads from net/newst-treeview.el 19179;;; Generated autoloads from net/newst-treeview.el
19166 19180
19167(autoload 'newsticker-treeview "newst-treeview" "\ 19181(autoload 'newsticker-treeview "newst-treeview" "\
@@ -19172,7 +19186,7 @@ Start newsticker treeview.
19172;;;*** 19186;;;***
19173 19187
19174;;;### (autoloads (nndiary-generate-nov-databases) "nndiary" "gnus/nndiary.el" 19188;;;### (autoloads (nndiary-generate-nov-databases) "nndiary" "gnus/nndiary.el"
19175;;;;;; (20119 34052)) 19189;;;;;; (20168 57844))
19176;;; Generated autoloads from gnus/nndiary.el 19190;;; Generated autoloads from gnus/nndiary.el
19177 19191
19178(autoload 'nndiary-generate-nov-databases "nndiary" "\ 19192(autoload 'nndiary-generate-nov-databases "nndiary" "\
@@ -19182,8 +19196,8 @@ Generate NOV databases in all nndiary directories.
19182 19196
19183;;;*** 19197;;;***
19184 19198
19185;;;### (autoloads (nndoc-add-type) "nndoc" "gnus/nndoc.el" (20119 19199;;;### (autoloads (nndoc-add-type) "nndoc" "gnus/nndoc.el" (19845
19186;;;;;; 34052)) 19200;;;;;; 45374))
19187;;; Generated autoloads from gnus/nndoc.el 19201;;; Generated autoloads from gnus/nndoc.el
19188 19202
19189(autoload 'nndoc-add-type "nndoc" "\ 19203(autoload 'nndoc-add-type "nndoc" "\
@@ -19198,7 +19212,7 @@ symbol in the alist.
19198;;;*** 19212;;;***
19199 19213
19200;;;### (autoloads (nnfolder-generate-active-file) "nnfolder" "gnus/nnfolder.el" 19214;;;### (autoloads (nnfolder-generate-active-file) "nnfolder" "gnus/nnfolder.el"
19201;;;;;; (20119 34052)) 19215;;;;;; (19845 45374))
19202;;; Generated autoloads from gnus/nnfolder.el 19216;;; Generated autoloads from gnus/nnfolder.el
19203 19217
19204(autoload 'nnfolder-generate-active-file "nnfolder" "\ 19218(autoload 'nnfolder-generate-active-file "nnfolder" "\
@@ -19210,7 +19224,7 @@ This command does not work if you use short group names.
19210;;;*** 19224;;;***
19211 19225
19212;;;### (autoloads (nnml-generate-nov-databases) "nnml" "gnus/nnml.el" 19226;;;### (autoloads (nnml-generate-nov-databases) "nnml" "gnus/nnml.el"
19213;;;;;; (20119 34052)) 19227;;;;;; (20178 7273))
19214;;; Generated autoloads from gnus/nnml.el 19228;;; Generated autoloads from gnus/nnml.el
19215 19229
19216(autoload 'nnml-generate-nov-databases "nnml" "\ 19230(autoload 'nnml-generate-nov-databases "nnml" "\
@@ -19221,7 +19235,7 @@ Generate NOV databases in all nnml directories.
19221;;;*** 19235;;;***
19222 19236
19223;;;### (autoloads (disable-command enable-command disabled-command-function) 19237;;;### (autoloads (disable-command enable-command disabled-command-function)
19224;;;;;; "novice" "novice.el" (20119 34052)) 19238;;;;;; "novice" "novice.el" (19845 45374))
19225;;; Generated autoloads from novice.el 19239;;; Generated autoloads from novice.el
19226 19240
19227(defvar disabled-command-function 'disabled-command-function "\ 19241(defvar disabled-command-function 'disabled-command-function "\
@@ -19254,7 +19268,7 @@ to future sessions.
19254;;;*** 19268;;;***
19255 19269
19256;;;### (autoloads (nroff-mode) "nroff-mode" "textmodes/nroff-mode.el" 19270;;;### (autoloads (nroff-mode) "nroff-mode" "textmodes/nroff-mode.el"
19257;;;;;; (20127 24590)) 19271;;;;;; (20127 62865))
19258;;; Generated autoloads from textmodes/nroff-mode.el 19272;;; Generated autoloads from textmodes/nroff-mode.el
19259 19273
19260(autoload 'nroff-mode "nroff-mode" "\ 19274(autoload 'nroff-mode "nroff-mode" "\
@@ -19269,7 +19283,7 @@ closing requests for requests that are used in matched pairs.
19269;;;*** 19283;;;***
19270 19284
19271;;;### (autoloads (nxml-glyph-display-string) "nxml-glyph" "nxml/nxml-glyph.el" 19285;;;### (autoloads (nxml-glyph-display-string) "nxml-glyph" "nxml/nxml-glyph.el"
19272;;;;;; (20119 34052)) 19286;;;;;; (19845 45374))
19273;;; Generated autoloads from nxml/nxml-glyph.el 19287;;; Generated autoloads from nxml/nxml-glyph.el
19274 19288
19275(autoload 'nxml-glyph-display-string "nxml-glyph" "\ 19289(autoload 'nxml-glyph-display-string "nxml-glyph" "\
@@ -19281,8 +19295,8 @@ Return nil if the face cannot display a glyph for N.
19281 19295
19282;;;*** 19296;;;***
19283 19297
19284;;;### (autoloads (nxml-mode) "nxml-mode" "nxml/nxml-mode.el" (20119 19298;;;### (autoloads (nxml-mode) "nxml-mode" "nxml/nxml-mode.el" (19927
19285;;;;;; 34052)) 19299;;;;;; 37225))
19286;;; Generated autoloads from nxml/nxml-mode.el 19300;;; Generated autoloads from nxml/nxml-mode.el
19287 19301
19288(autoload 'nxml-mode "nxml-mode" "\ 19302(autoload 'nxml-mode "nxml-mode" "\
@@ -19344,7 +19358,7 @@ Many aspects this mode can be customized using
19344;;;*** 19358;;;***
19345 19359
19346;;;### (autoloads (nxml-enable-unicode-char-name-sets) "nxml-uchnm" 19360;;;### (autoloads (nxml-enable-unicode-char-name-sets) "nxml-uchnm"
19347;;;;;; "nxml/nxml-uchnm.el" (20119 34052)) 19361;;;;;; "nxml/nxml-uchnm.el" (19845 45374))
19348;;; Generated autoloads from nxml/nxml-uchnm.el 19362;;; Generated autoloads from nxml/nxml-uchnm.el
19349 19363
19350(autoload 'nxml-enable-unicode-char-name-sets "nxml-uchnm" "\ 19364(autoload 'nxml-enable-unicode-char-name-sets "nxml-uchnm" "\
@@ -19367,7 +19381,7 @@ the variable `nxml-enabled-unicode-blocks'.
19367;;;;;; org-babel-pop-to-session-maybe org-babel-load-in-session-maybe 19381;;;;;; org-babel-pop-to-session-maybe org-babel-load-in-session-maybe
19368;;;;;; org-babel-expand-src-block-maybe org-babel-view-src-block-info 19382;;;;;; org-babel-expand-src-block-maybe org-babel-view-src-block-info
19369;;;;;; org-babel-execute-maybe org-babel-execute-safely-maybe) "ob" 19383;;;;;; org-babel-execute-maybe org-babel-execute-safely-maybe) "ob"
19370;;;;;; "org/ob.el" (20119 34052)) 19384;;;;;; "org/ob.el" (20174 10230))
19371;;; Generated autoloads from org/ob.el 19385;;; Generated autoloads from org/ob.el
19372 19386
19373(autoload 'org-babel-execute-safely-maybe "ob" "\ 19387(autoload 'org-babel-execute-safely-maybe "ob" "\
@@ -19414,7 +19428,7 @@ Insert the results of execution into the buffer. Source code
19414execution and the collection and formatting of results can be 19428execution and the collection and formatting of results can be
19415controlled through a variety of header arguments. 19429controlled through a variety of header arguments.
19416 19430
19417With prefix argument ARG, force re-execution even if a an 19431With prefix argument ARG, force re-execution even if an
19418existing result cached in the buffer would otherwise have been 19432existing result cached in the buffer would otherwise have been
19419returned. 19433returned.
19420 19434
@@ -19570,7 +19584,7 @@ Mark current src block
19570;;;*** 19584;;;***
19571 19585
19572;;;### (autoloads (org-babel-describe-bindings) "ob-keys" "org/ob-keys.el" 19586;;;### (autoloads (org-babel-describe-bindings) "ob-keys" "org/ob-keys.el"
19573;;;;;; (20119 34052)) 19587;;;;;; (20045 30710))
19574;;; Generated autoloads from org/ob-keys.el 19588;;; Generated autoloads from org/ob-keys.el
19575 19589
19576(autoload 'org-babel-describe-bindings "ob-keys" "\ 19590(autoload 'org-babel-describe-bindings "ob-keys" "\
@@ -19581,7 +19595,7 @@ Describe all keybindings behind `org-babel-key-prefix'.
19581;;;*** 19595;;;***
19582 19596
19583;;;### (autoloads (org-babel-lob-get-info org-babel-lob-execute-maybe 19597;;;### (autoloads (org-babel-lob-get-info org-babel-lob-execute-maybe
19584;;;;;; org-babel-lob-ingest) "ob-lob" "org/ob-lob.el" (20119 34052)) 19598;;;;;; org-babel-lob-ingest) "ob-lob" "org/ob-lob.el" (20045 31431))
19585;;; Generated autoloads from org/ob-lob.el 19599;;; Generated autoloads from org/ob-lob.el
19586 19600
19587(autoload 'org-babel-lob-ingest "ob-lob" "\ 19601(autoload 'org-babel-lob-ingest "ob-lob" "\
@@ -19606,7 +19620,7 @@ Return a Library of Babel function call as a string.
19606 19620
19607;;;### (autoloads (org-babel-tangle org-babel-tangle-file org-babel-load-file 19621;;;### (autoloads (org-babel-tangle org-babel-tangle-file org-babel-load-file
19608;;;;;; org-babel-tangle-lang-exts) "ob-tangle" "org/ob-tangle.el" 19622;;;;;; org-babel-tangle-lang-exts) "ob-tangle" "org/ob-tangle.el"
19609;;;;;; (20119 34052)) 19623;;;;;; (20045 30712))
19610;;; Generated autoloads from org/ob-tangle.el 19624;;; Generated autoloads from org/ob-tangle.el
19611 19625
19612(defvar org-babel-tangle-lang-exts '(("emacs-lisp" . "el")) "\ 19626(defvar org-babel-tangle-lang-exts '(("emacs-lisp" . "el")) "\
@@ -19648,7 +19662,7 @@ exported source code blocks by language.
19648;;;*** 19662;;;***
19649 19663
19650;;;### (autoloads (inferior-octave) "octave-inf" "progmodes/octave-inf.el" 19664;;;### (autoloads (inferior-octave) "octave-inf" "progmodes/octave-inf.el"
19651;;;;;; (20136 50092)) 19665;;;;;; (20135 56947))
19652;;; Generated autoloads from progmodes/octave-inf.el 19666;;; Generated autoloads from progmodes/octave-inf.el
19653 19667
19654(autoload 'inferior-octave "octave-inf" "\ 19668(autoload 'inferior-octave "octave-inf" "\
@@ -19671,7 +19685,7 @@ startup file, `~/.emacs-octave'.
19671;;;*** 19685;;;***
19672 19686
19673;;;### (autoloads (octave-mode) "octave-mod" "progmodes/octave-mod.el" 19687;;;### (autoloads (octave-mode) "octave-mod" "progmodes/octave-mod.el"
19674;;;;;; (20136 50092)) 19688;;;;;; (20135 56947))
19675;;; Generated autoloads from progmodes/octave-mod.el 19689;;; Generated autoloads from progmodes/octave-mod.el
19676 19690
19677(autoload 'octave-mode "octave-mod" "\ 19691(autoload 'octave-mode "octave-mod" "\
@@ -19759,7 +19773,7 @@ including a reproducible test case and send the message.
19759;;;;;; org-insert-link-global org-store-link org-run-like-in-org-mode 19773;;;;;; org-insert-link-global org-store-link org-run-like-in-org-mode
19760;;;;;; turn-on-orgstruct++ turn-on-orgstruct orgstruct-mode org-global-cycle 19774;;;;;; turn-on-orgstruct++ turn-on-orgstruct orgstruct-mode org-global-cycle
19761;;;;;; org-mode org-babel-do-load-languages) "org" "org/org.el" 19775;;;;;; org-mode org-babel-do-load-languages) "org" "org/org.el"
19762;;;;;; (20119 34052)) 19776;;;;;; (20170 13157))
19763;;; Generated autoloads from org/org.el 19777;;; Generated autoloads from org/org.el
19764 19778
19765(autoload 'org-babel-do-load-languages "org" "\ 19779(autoload 'org-babel-do-load-languages "org" "\
@@ -19983,7 +19997,7 @@ Call the customize function with org as argument.
19983;;;;;; org-diary org-agenda-list-stuck-projects org-tags-view org-todo-list 19997;;;;;; org-diary org-agenda-list-stuck-projects org-tags-view org-todo-list
19984;;;;;; org-search-view org-agenda-list org-batch-store-agenda-views 19998;;;;;; org-search-view org-agenda-list org-batch-store-agenda-views
19985;;;;;; org-store-agenda-views org-batch-agenda-csv org-batch-agenda 19999;;;;;; org-store-agenda-views org-batch-agenda-csv org-batch-agenda
19986;;;;;; org-agenda) "org-agenda" "org/org-agenda.el" (20119 34052)) 20000;;;;;; org-agenda) "org-agenda" "org/org-agenda.el" (20178 7273))
19987;;; Generated autoloads from org/org-agenda.el 20001;;; Generated autoloads from org/org-agenda.el
19988 20002
19989(autoload 'org-agenda "org-agenda" "\ 20003(autoload 'org-agenda "org-agenda" "\
@@ -20228,7 +20242,7 @@ belonging to the \"Work\" category.
20228 20242
20229;;;### (autoloads (org-archive-subtree-default-with-confirmation 20243;;;### (autoloads (org-archive-subtree-default-with-confirmation
20230;;;;;; org-archive-subtree-default) "org-archive" "org/org-archive.el" 20244;;;;;; org-archive-subtree-default) "org-archive" "org/org-archive.el"
20231;;;;;; (20119 34052)) 20245;;;;;; (20045 30713))
20232;;; Generated autoloads from org/org-archive.el 20246;;; Generated autoloads from org/org-archive.el
20233 20247
20234(autoload 'org-archive-subtree-default "org-archive" "\ 20248(autoload 'org-archive-subtree-default "org-archive" "\
@@ -20248,8 +20262,8 @@ This command is set with the variable `org-archive-default-command'.
20248;;;### (autoloads (org-export-as-ascii org-export-region-as-ascii 20262;;;### (autoloads (org-export-as-ascii org-export-region-as-ascii
20249;;;;;; org-replace-region-by-ascii org-export-as-ascii-to-buffer 20263;;;;;; org-replace-region-by-ascii org-export-as-ascii-to-buffer
20250;;;;;; org-export-as-utf8-to-buffer org-export-as-utf8 org-export-as-latin1-to-buffer 20264;;;;;; org-export-as-utf8-to-buffer org-export-as-utf8 org-export-as-latin1-to-buffer
20251;;;;;; org-export-as-latin1) "org-ascii" "org/org-ascii.el" (20119 20265;;;;;; org-export-as-latin1) "org-ascii" "org/org-ascii.el" (20045
20252;;;;;; 34052)) 20266;;;;;; 30713))
20253;;; Generated autoloads from org/org-ascii.el 20267;;; Generated autoloads from org/org-ascii.el
20254 20268
20255(autoload 'org-export-as-latin1 "org-ascii" "\ 20269(autoload 'org-export-as-latin1 "org-ascii" "\
@@ -20322,8 +20336,8 @@ publishing directory.
20322 20336
20323;;;*** 20337;;;***
20324 20338
20325;;;### (autoloads (org-attach) "org-attach" "org/org-attach.el" (20119 20339;;;### (autoloads (org-attach) "org-attach" "org/org-attach.el" (20045
20326;;;;;; 34052)) 20340;;;;;; 30713))
20327;;; Generated autoloads from org/org-attach.el 20341;;; Generated autoloads from org/org-attach.el
20328 20342
20329(autoload 'org-attach "org-attach" "\ 20343(autoload 'org-attach "org-attach" "\
@@ -20335,7 +20349,7 @@ Shows a list of commands and prompts for another key to execute a command.
20335;;;*** 20349;;;***
20336 20350
20337;;;### (autoloads (org-bbdb-anniversaries) "org-bbdb" "org/org-bbdb.el" 20351;;;### (autoloads (org-bbdb-anniversaries) "org-bbdb" "org/org-bbdb.el"
20338;;;;;; (20119 34052)) 20352;;;;;; (20164 29468))
20339;;; Generated autoloads from org/org-bbdb.el 20353;;; Generated autoloads from org/org-bbdb.el
20340 20354
20341(autoload 'org-bbdb-anniversaries "org-bbdb" "\ 20355(autoload 'org-bbdb-anniversaries "org-bbdb" "\
@@ -20346,7 +20360,7 @@ Extract anniversaries from BBDB for display in the agenda.
20346;;;*** 20360;;;***
20347 20361
20348;;;### (autoloads (org-capture-import-remember-templates org-capture-insert-template-here 20362;;;### (autoloads (org-capture-import-remember-templates org-capture-insert-template-here
20349;;;;;; org-capture) "org-capture" "org/org-capture.el" (20119 34052)) 20363;;;;;; org-capture) "org-capture" "org/org-capture.el" (20168 57844))
20350;;; Generated autoloads from org/org-capture.el 20364;;; Generated autoloads from org/org-capture.el
20351 20365
20352(autoload 'org-capture "org-capture" "\ 20366(autoload 'org-capture "org-capture" "\
@@ -20384,7 +20398,7 @@ Set org-capture-templates to be similar to `org-remember-templates'.
20384;;;*** 20398;;;***
20385 20399
20386;;;### (autoloads (org-clock-persistence-insinuate org-get-clocktable) 20400;;;### (autoloads (org-clock-persistence-insinuate org-get-clocktable)
20387;;;;;; "org-clock" "org/org-clock.el" (20119 34052)) 20401;;;;;; "org-clock" "org/org-clock.el" (20172 54913))
20388;;; Generated autoloads from org/org-clock.el 20402;;; Generated autoloads from org/org-clock.el
20389 20403
20390(autoload 'org-get-clocktable "org-clock" "\ 20404(autoload 'org-get-clocktable "org-clock" "\
@@ -20402,7 +20416,7 @@ Set up hooks for clock persistence.
20402;;;*** 20416;;;***
20403 20417
20404;;;### (autoloads (org-datetree-find-date-create) "org-datetree" 20418;;;### (autoloads (org-datetree-find-date-create) "org-datetree"
20405;;;;;; "org/org-datetree.el" (20119 34052)) 20419;;;;;; "org/org-datetree.el" (20045 30713))
20406;;; Generated autoloads from org/org-datetree.el 20420;;; Generated autoloads from org/org-datetree.el
20407 20421
20408(autoload 'org-datetree-find-date-create "org-datetree" "\ 20422(autoload 'org-datetree-find-date-create "org-datetree" "\
@@ -20418,7 +20432,7 @@ tree can be found.
20418;;;### (autoloads (org-export-as-docbook org-export-as-docbook-pdf-and-open 20432;;;### (autoloads (org-export-as-docbook org-export-as-docbook-pdf-and-open
20419;;;;;; org-export-as-docbook-pdf org-export-region-as-docbook org-replace-region-by-docbook 20433;;;;;; org-export-as-docbook-pdf org-export-region-as-docbook org-replace-region-by-docbook
20420;;;;;; org-export-as-docbook-to-buffer org-export-as-docbook-batch) 20434;;;;;; org-export-as-docbook-to-buffer org-export-as-docbook-batch)
20421;;;;;; "org-docbook" "org/org-docbook.el" (20119 34052)) 20435;;;;;; "org-docbook" "org/org-docbook.el" (20045 30713))
20422;;; Generated autoloads from org/org-docbook.el 20436;;; Generated autoloads from org/org-docbook.el
20423 20437
20424(autoload 'org-export-as-docbook-batch "org-docbook" "\ 20438(autoload 'org-export-as-docbook-batch "org-docbook" "\
@@ -20495,7 +20509,7 @@ publishing directory.
20495 20509
20496;;;### (autoloads (org-insert-export-options-template org-export-as-org 20510;;;### (autoloads (org-insert-export-options-template org-export-as-org
20497;;;;;; org-export-visible org-export) "org-exp" "org/org-exp.el" 20511;;;;;; org-export-visible org-export) "org-exp" "org/org-exp.el"
20498;;;;;; (20119 34052)) 20512;;;;;; (20167 36967))
20499;;; Generated autoloads from org/org-exp.el 20513;;; Generated autoloads from org/org-exp.el
20500 20514
20501(autoload 'org-export "org-exp" "\ 20515(autoload 'org-export "org-exp" "\
@@ -20556,8 +20570,8 @@ Insert into the buffer a template with information for exporting.
20556;;;*** 20570;;;***
20557 20571
20558;;;### (autoloads (org-feed-show-raw-feed org-feed-goto-inbox org-feed-update 20572;;;### (autoloads (org-feed-show-raw-feed org-feed-goto-inbox org-feed-update
20559;;;;;; org-feed-update-all) "org-feed" "org/org-feed.el" (20119 20573;;;;;; org-feed-update-all) "org-feed" "org/org-feed.el" (20065
20560;;;;;; 34052)) 20574;;;;;; 65310))
20561;;; Generated autoloads from org/org-feed.el 20575;;; Generated autoloads from org/org-feed.el
20562 20576
20563(autoload 'org-feed-update-all "org-feed" "\ 20577(autoload 'org-feed-update-all "org-feed" "\
@@ -20585,7 +20599,7 @@ Show the raw feed buffer of a feed.
20585;;;*** 20599;;;***
20586 20600
20587;;;### (autoloads (org-footnote-normalize org-footnote-action) "org-footnote" 20601;;;### (autoloads (org-footnote-normalize org-footnote-action) "org-footnote"
20588;;;;;; "org/org-footnote.el" (20119 34052)) 20602;;;;;; "org/org-footnote.el" (20161 45793))
20589;;; Generated autoloads from org/org-footnote.el 20603;;; Generated autoloads from org/org-footnote.el
20590 20604
20591(autoload 'org-footnote-action "org-footnote" "\ 20605(autoload 'org-footnote-action "org-footnote" "\
@@ -20636,7 +20650,7 @@ Additional note on `org-footnote-insert-pos-for-preprocessor':
20636;;;### (autoloads (org-freemind-to-org-mode org-freemind-from-org-sparse-tree 20650;;;### (autoloads (org-freemind-to-org-mode org-freemind-from-org-sparse-tree
20637;;;;;; org-freemind-from-org-mode org-freemind-from-org-mode-node 20651;;;;;; org-freemind-from-org-mode org-freemind-from-org-mode-node
20638;;;;;; org-freemind-show org-export-as-freemind) "org-freemind" 20652;;;;;; org-freemind-show org-export-as-freemind) "org-freemind"
20639;;;;;; "org/org-freemind.el" (20119 34052)) 20653;;;;;; "org/org-freemind.el" (20172 54913))
20640;;; Generated autoloads from org/org-freemind.el 20654;;; Generated autoloads from org/org-freemind.el
20641 20655
20642(autoload 'org-export-as-freemind "org-freemind" "\ 20656(autoload 'org-export-as-freemind "org-freemind" "\
@@ -20697,7 +20711,7 @@ Convert FreeMind file MM-FILE to `org-mode' file ORG-FILE.
20697;;;### (autoloads (org-export-htmlize-generate-css org-export-as-html 20711;;;### (autoloads (org-export-htmlize-generate-css org-export-as-html
20698;;;;;; org-export-region-as-html org-replace-region-by-html org-export-as-html-to-buffer 20712;;;;;; org-export-region-as-html org-replace-region-by-html org-export-as-html-to-buffer
20699;;;;;; org-export-as-html-batch org-export-as-html-and-open) "org-html" 20713;;;;;; org-export-as-html-batch org-export-as-html-and-open) "org-html"
20700;;;;;; "org/org-html.el" (20119 34052)) 20714;;;;;; "org/org-html.el" (20065 65310))
20701;;; Generated autoloads from org/org-html.el 20715;;; Generated autoloads from org/org-html.el
20702 20716
20703(put 'org-export-html-style-include-default 'safe-local-variable 'booleanp) 20717(put 'org-export-html-style-include-default 'safe-local-variable 'booleanp)
@@ -20791,7 +20805,7 @@ that uses these same face definitions.
20791 20805
20792;;;### (autoloads (org-export-icalendar-combine-agenda-files org-export-icalendar-all-agenda-files 20806;;;### (autoloads (org-export-icalendar-combine-agenda-files org-export-icalendar-all-agenda-files
20793;;;;;; org-export-icalendar-this-file) "org-icalendar" "org/org-icalendar.el" 20807;;;;;; org-export-icalendar-this-file) "org-icalendar" "org/org-icalendar.el"
20794;;;;;; (20119 34052)) 20808;;;;;; (20164 29468))
20795;;; Generated autoloads from org/org-icalendar.el 20809;;; Generated autoloads from org/org-icalendar.el
20796 20810
20797(autoload 'org-export-icalendar-this-file "org-icalendar" "\ 20811(autoload 'org-export-icalendar-this-file "org-icalendar" "\
@@ -20819,7 +20833,7 @@ The file is stored under the name `org-combined-agenda-icalendar-file'.
20819;;;### (autoloads (org-id-store-link org-id-find-id-file org-id-find 20833;;;### (autoloads (org-id-store-link org-id-find-id-file org-id-find
20820;;;;;; org-id-goto org-id-get-with-outline-drilling org-id-get-with-outline-path-completion 20834;;;;;; org-id-goto org-id-get-with-outline-drilling org-id-get-with-outline-path-completion
20821;;;;;; org-id-get org-id-copy org-id-get-create) "org-id" "org/org-id.el" 20835;;;;;; org-id-get org-id-copy org-id-get-create) "org-id" "org/org-id.el"
20822;;;;;; (20119 34052)) 20836;;;;;; (20065 65310))
20823;;; Generated autoloads from org/org-id.el 20837;;; Generated autoloads from org/org-id.el
20824 20838
20825(autoload 'org-id-get-create "org-id" "\ 20839(autoload 'org-id-get-create "org-id" "\
@@ -20888,7 +20902,7 @@ Store a link to the current entry, using its ID.
20888;;;*** 20902;;;***
20889 20903
20890;;;### (autoloads (org-indent-mode) "org-indent" "org/org-indent.el" 20904;;;### (autoloads (org-indent-mode) "org-indent" "org/org-indent.el"
20891;;;;;; (20119 34052)) 20905;;;;;; (20045 30716))
20892;;; Generated autoloads from org/org-indent.el 20906;;; Generated autoloads from org/org-indent.el
20893 20907
20894(autoload 'org-indent-mode "org-indent" "\ 20908(autoload 'org-indent-mode "org-indent" "\
@@ -20903,7 +20917,7 @@ FIXME: How to update when broken?
20903;;;*** 20917;;;***
20904 20918
20905;;;### (autoloads (org-irc-store-link) "org-irc" "org/org-irc.el" 20919;;;### (autoloads (org-irc-store-link) "org-irc" "org/org-irc.el"
20906;;;;;; (20119 34052)) 20920;;;;;; (20065 65310))
20907;;; Generated autoloads from org/org-irc.el 20921;;; Generated autoloads from org/org-irc.el
20908 20922
20909(autoload 'org-irc-store-link "org-irc" "\ 20923(autoload 'org-irc-store-link "org-irc" "\
@@ -20916,7 +20930,7 @@ Dispatch to the appropriate function to store a link to an IRC session.
20916;;;### (autoloads (org-export-as-pdf-and-open org-export-as-pdf org-export-as-latex 20930;;;### (autoloads (org-export-as-pdf-and-open org-export-as-pdf org-export-as-latex
20917;;;;;; org-export-region-as-latex org-replace-region-by-latex org-export-as-latex-to-buffer 20931;;;;;; org-export-region-as-latex org-replace-region-by-latex org-export-as-latex-to-buffer
20918;;;;;; org-export-as-latex-batch) "org-latex" "org/org-latex.el" 20932;;;;;; org-export-as-latex-batch) "org-latex" "org/org-latex.el"
20919;;;;;; (20119 34052)) 20933;;;;;; (20164 29468))
20920;;; Generated autoloads from org/org-latex.el 20934;;; Generated autoloads from org/org-latex.el
20921 20935
20922(autoload 'org-export-as-latex-batch "org-latex" "\ 20936(autoload 'org-export-as-latex-batch "org-latex" "\
@@ -20996,8 +21010,8 @@ Export as LaTeX, then process through to PDF, and open.
20996;;;*** 21010;;;***
20997 21011
20998;;;### (autoloads (org-mobile-create-sumo-agenda org-mobile-pull 21012;;;### (autoloads (org-mobile-create-sumo-agenda org-mobile-pull
20999;;;;;; org-mobile-push) "org-mobile" "org/org-mobile.el" (20119 21013;;;;;; org-mobile-push) "org-mobile" "org/org-mobile.el" (20065
21000;;;;;; 34052)) 21014;;;;;; 65310))
21001;;; Generated autoloads from org/org-mobile.el 21015;;; Generated autoloads from org/org-mobile.el
21002 21016
21003(autoload 'org-mobile-push "org-mobile" "\ 21017(autoload 'org-mobile-push "org-mobile" "\
@@ -21022,7 +21036,7 @@ Create a file that contains all custom agenda views.
21022;;;*** 21036;;;***
21023 21037
21024;;;### (autoloads (org-plot/gnuplot) "org-plot" "org/org-plot.el" 21038;;;### (autoloads (org-plot/gnuplot) "org-plot" "org/org-plot.el"
21025;;;;;; (20119 34052)) 21039;;;;;; (20157 54694))
21026;;; Generated autoloads from org/org-plot.el 21040;;; Generated autoloads from org/org-plot.el
21027 21041
21028(autoload 'org-plot/gnuplot "org-plot" "\ 21042(autoload 'org-plot/gnuplot "org-plot" "\
@@ -21036,7 +21050,7 @@ line directly before or after the table.
21036 21050
21037;;;### (autoloads (org-publish-current-project org-publish-current-file 21051;;;### (autoloads (org-publish-current-project org-publish-current-file
21038;;;;;; org-publish-all org-publish) "org-publish" "org/org-publish.el" 21052;;;;;; org-publish-all org-publish) "org-publish" "org/org-publish.el"
21039;;;;;; (20119 34052)) 21053;;;;;; (20161 45793))
21040;;; Generated autoloads from org/org-publish.el 21054;;; Generated autoloads from org/org-publish.el
21041 21055
21042(defalias 'org-publish-project 'org-publish) 21056(defalias 'org-publish-project 'org-publish)
@@ -21070,7 +21084,7 @@ the project.
21070 21084
21071;;;### (autoloads (org-remember-handler org-remember org-remember-apply-template 21085;;;### (autoloads (org-remember-handler org-remember org-remember-apply-template
21072;;;;;; org-remember-annotation org-remember-insinuate) "org-remember" 21086;;;;;; org-remember-annotation org-remember-insinuate) "org-remember"
21073;;;;;; "org/org-remember.el" (20119 34052)) 21087;;;;;; "org/org-remember.el" (20165 31925))
21074;;; Generated autoloads from org/org-remember.el 21088;;; Generated autoloads from org/org-remember.el
21075 21089
21076(autoload 'org-remember-insinuate "org-remember" "\ 21090(autoload 'org-remember-insinuate "org-remember" "\
@@ -21146,7 +21160,7 @@ See also the variable `org-reverse-note-order'.
21146;;;*** 21160;;;***
21147 21161
21148;;;### (autoloads (org-table-to-lisp orgtbl-mode turn-on-orgtbl) 21162;;;### (autoloads (org-table-to-lisp orgtbl-mode turn-on-orgtbl)
21149;;;;;; "org-table" "org/org-table.el" (20119 34052)) 21163;;;;;; "org-table" "org/org-table.el" (20168 57844))
21150;;; Generated autoloads from org/org-table.el 21164;;; Generated autoloads from org/org-table.el
21151 21165
21152(autoload 'turn-on-orgtbl "org-table" "\ 21166(autoload 'turn-on-orgtbl "org-table" "\
@@ -21170,7 +21184,7 @@ The table is taken from the parameter TXT, or from the buffer at point.
21170;;;*** 21184;;;***
21171 21185
21172;;;### (autoloads (org-export-as-taskjuggler-and-open org-export-as-taskjuggler) 21186;;;### (autoloads (org-export-as-taskjuggler-and-open org-export-as-taskjuggler)
21173;;;;;; "org-taskjuggler" "org/org-taskjuggler.el" (20119 34052)) 21187;;;;;; "org-taskjuggler" "org/org-taskjuggler.el" (20166 16092))
21174;;; Generated autoloads from org/org-taskjuggler.el 21188;;; Generated autoloads from org/org-taskjuggler.el
21175 21189
21176(autoload 'org-export-as-taskjuggler "org-taskjuggler" "\ 21190(autoload 'org-export-as-taskjuggler "org-taskjuggler" "\
@@ -21198,7 +21212,7 @@ with the TaskJuggler GUI.
21198 21212
21199;;;### (autoloads (org-timer-set-timer org-timer-item org-timer-change-times-in-region 21213;;;### (autoloads (org-timer-set-timer org-timer-item org-timer-change-times-in-region
21200;;;;;; org-timer org-timer-start) "org-timer" "org/org-timer.el" 21214;;;;;; org-timer org-timer-start) "org-timer" "org/org-timer.el"
21201;;;;;; (20119 34052)) 21215;;;;;; (20045 30718))
21202;;; Generated autoloads from org/org-timer.el 21216;;; Generated autoloads from org/org-timer.el
21203 21217
21204(autoload 'org-timer-start "org-timer" "\ 21218(autoload 'org-timer-start "org-timer" "\
@@ -21259,7 +21273,7 @@ replace any running timer.
21259;;;*** 21273;;;***
21260 21274
21261;;;### (autoloads (org-export-as-xoxo) "org-xoxo" "org/org-xoxo.el" 21275;;;### (autoloads (org-export-as-xoxo) "org-xoxo" "org/org-xoxo.el"
21262;;;;;; (20119 34052)) 21276;;;;;; (20045 30719))
21263;;; Generated autoloads from org/org-xoxo.el 21277;;; Generated autoloads from org/org-xoxo.el
21264 21278
21265(autoload 'org-export-as-xoxo "org-xoxo" "\ 21279(autoload 'org-export-as-xoxo "org-xoxo" "\
@@ -21271,7 +21285,7 @@ The XOXO buffer is named *xoxo-<source buffer name>*
21271;;;*** 21285;;;***
21272 21286
21273;;;### (autoloads (outline-minor-mode outline-mode) "outline" "outline.el" 21287;;;### (autoloads (outline-minor-mode outline-mode) "outline" "outline.el"
21274;;;;;; (20126 50306)) 21288;;;;;; (20162 63140))
21275;;; Generated autoloads from outline.el 21289;;; Generated autoloads from outline.el
21276(put 'outline-regexp 'safe-local-variable 'stringp) 21290(put 'outline-regexp 'safe-local-variable 'stringp)
21277(put 'outline-heading-end-regexp 'safe-local-variable 'stringp) 21291(put 'outline-heading-end-regexp 'safe-local-variable 'stringp)
@@ -21335,7 +21349,7 @@ See the command `outline-mode' for more information on this mode.
21335;;;### (autoloads (list-packages describe-package package-initialize 21349;;;### (autoloads (list-packages describe-package package-initialize
21336;;;;;; package-refresh-contents package-install-file package-install-from-buffer 21350;;;;;; package-refresh-contents package-install-file package-install-from-buffer
21337;;;;;; package-install package-enable-at-startup) "package" "emacs-lisp/package.el" 21351;;;;;; package-install package-enable-at-startup) "package" "emacs-lisp/package.el"
21338;;;;;; (20139 30186)) 21352;;;;;; (20168 57844))
21339;;; Generated autoloads from emacs-lisp/package.el 21353;;; Generated autoloads from emacs-lisp/package.el
21340 21354
21341(defvar package-enable-at-startup t "\ 21355(defvar package-enable-at-startup t "\
@@ -21405,7 +21419,7 @@ The list is displayed in a buffer named `*Packages*'.
21405 21419
21406;;;*** 21420;;;***
21407 21421
21408;;;### (autoloads (show-paren-mode) "paren" "paren.el" (20126 50320)) 21422;;;### (autoloads (show-paren-mode) "paren" "paren.el" (20127 62865))
21409;;; Generated autoloads from paren.el 21423;;; Generated autoloads from paren.el
21410 21424
21411(defvar show-paren-mode nil "\ 21425(defvar show-paren-mode nil "\
@@ -21432,7 +21446,7 @@ matching parenthesis is highlighted in `show-paren-style' after
21432;;;*** 21446;;;***
21433 21447
21434;;;### (autoloads (parse-time-string) "parse-time" "calendar/parse-time.el" 21448;;;### (autoloads (parse-time-string) "parse-time" "calendar/parse-time.el"
21435;;;;;; (20119 34052)) 21449;;;;;; (19845 45374))
21436;;; Generated autoloads from calendar/parse-time.el 21450;;; Generated autoloads from calendar/parse-time.el
21437(put 'parse-time-rules 'risky-local-variable t) 21451(put 'parse-time-rules 'risky-local-variable t)
21438 21452
@@ -21445,8 +21459,8 @@ unknown are returned as nil.
21445 21459
21446;;;*** 21460;;;***
21447 21461
21448;;;### (autoloads (pascal-mode) "pascal" "progmodes/pascal.el" (20119 21462;;;### (autoloads (pascal-mode) "pascal" "progmodes/pascal.el" (20168
21449;;;;;; 34052)) 21463;;;;;; 57844))
21450;;; Generated autoloads from progmodes/pascal.el 21464;;; Generated autoloads from progmodes/pascal.el
21451 21465
21452(autoload 'pascal-mode "pascal" "\ 21466(autoload 'pascal-mode "pascal" "\
@@ -21499,7 +21513,7 @@ no args, if that value is non-nil.
21499;;;*** 21513;;;***
21500 21514
21501;;;### (autoloads (password-in-cache-p password-cache-expiry password-cache) 21515;;;### (autoloads (password-in-cache-p password-cache-expiry password-cache)
21502;;;;;; "password-cache" "password-cache.el" (20119 34052)) 21516;;;;;; "password-cache" "password-cache.el" (20089 47591))
21503;;; Generated autoloads from password-cache.el 21517;;; Generated autoloads from password-cache.el
21504 21518
21505(defvar password-cache t "\ 21519(defvar password-cache t "\
@@ -21521,7 +21535,7 @@ Check if KEY is in the cache.
21521;;;*** 21535;;;***
21522 21536
21523;;;### (autoloads (pcase-let pcase-let* pcase) "pcase" "emacs-lisp/pcase.el" 21537;;;### (autoloads (pcase-let pcase-let* pcase) "pcase" "emacs-lisp/pcase.el"
21524;;;;;; (20119 34052)) 21538;;;;;; (19863 8742))
21525;;; Generated autoloads from emacs-lisp/pcase.el 21539;;; Generated autoloads from emacs-lisp/pcase.el
21526 21540
21527(autoload 'pcase "pcase" "\ 21541(autoload 'pcase "pcase" "\
@@ -21580,8 +21594,8 @@ of the form (UPAT EXP).
21580 21594
21581;;;*** 21595;;;***
21582 21596
21583;;;### (autoloads (pcomplete/cvs) "pcmpl-cvs" "pcmpl-cvs.el" (20119 21597;;;### (autoloads (pcomplete/cvs) "pcmpl-cvs" "pcmpl-cvs.el" (20100
21584;;;;;; 34052)) 21598;;;;;; 17869))
21585;;; Generated autoloads from pcmpl-cvs.el 21599;;; Generated autoloads from pcmpl-cvs.el
21586 21600
21587(autoload 'pcomplete/cvs "pcmpl-cvs" "\ 21601(autoload 'pcomplete/cvs "pcmpl-cvs" "\
@@ -21592,7 +21606,7 @@ Completion rules for the `cvs' command.
21592;;;*** 21606;;;***
21593 21607
21594;;;### (autoloads (pcomplete/tar pcomplete/make pcomplete/bzip2 pcomplete/gzip) 21608;;;### (autoloads (pcomplete/tar pcomplete/make pcomplete/bzip2 pcomplete/gzip)
21595;;;;;; "pcmpl-gnu" "pcmpl-gnu.el" (20119 34052)) 21609;;;;;; "pcmpl-gnu" "pcmpl-gnu.el" (20104 14925))
21596;;; Generated autoloads from pcmpl-gnu.el 21610;;; Generated autoloads from pcmpl-gnu.el
21597 21611
21598(autoload 'pcomplete/gzip "pcmpl-gnu" "\ 21612(autoload 'pcomplete/gzip "pcmpl-gnu" "\
@@ -21620,7 +21634,7 @@ Completion for the GNU tar utility.
21620;;;*** 21634;;;***
21621 21635
21622;;;### (autoloads (pcomplete/mount pcomplete/umount pcomplete/kill) 21636;;;### (autoloads (pcomplete/mount pcomplete/umount pcomplete/kill)
21623;;;;;; "pcmpl-linux" "pcmpl-linux.el" (20119 34052)) 21637;;;;;; "pcmpl-linux" "pcmpl-linux.el" (19986 58615))
21624;;; Generated autoloads from pcmpl-linux.el 21638;;; Generated autoloads from pcmpl-linux.el
21625 21639
21626(autoload 'pcomplete/kill "pcmpl-linux" "\ 21640(autoload 'pcomplete/kill "pcmpl-linux" "\
@@ -21640,8 +21654,8 @@ Completion for GNU/Linux `mount'.
21640 21654
21641;;;*** 21655;;;***
21642 21656
21643;;;### (autoloads (pcomplete/rpm) "pcmpl-rpm" "pcmpl-rpm.el" (20119 21657;;;### (autoloads (pcomplete/rpm) "pcmpl-rpm" "pcmpl-rpm.el" (19961
21644;;;;;; 34052)) 21658;;;;;; 55377))
21645;;; Generated autoloads from pcmpl-rpm.el 21659;;; Generated autoloads from pcmpl-rpm.el
21646 21660
21647(autoload 'pcomplete/rpm "pcmpl-rpm" "\ 21661(autoload 'pcomplete/rpm "pcmpl-rpm" "\
@@ -21653,7 +21667,7 @@ Completion for the `rpm' command.
21653 21667
21654;;;### (autoloads (pcomplete/scp pcomplete/ssh pcomplete/chgrp pcomplete/chown 21668;;;### (autoloads (pcomplete/scp pcomplete/ssh pcomplete/chgrp pcomplete/chown
21655;;;;;; pcomplete/which pcomplete/xargs pcomplete/rm pcomplete/rmdir 21669;;;;;; pcomplete/which pcomplete/xargs pcomplete/rm pcomplete/rmdir
21656;;;;;; pcomplete/cd) "pcmpl-unix" "pcmpl-unix.el" (20120 43280)) 21670;;;;;; pcomplete/cd) "pcmpl-unix" "pcmpl-unix.el" (20121 24048))
21657;;; Generated autoloads from pcmpl-unix.el 21671;;; Generated autoloads from pcmpl-unix.el
21658 21672
21659(autoload 'pcomplete/cd "pcmpl-unix" "\ 21673(autoload 'pcomplete/cd "pcmpl-unix" "\
@@ -21710,8 +21724,8 @@ Includes files as well as host names followed by a colon.
21710 21724
21711;;;### (autoloads (pcomplete-shell-setup pcomplete-comint-setup pcomplete-list 21725;;;### (autoloads (pcomplete-shell-setup pcomplete-comint-setup pcomplete-list
21712;;;;;; pcomplete-help pcomplete-expand pcomplete-continue pcomplete-expand-and-complete 21726;;;;;; pcomplete-help pcomplete-expand pcomplete-continue pcomplete-expand-and-complete
21713;;;;;; pcomplete-reverse pcomplete) "pcomplete" "pcomplete.el" (20119 21727;;;;;; pcomplete-reverse pcomplete) "pcomplete" "pcomplete.el" (20106
21714;;;;;; 34052)) 21728;;;;;; 17429))
21715;;; Generated autoloads from pcomplete.el 21729;;; Generated autoloads from pcomplete.el
21716 21730
21717(autoload 'pcomplete "pcomplete" "\ 21731(autoload 'pcomplete "pcomplete" "\
@@ -21770,7 +21784,7 @@ Setup `shell-mode' to use pcomplete.
21770 21784
21771;;;### (autoloads (cvs-dired-use-hook cvs-dired-action cvs-status 21785;;;### (autoloads (cvs-dired-use-hook cvs-dired-action cvs-status
21772;;;;;; cvs-update cvs-examine cvs-quickdir cvs-checkout) "pcvs" 21786;;;;;; cvs-update cvs-examine cvs-quickdir cvs-checkout) "pcvs"
21773;;;;;; "vc/pcvs.el" (20119 34052)) 21787;;;;;; "vc/pcvs.el" (20164 60780))
21774;;; Generated autoloads from vc/pcvs.el 21788;;; Generated autoloads from vc/pcvs.el
21775 21789
21776(autoload 'cvs-checkout "pcvs" "\ 21790(autoload 'cvs-checkout "pcvs" "\
@@ -21845,15 +21859,16 @@ The exact behavior is determined also by `cvs-dired-use-hook'." (when (stringp d
21845 21859
21846;;;*** 21860;;;***
21847 21861
21848;;;### (autoloads nil "pcvs-defs" "vc/pcvs-defs.el" (20119 34052)) 21862;;;### (autoloads nil "pcvs-defs" "vc/pcvs-defs.el" (20174 10230))
21849;;; Generated autoloads from vc/pcvs-defs.el 21863;;; Generated autoloads from vc/pcvs-defs.el
21850 21864
21851(defvar cvs-global-menu (let ((m (make-sparse-keymap "PCL-CVS"))) (define-key m [status] `(menu-item ,(purecopy "Directory Status") cvs-status :help ,(purecopy "A more verbose status of a workarea"))) (define-key m [checkout] `(menu-item ,(purecopy "Checkout Module") cvs-checkout :help ,(purecopy "Check out a module from the repository"))) (define-key m [update] `(menu-item ,(purecopy "Update Directory") cvs-update :help ,(purecopy "Fetch updates from the repository"))) (define-key m [examine] `(menu-item ,(purecopy "Examine Directory") cvs-examine :help ,(purecopy "Examine the current state of a workarea"))) (fset 'cvs-global-menu m))) 21865(defvar cvs-global-menu (let ((m (make-sparse-keymap "PCL-CVS"))) (define-key m [status] `(menu-item ,(purecopy "Directory Status") cvs-status :help ,(purecopy "A more verbose status of a workarea"))) (define-key m [checkout] `(menu-item ,(purecopy "Checkout Module") cvs-checkout :help ,(purecopy "Check out a module from the repository"))) (define-key m [update] `(menu-item ,(purecopy "Update Directory") cvs-update :help ,(purecopy "Fetch updates from the repository"))) (define-key m [examine] `(menu-item ,(purecopy "Examine Directory") cvs-examine :help ,(purecopy "Examine the current state of a workarea"))) (fset 'cvs-global-menu m)) "\
21866Global menu used by PCL-CVS.")
21852 21867
21853;;;*** 21868;;;***
21854 21869
21855;;;### (autoloads (perl-mode) "perl-mode" "progmodes/perl-mode.el" 21870;;;### (autoloads (perl-mode) "perl-mode" "progmodes/perl-mode.el"
21856;;;;;; (20119 34052)) 21871;;;;;; (20108 12033))
21857;;; Generated autoloads from progmodes/perl-mode.el 21872;;; Generated autoloads from progmodes/perl-mode.el
21858(put 'perl-indent-level 'safe-local-variable 'integerp) 21873(put 'perl-indent-level 'safe-local-variable 'integerp)
21859(put 'perl-continued-statement-offset 'safe-local-variable 'integerp) 21874(put 'perl-continued-statement-offset 'safe-local-variable 'integerp)
@@ -21915,7 +21930,7 @@ Turning on Perl mode runs the normal hook `perl-mode-hook'.
21915;;;*** 21930;;;***
21916 21931
21917;;;### (autoloads (picture-mode) "picture" "textmodes/picture.el" 21932;;;### (autoloads (picture-mode) "picture" "textmodes/picture.el"
21918;;;;;; (20119 34052)) 21933;;;;;; (20093 44623))
21919;;; Generated autoloads from textmodes/picture.el 21934;;; Generated autoloads from textmodes/picture.el
21920 21935
21921(autoload 'picture-mode "picture" "\ 21936(autoload 'picture-mode "picture" "\
@@ -21995,8 +22010,8 @@ they are not defaultly assigned to keys.
21995 22010
21996;;;*** 22011;;;***
21997 22012
21998;;;### (autoloads (plstore-open) "plstore" "gnus/plstore.el" (20119 22013;;;### (autoloads (plstore-open) "plstore" "gnus/plstore.el" (20097
21999;;;;;; 34052)) 22014;;;;;; 41737))
22000;;; Generated autoloads from gnus/plstore.el 22015;;; Generated autoloads from gnus/plstore.el
22001 22016
22002(autoload 'plstore-open "plstore" "\ 22017(autoload 'plstore-open "plstore" "\
@@ -22007,7 +22022,7 @@ Create a plstore instance associated with FILE.
22007;;;*** 22022;;;***
22008 22023
22009;;;### (autoloads (po-find-file-coding-system) "po" "textmodes/po.el" 22024;;;### (autoloads (po-find-file-coding-system) "po" "textmodes/po.el"
22010;;;;;; (20119 34052)) 22025;;;;;; (19845 45374))
22011;;; Generated autoloads from textmodes/po.el 22026;;; Generated autoloads from textmodes/po.el
22012 22027
22013(autoload 'po-find-file-coding-system "po" "\ 22028(autoload 'po-find-file-coding-system "po" "\
@@ -22018,7 +22033,7 @@ Called through `file-coding-system-alist', before the file is visited for real.
22018 22033
22019;;;*** 22034;;;***
22020 22035
22021;;;### (autoloads (pong) "pong" "play/pong.el" (20119 34052)) 22036;;;### (autoloads (pong) "pong" "play/pong.el" (19845 45374))
22022;;; Generated autoloads from play/pong.el 22037;;; Generated autoloads from play/pong.el
22023 22038
22024(autoload 'pong "pong" "\ 22039(autoload 'pong "pong" "\
@@ -22034,7 +22049,7 @@ pong-mode keybindings:\\<pong-mode-map>
22034 22049
22035;;;*** 22050;;;***
22036 22051
22037;;;### (autoloads (pop3-movemail) "pop3" "gnus/pop3.el" (20119 34052)) 22052;;;### (autoloads (pop3-movemail) "pop3" "gnus/pop3.el" (20178 7273))
22038;;; Generated autoloads from gnus/pop3.el 22053;;; Generated autoloads from gnus/pop3.el
22039 22054
22040(autoload 'pop3-movemail "pop3" "\ 22055(autoload 'pop3-movemail "pop3" "\
@@ -22047,7 +22062,7 @@ Use streaming commands.
22047 22062
22048;;;### (autoloads (pp-macroexpand-last-sexp pp-eval-last-sexp pp-macroexpand-expression 22063;;;### (autoloads (pp-macroexpand-last-sexp pp-eval-last-sexp pp-macroexpand-expression
22049;;;;;; pp-eval-expression pp pp-buffer pp-to-string) "pp" "emacs-lisp/pp.el" 22064;;;;;; pp-eval-expression pp pp-buffer pp-to-string) "pp" "emacs-lisp/pp.el"
22050;;;;;; (20119 34052)) 22065;;;;;; (19845 45374))
22051;;; Generated autoloads from emacs-lisp/pp.el 22066;;; Generated autoloads from emacs-lisp/pp.el
22052 22067
22053(autoload 'pp-to-string "pp" "\ 22068(autoload 'pp-to-string "pp" "\
@@ -22115,7 +22130,7 @@ Ignores leading comment characters.
22115;;;;;; pr-ps-buffer-print pr-ps-buffer-using-ghostscript pr-ps-buffer-preview 22130;;;;;; pr-ps-buffer-print pr-ps-buffer-using-ghostscript pr-ps-buffer-preview
22116;;;;;; pr-ps-directory-ps-print pr-ps-directory-print pr-ps-directory-using-ghostscript 22131;;;;;; pr-ps-directory-ps-print pr-ps-directory-print pr-ps-directory-using-ghostscript
22117;;;;;; pr-ps-directory-preview pr-interface) "printing" "printing.el" 22132;;;;;; pr-ps-directory-preview pr-interface) "printing" "printing.el"
22118;;;;;; (20119 34052)) 22133;;;;;; (20175 31160))
22119;;; Generated autoloads from printing.el 22134;;; Generated autoloads from printing.el
22120 22135
22121(autoload 'pr-interface "printing" "\ 22136(autoload 'pr-interface "printing" "\
@@ -22702,7 +22717,7 @@ are both set to t.
22702 22717
22703;;;*** 22718;;;***
22704 22719
22705;;;### (autoloads (proced) "proced" "proced.el" (20119 34052)) 22720;;;### (autoloads (proced) "proced" "proced.el" (20053 39261))
22706;;; Generated autoloads from proced.el 22721;;; Generated autoloads from proced.el
22707 22722
22708(autoload 'proced "proced" "\ 22723(autoload 'proced "proced" "\
@@ -22718,7 +22733,7 @@ See `proced-mode' for a description of features available in Proced buffers.
22718;;;*** 22733;;;***
22719 22734
22720;;;### (autoloads (run-prolog mercury-mode prolog-mode) "prolog" 22735;;;### (autoloads (run-prolog mercury-mode prolog-mode) "prolog"
22721;;;;;; "progmodes/prolog.el" (20119 34052)) 22736;;;;;; "progmodes/prolog.el" (20176 51947))
22722;;; Generated autoloads from progmodes/prolog.el 22737;;; Generated autoloads from progmodes/prolog.el
22723 22738
22724(autoload 'prolog-mode "prolog" "\ 22739(autoload 'prolog-mode "prolog" "\
@@ -22753,8 +22768,8 @@ With prefix argument ARG, restart the Prolog process if running before.
22753 22768
22754;;;*** 22769;;;***
22755 22770
22756;;;### (autoloads (bdf-directory-list) "ps-bdf" "ps-bdf.el" (20119 22771;;;### (autoloads (bdf-directory-list) "ps-bdf" "ps-bdf.el" (19845
22757;;;;;; 34052)) 22772;;;;;; 45374))
22758;;; Generated autoloads from ps-bdf.el 22773;;; Generated autoloads from ps-bdf.el
22759 22774
22760(defvar bdf-directory-list (if (memq system-type '(ms-dos windows-nt)) (list (expand-file-name "fonts/bdf" installation-directory)) '("/usr/local/share/emacs/fonts/bdf")) "\ 22775(defvar bdf-directory-list (if (memq system-type '(ms-dos windows-nt)) (list (expand-file-name "fonts/bdf" installation-directory)) '("/usr/local/share/emacs/fonts/bdf")) "\
@@ -22765,8 +22780,8 @@ The default value is '(\"/usr/local/share/emacs/fonts/bdf\").")
22765 22780
22766;;;*** 22781;;;***
22767 22782
22768;;;### (autoloads (ps-mode) "ps-mode" "progmodes/ps-mode.el" (20119 22783;;;### (autoloads (ps-mode) "ps-mode" "progmodes/ps-mode.el" (20167
22769;;;;;; 34052)) 22784;;;;;; 36967))
22770;;; Generated autoloads from progmodes/ps-mode.el 22785;;; Generated autoloads from progmodes/ps-mode.el
22771 22786
22772(autoload 'ps-mode "ps-mode" "\ 22787(autoload 'ps-mode "ps-mode" "\
@@ -22817,8 +22832,8 @@ Typing \\<ps-run-mode-map>\\[ps-run-goto-error] when the cursor is at the number
22817;;;;;; ps-spool-region ps-spool-buffer-with-faces ps-spool-buffer 22832;;;;;; ps-spool-region ps-spool-buffer-with-faces ps-spool-buffer
22818;;;;;; ps-print-region-with-faces ps-print-region ps-print-buffer-with-faces 22833;;;;;; ps-print-region-with-faces ps-print-region ps-print-buffer-with-faces
22819;;;;;; ps-print-buffer ps-print-customize ps-print-color-p ps-paper-type 22834;;;;;; ps-print-buffer ps-print-customize ps-print-color-p ps-paper-type
22820;;;;;; ps-page-dimensions-database) "ps-print" "ps-print.el" (20119 22835;;;;;; ps-page-dimensions-database) "ps-print" "ps-print.el" (20172
22821;;;;;; 34052)) 22836;;;;;; 55048))
22822;;; Generated autoloads from ps-print.el 22837;;; Generated autoloads from ps-print.el
22823 22838
22824(defvar ps-page-dimensions-database (purecopy (list (list 'a4 (/ (* 72 21.0) 2.54) (/ (* 72 29.7) 2.54) "A4") (list 'a3 (/ (* 72 29.7) 2.54) (/ (* 72 42.0) 2.54) "A3") (list 'letter (* 72 8.5) (* 72 11.0) "Letter") (list 'legal (* 72 8.5) (* 72 14.0) "Legal") (list 'letter-small (* 72 7.68) (* 72 10.16) "LetterSmall") (list 'tabloid (* 72 11.0) (* 72 17.0) "Tabloid") (list 'ledger (* 72 17.0) (* 72 11.0) "Ledger") (list 'statement (* 72 5.5) (* 72 8.5) "Statement") (list 'executive (* 72 7.5) (* 72 10.0) "Executive") (list 'a4small (* 72 7.47) (* 72 10.85) "A4Small") (list 'b4 (* 72 10.125) (* 72 14.33) "B4") (list 'b5 (* 72 7.16) (* 72 10.125) "B5") '(addresslarge 236.0 99.0 "AddressLarge") '(addresssmall 236.0 68.0 "AddressSmall") '(cuthanging13 90.0 222.0 "CutHanging13") '(cuthanging15 90.0 114.0 "CutHanging15") '(diskette 181.0 136.0 "Diskette") '(eurofilefolder 139.0 112.0 "EuropeanFilefolder") '(eurofoldernarrow 526.0 107.0 "EuroFolderNarrow") '(eurofolderwide 526.0 136.0 "EuroFolderWide") '(euronamebadge 189.0 108.0 "EuroNameBadge") '(euronamebadgelarge 223.0 136.0 "EuroNameBadgeLarge") '(filefolder 230.0 37.0 "FileFolder") '(jewelry 76.0 136.0 "Jewelry") '(mediabadge 180.0 136.0 "MediaBadge") '(multipurpose 126.0 68.0 "MultiPurpose") '(retaillabel 90.0 104.0 "RetailLabel") '(shipping 271.0 136.0 "Shipping") '(slide35mm 26.0 104.0 "Slide35mm") '(spine8mm 187.0 26.0 "Spine8mm") '(topcoated 425.19685 136.0 "TopCoatedPaper") '(topcoatedpaper 396.0 136.0 "TopcoatedPaper150") '(vhsface 205.0 127.0 "VHSFace") '(vhsspine 400.0 50.0 "VHSSpine") '(zipdisk 156.0 136.0 "ZipDisk"))) "\ 22839(defvar ps-page-dimensions-database (purecopy (list (list 'a4 (/ (* 72 21.0) 2.54) (/ (* 72 29.7) 2.54) "A4") (list 'a3 (/ (* 72 29.7) 2.54) (/ (* 72 42.0) 2.54) "A3") (list 'letter (* 72 8.5) (* 72 11.0) "Letter") (list 'legal (* 72 8.5) (* 72 14.0) "Legal") (list 'letter-small (* 72 7.68) (* 72 10.16) "LetterSmall") (list 'tabloid (* 72 11.0) (* 72 17.0) "Tabloid") (list 'ledger (* 72 17.0) (* 72 11.0) "Ledger") (list 'statement (* 72 5.5) (* 72 8.5) "Statement") (list 'executive (* 72 7.5) (* 72 10.0) "Executive") (list 'a4small (* 72 7.47) (* 72 10.85) "A4Small") (list 'b4 (* 72 10.125) (* 72 14.33) "B4") (list 'b5 (* 72 7.16) (* 72 10.125) "B5") '(addresslarge 236.0 99.0 "AddressLarge") '(addresssmall 236.0 68.0 "AddressSmall") '(cuthanging13 90.0 222.0 "CutHanging13") '(cuthanging15 90.0 114.0 "CutHanging15") '(diskette 181.0 136.0 "Diskette") '(eurofilefolder 139.0 112.0 "EuropeanFilefolder") '(eurofoldernarrow 526.0 107.0 "EuroFolderNarrow") '(eurofolderwide 526.0 136.0 "EuroFolderWide") '(euronamebadge 189.0 108.0 "EuroNameBadge") '(euronamebadgelarge 223.0 136.0 "EuroNameBadgeLarge") '(filefolder 230.0 37.0 "FileFolder") '(jewelry 76.0 136.0 "Jewelry") '(mediabadge 180.0 136.0 "MediaBadge") '(multipurpose 126.0 68.0 "MultiPurpose") '(retaillabel 90.0 104.0 "RetailLabel") '(shipping 271.0 136.0 "Shipping") '(slide35mm 26.0 104.0 "Slide35mm") '(spine8mm 187.0 26.0 "Spine8mm") '(topcoated 425.19685 136.0 "TopCoatedPaper") '(topcoatedpaper 396.0 136.0 "TopcoatedPaper150") '(vhsface 205.0 127.0 "VHSFace") '(vhsspine 400.0 50.0 "VHSSpine") '(zipdisk 156.0 136.0 "ZipDisk"))) "\
@@ -23015,7 +23030,7 @@ If EXTENSION is any other symbol, it is ignored.
23015;;;*** 23030;;;***
23016 23031
23017;;;### (autoloads (jython-mode python-mode python-after-info-look 23032;;;### (autoloads (jython-mode python-mode python-after-info-look
23018;;;;;; run-python) "python" "progmodes/python.el" (20119 34052)) 23033;;;;;; run-python) "python" "progmodes/python.el" (20170 13157))
23019;;; Generated autoloads from progmodes/python.el 23034;;; Generated autoloads from progmodes/python.el
23020 23035
23021(add-to-list 'interpreter-mode-alist (cons (purecopy "jython") 'jython-mode)) 23036(add-to-list 'interpreter-mode-alist (cons (purecopy "jython") 'jython-mode))
@@ -23101,7 +23116,7 @@ Runs `jython-mode-hook' after `python-mode-hook'.
23101;;;*** 23116;;;***
23102 23117
23103;;;### (autoloads (quoted-printable-decode-region) "qp" "gnus/qp.el" 23118;;;### (autoloads (quoted-printable-decode-region) "qp" "gnus/qp.el"
23104;;;;;; (20119 34052)) 23119;;;;;; (19845 45374))
23105;;; Generated autoloads from gnus/qp.el 23120;;; Generated autoloads from gnus/qp.el
23106 23121
23107(autoload 'quoted-printable-decode-region "qp" "\ 23122(autoload 'quoted-printable-decode-region "qp" "\
@@ -23124,7 +23139,7 @@ them into characters should be done separately.
23124;;;;;; quail-defrule quail-install-decode-map quail-install-map 23139;;;;;; quail-defrule quail-install-decode-map quail-install-map
23125;;;;;; quail-define-rules quail-show-keyboard-layout quail-set-keyboard-layout 23140;;;;;; quail-define-rules quail-show-keyboard-layout quail-set-keyboard-layout
23126;;;;;; quail-define-package quail-use-package quail-title) "quail" 23141;;;;;; quail-define-package quail-use-package quail-title) "quail"
23127;;;;;; "international/quail.el" (20119 34052)) 23142;;;;;; "international/quail.el" (20166 16092))
23128;;; Generated autoloads from international/quail.el 23143;;; Generated autoloads from international/quail.el
23129 23144
23130(autoload 'quail-title "quail" "\ 23145(autoload 'quail-title "quail" "\
@@ -23355,8 +23370,8 @@ of each directory.
23355 23370
23356;;;### (autoloads (quickurl-list quickurl-list-mode quickurl-edit-urls 23371;;;### (autoloads (quickurl-list quickurl-list-mode quickurl-edit-urls
23357;;;;;; quickurl-browse-url-ask quickurl-browse-url quickurl-add-url 23372;;;;;; quickurl-browse-url-ask quickurl-browse-url quickurl-add-url
23358;;;;;; quickurl-ask quickurl) "quickurl" "net/quickurl.el" (20119 23373;;;;;; quickurl-ask quickurl) "quickurl" "net/quickurl.el" (20168
23359;;;;;; 34052)) 23374;;;;;; 57844))
23360;;; Generated autoloads from net/quickurl.el 23375;;; Generated autoloads from net/quickurl.el
23361 23376
23362(defconst quickurl-reread-hook-postfix "\n;; Local Variables:\n;; eval: (progn (require 'quickurl) (add-hook 'local-write-file-hooks (lambda () (quickurl-read) nil)))\n;; End:\n" "\ 23377(defconst quickurl-reread-hook-postfix "\n;; Local Variables:\n;; eval: (progn (require 'quickurl) (add-hook 'local-write-file-hooks (lambda () (quickurl-read) nil)))\n;; End:\n" "\
@@ -23428,7 +23443,7 @@ Display `quickurl-list' as a formatted list using `quickurl-list-mode'.
23428;;;*** 23443;;;***
23429 23444
23430;;;### (autoloads (rcirc-track-minor-mode rcirc-connect rcirc) "rcirc" 23445;;;### (autoloads (rcirc-track-minor-mode rcirc-connect rcirc) "rcirc"
23431;;;;;; "net/rcirc.el" (20138 51043)) 23446;;;;;; "net/rcirc.el" (20170 13157))
23432;;; Generated autoloads from net/rcirc.el 23447;;; Generated autoloads from net/rcirc.el
23433 23448
23434(autoload 'rcirc "rcirc" "\ 23449(autoload 'rcirc "rcirc" "\
@@ -23463,8 +23478,8 @@ Global minor mode for tracking activity in rcirc buffers.
23463 23478
23464;;;*** 23479;;;***
23465 23480
23466;;;### (autoloads (remote-compile) "rcompile" "net/rcompile.el" (20119 23481;;;### (autoloads (remote-compile) "rcompile" "net/rcompile.el" (19845
23467;;;;;; 34052)) 23482;;;;;; 45374))
23468;;; Generated autoloads from net/rcompile.el 23483;;; Generated autoloads from net/rcompile.el
23469 23484
23470(autoload 'remote-compile "rcompile" "\ 23485(autoload 'remote-compile "rcompile" "\
@@ -23476,7 +23491,7 @@ See \\[compile].
23476;;;*** 23491;;;***
23477 23492
23478;;;### (autoloads (re-builder) "re-builder" "emacs-lisp/re-builder.el" 23493;;;### (autoloads (re-builder) "re-builder" "emacs-lisp/re-builder.el"
23479;;;;;; (20119 34052)) 23494;;;;;; (19975 1875))
23480;;; Generated autoloads from emacs-lisp/re-builder.el 23495;;; Generated autoloads from emacs-lisp/re-builder.el
23481 23496
23482(defalias 'regexp-builder 're-builder) 23497(defalias 'regexp-builder 're-builder)
@@ -23494,7 +23509,7 @@ matching parts of the target buffer will be highlighted.
23494 23509
23495;;;*** 23510;;;***
23496 23511
23497;;;### (autoloads (recentf-mode) "recentf" "recentf.el" (20126 50335)) 23512;;;### (autoloads (recentf-mode) "recentf" "recentf.el" (20167 36967))
23498;;; Generated autoloads from recentf.el 23513;;; Generated autoloads from recentf.el
23499 23514
23500(defvar recentf-mode nil "\ 23515(defvar recentf-mode nil "\
@@ -23524,7 +23539,7 @@ were operated on recently.
23524;;;;;; string-rectangle delete-whitespace-rectangle open-rectangle 23539;;;;;; string-rectangle delete-whitespace-rectangle open-rectangle
23525;;;;;; insert-rectangle yank-rectangle kill-rectangle extract-rectangle 23540;;;;;; insert-rectangle yank-rectangle kill-rectangle extract-rectangle
23526;;;;;; delete-extract-rectangle delete-rectangle) "rect" "rect.el" 23541;;;;;; delete-extract-rectangle delete-rectangle) "rect" "rect.el"
23527;;;;;; (20119 34052)) 23542;;;;;; (19999 41597))
23528;;; Generated autoloads from rect.el 23543;;; Generated autoloads from rect.el
23529 (define-key ctl-x-r-map "c" 'clear-rectangle) 23544 (define-key ctl-x-r-map "c" 'clear-rectangle)
23530 (define-key ctl-x-r-map "k" 'kill-rectangle) 23545 (define-key ctl-x-r-map "k" 'kill-rectangle)
@@ -23661,7 +23676,7 @@ with a prefix argument, prompt for START-AT and FORMAT.
23661;;;*** 23676;;;***
23662 23677
23663;;;### (autoloads (refill-mode) "refill" "textmodes/refill.el" (20127 23678;;;### (autoloads (refill-mode) "refill" "textmodes/refill.el" (20127
23664;;;;;; 24416)) 23679;;;;;; 62865))
23665;;; Generated autoloads from textmodes/refill.el 23680;;; Generated autoloads from textmodes/refill.el
23666 23681
23667(autoload 'refill-mode "refill" "\ 23682(autoload 'refill-mode "refill" "\
@@ -23682,7 +23697,7 @@ For true \"word wrap\" behavior, use `visual-line-mode' instead.
23682;;;*** 23697;;;***
23683 23698
23684;;;### (autoloads (reftex-reset-scanning-information reftex-mode 23699;;;### (autoloads (reftex-reset-scanning-information reftex-mode
23685;;;;;; turn-on-reftex) "reftex" "textmodes/reftex.el" (20136 50092)) 23700;;;;;; turn-on-reftex) "reftex" "textmodes/reftex.el" (20164 60780))
23686;;; Generated autoloads from textmodes/reftex.el 23701;;; Generated autoloads from textmodes/reftex.el
23687 23702
23688(autoload 'turn-on-reftex "reftex" "\ 23703(autoload 'turn-on-reftex "reftex" "\
@@ -23738,7 +23753,7 @@ This enforces rescanning the buffer on next use.
23738;;;*** 23753;;;***
23739 23754
23740;;;### (autoloads (reftex-citation) "reftex-cite" "textmodes/reftex-cite.el" 23755;;;### (autoloads (reftex-citation) "reftex-cite" "textmodes/reftex-cite.el"
23741;;;;;; (20119 34052)) 23756;;;;;; (20168 57844))
23742;;; Generated autoloads from textmodes/reftex-cite.el 23757;;; Generated autoloads from textmodes/reftex-cite.el
23743 23758
23744(autoload 'reftex-citation "reftex-cite" "\ 23759(autoload 'reftex-citation "reftex-cite" "\
@@ -23768,7 +23783,7 @@ While entering the regexp, completion on knows citation keys is possible.
23768;;;*** 23783;;;***
23769 23784
23770;;;### (autoloads (reftex-isearch-minor-mode) "reftex-global" "textmodes/reftex-global.el" 23785;;;### (autoloads (reftex-isearch-minor-mode) "reftex-global" "textmodes/reftex-global.el"
23771;;;;;; (20119 34052)) 23786;;;;;; (20164 60780))
23772;;; Generated autoloads from textmodes/reftex-global.el 23787;;; Generated autoloads from textmodes/reftex-global.el
23773 23788
23774(autoload 'reftex-isearch-minor-mode "reftex-global" "\ 23789(autoload 'reftex-isearch-minor-mode "reftex-global" "\
@@ -23785,7 +23800,7 @@ With no argument, this command toggles
23785;;;*** 23800;;;***
23786 23801
23787;;;### (autoloads (reftex-index-phrases-mode) "reftex-index" "textmodes/reftex-index.el" 23802;;;### (autoloads (reftex-index-phrases-mode) "reftex-index" "textmodes/reftex-index.el"
23788;;;;;; (20119 34052)) 23803;;;;;; (20162 63140))
23789;;; Generated autoloads from textmodes/reftex-index.el 23804;;; Generated autoloads from textmodes/reftex-index.el
23790 23805
23791(autoload 'reftex-index-phrases-mode "reftex-index" "\ 23806(autoload 'reftex-index-phrases-mode "reftex-index" "\
@@ -23818,7 +23833,7 @@ Here are all local bindings.
23818;;;*** 23833;;;***
23819 23834
23820;;;### (autoloads (reftex-all-document-files) "reftex-parse" "textmodes/reftex-parse.el" 23835;;;### (autoloads (reftex-all-document-files) "reftex-parse" "textmodes/reftex-parse.el"
23821;;;;;; (20119 34052)) 23836;;;;;; (20161 45793))
23822;;; Generated autoloads from textmodes/reftex-parse.el 23837;;; Generated autoloads from textmodes/reftex-parse.el
23823 23838
23824(autoload 'reftex-all-document-files "reftex-parse" "\ 23839(autoload 'reftex-all-document-files "reftex-parse" "\
@@ -23830,8 +23845,8 @@ of master file.
23830 23845
23831;;;*** 23846;;;***
23832 23847
23833;;;### (autoloads nil "reftex-vars" "textmodes/reftex-vars.el" (20119 23848;;;### (autoloads nil "reftex-vars" "textmodes/reftex-vars.el" (19845
23834;;;;;; 34052)) 23849;;;;;; 45374))
23835;;; Generated autoloads from textmodes/reftex-vars.el 23850;;; Generated autoloads from textmodes/reftex-vars.el
23836(put 'reftex-vref-is-default 'safe-local-variable (lambda (x) (or (stringp x) (symbolp x)))) 23851(put 'reftex-vref-is-default 'safe-local-variable (lambda (x) (or (stringp x) (symbolp x))))
23837(put 'reftex-fref-is-default 'safe-local-variable (lambda (x) (or (stringp x) (symbolp x)))) 23852(put 'reftex-fref-is-default 'safe-local-variable (lambda (x) (or (stringp x) (symbolp x))))
@@ -23841,7 +23856,7 @@ of master file.
23841;;;*** 23856;;;***
23842 23857
23843;;;### (autoloads (regexp-opt-depth regexp-opt) "regexp-opt" "emacs-lisp/regexp-opt.el" 23858;;;### (autoloads (regexp-opt-depth regexp-opt) "regexp-opt" "emacs-lisp/regexp-opt.el"
23844;;;;;; (20119 34052)) 23859;;;;;; (19845 45374))
23845;;; Generated autoloads from emacs-lisp/regexp-opt.el 23860;;; Generated autoloads from emacs-lisp/regexp-opt.el
23846 23861
23847(autoload 'regexp-opt "regexp-opt" "\ 23862(autoload 'regexp-opt "regexp-opt" "\
@@ -23872,7 +23887,7 @@ This means the number of non-shy regexp grouping constructs
23872 23887
23873;;;### (autoloads (remember-diary-extract-entries remember-clipboard 23888;;;### (autoloads (remember-diary-extract-entries remember-clipboard
23874;;;;;; remember-other-frame remember) "remember" "textmodes/remember.el" 23889;;;;;; remember-other-frame remember) "remember" "textmodes/remember.el"
23875;;;;;; (20119 34052)) 23890;;;;;; (20161 45793))
23876;;; Generated autoloads from textmodes/remember.el 23891;;; Generated autoloads from textmodes/remember.el
23877 23892
23878(autoload 'remember "remember" "\ 23893(autoload 'remember "remember" "\
@@ -23903,7 +23918,7 @@ Extract diary entries from the region.
23903 23918
23904;;;*** 23919;;;***
23905 23920
23906;;;### (autoloads (repeat) "repeat" "repeat.el" (20119 34052)) 23921;;;### (autoloads (repeat) "repeat" "repeat.el" (20172 54913))
23907;;; Generated autoloads from repeat.el 23922;;; Generated autoloads from repeat.el
23908 23923
23909(autoload 'repeat "repeat" "\ 23924(autoload 'repeat "repeat" "\
@@ -23926,7 +23941,7 @@ recently executed command not bound to an input event\".
23926;;;*** 23941;;;***
23927 23942
23928;;;### (autoloads (reporter-submit-bug-report) "reporter" "mail/reporter.el" 23943;;;### (autoloads (reporter-submit-bug-report) "reporter" "mail/reporter.el"
23929;;;;;; (20119 34052)) 23944;;;;;; (20076 35541))
23930;;; Generated autoloads from mail/reporter.el 23945;;; Generated autoloads from mail/reporter.el
23931 23946
23932(autoload 'reporter-submit-bug-report "reporter" "\ 23947(autoload 'reporter-submit-bug-report "reporter" "\
@@ -23958,7 +23973,7 @@ mail-sending package is used for editing and sending the message.
23958;;;*** 23973;;;***
23959 23974
23960;;;### (autoloads (reposition-window) "reposition" "reposition.el" 23975;;;### (autoloads (reposition-window) "reposition" "reposition.el"
23961;;;;;; (20119 34052)) 23976;;;;;; (19845 45374))
23962;;; Generated autoloads from reposition.el 23977;;; Generated autoloads from reposition.el
23963 23978
23964(autoload 'reposition-window "reposition" "\ 23979(autoload 'reposition-window "reposition" "\
@@ -23985,7 +24000,7 @@ first comment line visible (if point is in a comment).
23985;;;*** 24000;;;***
23986 24001
23987;;;### (autoloads (global-reveal-mode reveal-mode) "reveal" "reveal.el" 24002;;;### (autoloads (global-reveal-mode reveal-mode) "reveal" "reveal.el"
23988;;;;;; (20126 50360)) 24003;;;;;; (20127 62865))
23989;;; Generated autoloads from reveal.el 24004;;; Generated autoloads from reveal.el
23990 24005
23991(autoload 'reveal-mode "reveal" "\ 24006(autoload 'reveal-mode "reveal" "\
@@ -24021,7 +24036,7 @@ the mode if ARG is omitted or nil.
24021;;;*** 24036;;;***
24022 24037
24023;;;### (autoloads (make-ring ring-p) "ring" "emacs-lisp/ring.el" 24038;;;### (autoloads (make-ring ring-p) "ring" "emacs-lisp/ring.el"
24024;;;;;; (20119 34052)) 24039;;;;;; (19845 45374))
24025;;; Generated autoloads from emacs-lisp/ring.el 24040;;; Generated autoloads from emacs-lisp/ring.el
24026 24041
24027(autoload 'ring-p "ring" "\ 24042(autoload 'ring-p "ring" "\
@@ -24036,7 +24051,7 @@ Make a ring that can contain SIZE elements.
24036 24051
24037;;;*** 24052;;;***
24038 24053
24039;;;### (autoloads (rlogin) "rlogin" "net/rlogin.el" (20119 34052)) 24054;;;### (autoloads (rlogin) "rlogin" "net/rlogin.el" (20077 56412))
24040;;; Generated autoloads from net/rlogin.el 24055;;; Generated autoloads from net/rlogin.el
24041 24056
24042(autoload 'rlogin "rlogin" "\ 24057(autoload 'rlogin "rlogin" "\
@@ -24085,7 +24100,7 @@ variable.
24085;;;;;; rmail-secondary-file-directory rmail-primary-inbox-list rmail-highlighted-headers 24100;;;;;; rmail-secondary-file-directory rmail-primary-inbox-list rmail-highlighted-headers
24086;;;;;; rmail-retry-ignored-headers rmail-displayed-headers rmail-ignored-headers 24101;;;;;; rmail-retry-ignored-headers rmail-displayed-headers rmail-ignored-headers
24087;;;;;; rmail-user-mail-address-regexp rmail-movemail-variant-p) 24102;;;;;; rmail-user-mail-address-regexp rmail-movemail-variant-p)
24088;;;;;; "rmail" "mail/rmail.el" (20138 48832)) 24103;;;;;; "rmail" "mail/rmail.el" (20174 10633))
24089;;; Generated autoloads from mail/rmail.el 24104;;; Generated autoloads from mail/rmail.el
24090 24105
24091(autoload 'rmail-movemail-variant-p "rmail" "\ 24106(autoload 'rmail-movemail-variant-p "rmail" "\
@@ -24183,8 +24198,8 @@ This is set to nil by default.")
24183 24198
24184(defvar rmail-insert-mime-forwarded-message-function nil "\ 24199(defvar rmail-insert-mime-forwarded-message-function nil "\
24185Function to insert a message in MIME format so it can be forwarded. 24200Function to insert a message in MIME format so it can be forwarded.
24186This function is called if `rmail-enable-mime' or 24201This function is called if `rmail-enable-mime' and
24187`rmail-enable-mime-composing' is non-nil. 24202`rmail-enable-mime-composing' are non-nil.
24188It is called with one argument FORWARD-BUFFER, which is a 24203It is called with one argument FORWARD-BUFFER, which is a
24189buffer containing the message to forward. The current buffer 24204buffer containing the message to forward. The current buffer
24190is the outgoing mail buffer.") 24205is the outgoing mail buffer.")
@@ -24269,7 +24284,7 @@ Set PASSWORD to be used for retrieving mail from a POP or IMAP server.
24269;;;*** 24284;;;***
24270 24285
24271;;;### (autoloads (rmail-output-body-to-file rmail-output-as-seen 24286;;;### (autoloads (rmail-output-body-to-file rmail-output-as-seen
24272;;;;;; rmail-output) "rmailout" "mail/rmailout.el" (20119 34052)) 24287;;;;;; rmail-output) "rmailout" "mail/rmailout.el" (20172 54913))
24273;;; Generated autoloads from mail/rmailout.el 24288;;; Generated autoloads from mail/rmailout.el
24274(put 'rmail-output-file-alist 'risky-local-variable t) 24289(put 'rmail-output-file-alist 'risky-local-variable t)
24275 24290
@@ -24334,7 +24349,7 @@ than appending to it. Deletes the message after writing if
24334;;;*** 24349;;;***
24335 24350
24336;;;### (autoloads (rng-c-load-schema) "rng-cmpct" "nxml/rng-cmpct.el" 24351;;;### (autoloads (rng-c-load-schema) "rng-cmpct" "nxml/rng-cmpct.el"
24337;;;;;; (20119 34052)) 24352;;;;;; (19845 45374))
24338;;; Generated autoloads from nxml/rng-cmpct.el 24353;;; Generated autoloads from nxml/rng-cmpct.el
24339 24354
24340(autoload 'rng-c-load-schema "rng-cmpct" "\ 24355(autoload 'rng-c-load-schema "rng-cmpct" "\
@@ -24346,7 +24361,7 @@ Return a pattern.
24346;;;*** 24361;;;***
24347 24362
24348;;;### (autoloads (rng-nxml-mode-init) "rng-nxml" "nxml/rng-nxml.el" 24363;;;### (autoloads (rng-nxml-mode-init) "rng-nxml" "nxml/rng-nxml.el"
24349;;;;;; (20119 34052)) 24364;;;;;; (19845 45374))
24350;;; Generated autoloads from nxml/rng-nxml.el 24365;;; Generated autoloads from nxml/rng-nxml.el
24351 24366
24352(autoload 'rng-nxml-mode-init "rng-nxml" "\ 24367(autoload 'rng-nxml-mode-init "rng-nxml" "\
@@ -24359,7 +24374,7 @@ Validation will be enabled if `rng-nxml-auto-validate-flag' is non-nil.
24359;;;*** 24374;;;***
24360 24375
24361;;;### (autoloads (rng-validate-mode) "rng-valid" "nxml/rng-valid.el" 24376;;;### (autoloads (rng-validate-mode) "rng-valid" "nxml/rng-valid.el"
24362;;;;;; (20119 34052)) 24377;;;;;; (20178 7273))
24363;;; Generated autoloads from nxml/rng-valid.el 24378;;; Generated autoloads from nxml/rng-valid.el
24364 24379
24365(autoload 'rng-validate-mode "rng-valid" "\ 24380(autoload 'rng-validate-mode "rng-valid" "\
@@ -24389,8 +24404,8 @@ to use for finding the schema.
24389 24404
24390;;;*** 24405;;;***
24391 24406
24392;;;### (autoloads (rng-xsd-compile) "rng-xsd" "nxml/rng-xsd.el" (20119 24407;;;### (autoloads (rng-xsd-compile) "rng-xsd" "nxml/rng-xsd.el" (19930
24393;;;;;; 34052)) 24408;;;;;; 13389))
24394;;; Generated autoloads from nxml/rng-xsd.el 24409;;; Generated autoloads from nxml/rng-xsd.el
24395 24410
24396(put 'http://www\.w3\.org/2001/XMLSchema-datatypes 'rng-dt-compile 'rng-xsd-compile) 24411(put 'http://www\.w3\.org/2001/XMLSchema-datatypes 'rng-dt-compile 'rng-xsd-compile)
@@ -24418,7 +24433,7 @@ must be equal.
24418;;;*** 24433;;;***
24419 24434
24420;;;### (autoloads (robin-use-package robin-modify-package robin-define-package) 24435;;;### (autoloads (robin-use-package robin-modify-package robin-define-package)
24421;;;;;; "robin" "international/robin.el" (20119 34052)) 24436;;;;;; "robin" "international/robin.el" (20159 42847))
24422;;; Generated autoloads from international/robin.el 24437;;; Generated autoloads from international/robin.el
24423 24438
24424(autoload 'robin-define-package "robin" "\ 24439(autoload 'robin-define-package "robin" "\
@@ -24451,7 +24466,7 @@ Start using robin package NAME, which is a string.
24451;;;*** 24466;;;***
24452 24467
24453;;;### (autoloads (toggle-rot13-mode rot13-other-window rot13-region 24468;;;### (autoloads (toggle-rot13-mode rot13-other-window rot13-region
24454;;;;;; rot13-string rot13) "rot13" "rot13.el" (20119 34052)) 24469;;;;;; rot13-string rot13) "rot13" "rot13.el" (20154 24929))
24455;;; Generated autoloads from rot13.el 24470;;; Generated autoloads from rot13.el
24456 24471
24457(autoload 'rot13 "rot13" "\ 24472(autoload 'rot13 "rot13" "\
@@ -24489,7 +24504,7 @@ Toggle the use of ROT13 encoding for the current window.
24489;;;*** 24504;;;***
24490 24505
24491;;;### (autoloads (rst-minor-mode rst-mode) "rst" "textmodes/rst.el" 24506;;;### (autoloads (rst-minor-mode rst-mode) "rst" "textmodes/rst.el"
24492;;;;;; (20127 24234)) 24507;;;;;; (20178 7273))
24493;;; Generated autoloads from textmodes/rst.el 24508;;; Generated autoloads from textmodes/rst.el
24494 (add-to-list 'auto-mode-alist (purecopy '("\\.re?st\\'" . rst-mode))) 24509 (add-to-list 'auto-mode-alist (purecopy '("\\.re?st\\'" . rst-mode)))
24495 24510
@@ -24526,7 +24541,7 @@ for modes derived from Text mode, like Mail mode.
24526;;;*** 24541;;;***
24527 24542
24528;;;### (autoloads (ruby-mode) "ruby-mode" "progmodes/ruby-mode.el" 24543;;;### (autoloads (ruby-mode) "ruby-mode" "progmodes/ruby-mode.el"
24529;;;;;; (20119 34052)) 24544;;;;;; (19845 45374))
24530;;; Generated autoloads from progmodes/ruby-mode.el 24545;;; Generated autoloads from progmodes/ruby-mode.el
24531 24546
24532(autoload 'ruby-mode "ruby-mode" "\ 24547(autoload 'ruby-mode "ruby-mode" "\
@@ -24547,8 +24562,8 @@ The variable `ruby-indent-level' controls the amount of indentation.
24547 24562
24548;;;*** 24563;;;***
24549 24564
24550;;;### (autoloads (ruler-mode) "ruler-mode" "ruler-mode.el" (20126 24565;;;### (autoloads (ruler-mode) "ruler-mode" "ruler-mode.el" (20127
24551;;;;;; 50390)) 24566;;;;;; 62865))
24552;;; Generated autoloads from ruler-mode.el 24567;;; Generated autoloads from ruler-mode.el
24553 24568
24554(defvar ruler-mode nil "\ 24569(defvar ruler-mode nil "\
@@ -24565,8 +24580,8 @@ if ARG is omitted or nil.
24565 24580
24566;;;*** 24581;;;***
24567 24582
24568;;;### (autoloads (rx rx-to-string) "rx" "emacs-lisp/rx.el" (20119 24583;;;### (autoloads (rx rx-to-string) "rx" "emacs-lisp/rx.el" (20161
24569;;;;;; 34052)) 24584;;;;;; 45793))
24570;;; Generated autoloads from emacs-lisp/rx.el 24585;;; Generated autoloads from emacs-lisp/rx.el
24571 24586
24572(autoload 'rx-to-string "rx" "\ 24587(autoload 'rx-to-string "rx" "\
@@ -24877,8 +24892,8 @@ enclosed in `(and ...)'.
24877 24892
24878;;;*** 24893;;;***
24879 24894
24880;;;### (autoloads (savehist-mode) "savehist" "savehist.el" (20126 24895;;;### (autoloads (savehist-mode) "savehist" "savehist.el" (20127
24881;;;;;; 50398)) 24896;;;;;; 62865))
24882;;; Generated autoloads from savehist.el 24897;;; Generated autoloads from savehist.el
24883 24898
24884(defvar savehist-mode nil "\ 24899(defvar savehist-mode nil "\
@@ -24910,7 +24925,7 @@ histories, which is probably undesirable.
24910;;;*** 24925;;;***
24911 24926
24912;;;### (autoloads (dsssl-mode scheme-mode) "scheme" "progmodes/scheme.el" 24927;;;### (autoloads (dsssl-mode scheme-mode) "scheme" "progmodes/scheme.el"
24913;;;;;; (20119 34052)) 24928;;;;;; (20079 39251))
24914;;; Generated autoloads from progmodes/scheme.el 24929;;; Generated autoloads from progmodes/scheme.el
24915 24930
24916(autoload 'scheme-mode "scheme" "\ 24931(autoload 'scheme-mode "scheme" "\
@@ -24952,7 +24967,7 @@ that variable's value is a string.
24952;;;*** 24967;;;***
24953 24968
24954;;;### (autoloads (gnus-score-mode) "score-mode" "gnus/score-mode.el" 24969;;;### (autoloads (gnus-score-mode) "score-mode" "gnus/score-mode.el"
24955;;;;;; (20119 34052)) 24970;;;;;; (19845 45374))
24956;;; Generated autoloads from gnus/score-mode.el 24971;;; Generated autoloads from gnus/score-mode.el
24957 24972
24958(autoload 'gnus-score-mode "score-mode" "\ 24973(autoload 'gnus-score-mode "score-mode" "\
@@ -24966,7 +24981,7 @@ This mode is an extended emacs-lisp mode.
24966;;;*** 24981;;;***
24967 24982
24968;;;### (autoloads (scroll-all-mode) "scroll-all" "scroll-all.el" 24983;;;### (autoloads (scroll-all-mode) "scroll-all" "scroll-all.el"
24969;;;;;; (20126 50406)) 24984;;;;;; (20127 62865))
24970;;; Generated autoloads from scroll-all.el 24985;;; Generated autoloads from scroll-all.el
24971 24986
24972(defvar scroll-all-mode nil "\ 24987(defvar scroll-all-mode nil "\
@@ -24992,7 +25007,7 @@ one window apply to all visible windows in the same frame.
24992;;;*** 25007;;;***
24993 25008
24994;;;### (autoloads (scroll-lock-mode) "scroll-lock" "scroll-lock.el" 25009;;;### (autoloads (scroll-lock-mode) "scroll-lock" "scroll-lock.el"
24995;;;;;; (20126 43719)) 25010;;;;;; (19845 45374))
24996;;; Generated autoloads from scroll-lock.el 25011;;; Generated autoloads from scroll-lock.el
24997 25012
24998(autoload 'scroll-lock-mode "scroll-lock" "\ 25013(autoload 'scroll-lock-mode "scroll-lock" "\
@@ -25006,7 +25021,7 @@ during scrolling.
25006 25021
25007;;;*** 25022;;;***
25008 25023
25009;;;### (autoloads nil "secrets" "net/secrets.el" (20119 34052)) 25024;;;### (autoloads nil "secrets" "net/secrets.el" (20175 31160))
25010;;; Generated autoloads from net/secrets.el 25025;;; Generated autoloads from net/secrets.el
25011(when (featurep 'dbusbind) 25026(when (featurep 'dbusbind)
25012 (autoload 'secrets-show-secrets "secrets" nil t)) 25027 (autoload 'secrets-show-secrets "secrets" nil t))
@@ -25014,7 +25029,7 @@ during scrolling.
25014;;;*** 25029;;;***
25015 25030
25016;;;### (autoloads (semantic-mode semantic-default-submodes) "semantic" 25031;;;### (autoloads (semantic-mode semantic-default-submodes) "semantic"
25017;;;;;; "cedet/semantic.el" (20127 23255)) 25032;;;;;; "cedet/semantic.el" (20172 54913))
25018;;; Generated autoloads from cedet/semantic.el 25033;;; Generated autoloads from cedet/semantic.el
25019 25034
25020(defvar semantic-default-submodes '(global-semantic-idle-scheduler-mode global-semanticdb-minor-mode) "\ 25035(defvar semantic-default-submodes '(global-semantic-idle-scheduler-mode global-semanticdb-minor-mode) "\
@@ -25068,7 +25083,7 @@ Semantic mode.
25068;;;;;; mail-personal-alias-file mail-default-reply-to mail-archive-file-name 25083;;;;;; mail-personal-alias-file mail-default-reply-to mail-archive-file-name
25069;;;;;; mail-header-separator send-mail-function mail-interactive 25084;;;;;; mail-header-separator send-mail-function mail-interactive
25070;;;;;; mail-self-blind mail-specify-envelope-from mail-from-style) 25085;;;;;; mail-self-blind mail-specify-envelope-from mail-from-style)
25071;;;;;; "sendmail" "mail/sendmail.el" (20121 46524)) 25086;;;;;; "sendmail" "mail/sendmail.el" (20122 44898))
25072;;; Generated autoloads from mail/sendmail.el 25087;;; Generated autoloads from mail/sendmail.el
25073 25088
25074(defvar mail-from-style 'default "\ 25089(defvar mail-from-style 'default "\
@@ -25350,8 +25365,8 @@ Like `mail' command, but display mail buffer in another frame.
25350;;;*** 25365;;;***
25351 25366
25352;;;### (autoloads (server-save-buffers-kill-terminal server-mode 25367;;;### (autoloads (server-save-buffers-kill-terminal server-mode
25353;;;;;; server-force-delete server-start) "server" "server.el" (20126 25368;;;;;; server-force-delete server-start) "server" "server.el" (20172
25354;;;;;; 50430)) 25369;;;;;; 54913))
25355;;; Generated autoloads from server.el 25370;;; Generated autoloads from server.el
25356 25371
25357(put 'server-host 'risky-local-variable t) 25372(put 'server-host 'risky-local-variable t)
@@ -25418,7 +25433,7 @@ only these files will be asked to be saved.
25418 25433
25419;;;*** 25434;;;***
25420 25435
25421;;;### (autoloads (ses-mode) "ses" "ses.el" (20119 34052)) 25436;;;### (autoloads (ses-mode) "ses" "ses.el" (20172 54913))
25422;;; Generated autoloads from ses.el 25437;;; Generated autoloads from ses.el
25423 25438
25424(autoload 'ses-mode "ses" "\ 25439(autoload 'ses-mode "ses" "\
@@ -25437,7 +25452,7 @@ These are active only in the minibuffer, when entering or editing a formula:
25437;;;*** 25452;;;***
25438 25453
25439;;;### (autoloads (html-mode sgml-mode) "sgml-mode" "textmodes/sgml-mode.el" 25454;;;### (autoloads (html-mode sgml-mode) "sgml-mode" "textmodes/sgml-mode.el"
25440;;;;;; (20127 24193)) 25455;;;;;; (20167 36967))
25441;;; Generated autoloads from textmodes/sgml-mode.el 25456;;; Generated autoloads from textmodes/sgml-mode.el
25442 25457
25443(autoload 'sgml-mode "sgml-mode" "\ 25458(autoload 'sgml-mode "sgml-mode" "\
@@ -25503,7 +25518,7 @@ To work around that, do:
25503;;;*** 25518;;;***
25504 25519
25505;;;### (autoloads (sh-mode) "sh-script" "progmodes/sh-script.el" 25520;;;### (autoloads (sh-mode) "sh-script" "progmodes/sh-script.el"
25506;;;;;; (20120 43373)) 25521;;;;;; (20168 57844))
25507;;; Generated autoloads from progmodes/sh-script.el 25522;;; Generated autoloads from progmodes/sh-script.el
25508(put 'sh-shell 'safe-local-variable 'symbolp) 25523(put 'sh-shell 'safe-local-variable 'symbolp)
25509 25524
@@ -25568,7 +25583,7 @@ with your script for an edit-interpret-debug cycle.
25568;;;*** 25583;;;***
25569 25584
25570;;;### (autoloads (list-load-path-shadows) "shadow" "emacs-lisp/shadow.el" 25585;;;### (autoloads (list-load-path-shadows) "shadow" "emacs-lisp/shadow.el"
25571;;;;;; (20119 34052)) 25586;;;;;; (19845 45374))
25572;;; Generated autoloads from emacs-lisp/shadow.el 25587;;; Generated autoloads from emacs-lisp/shadow.el
25573 25588
25574(autoload 'list-load-path-shadows "shadow" "\ 25589(autoload 'list-load-path-shadows "shadow" "\
@@ -25618,8 +25633,8 @@ function, `load-path-shadows-find'.
25618;;;*** 25633;;;***
25619 25634
25620;;;### (autoloads (shadow-initialize shadow-define-regexp-group shadow-define-literal-group 25635;;;### (autoloads (shadow-initialize shadow-define-regexp-group shadow-define-literal-group
25621;;;;;; shadow-define-cluster) "shadowfile" "shadowfile.el" (20119 25636;;;;;; shadow-define-cluster) "shadowfile" "shadowfile.el" (19886
25622;;;;;; 34052)) 25637;;;;;; 45771))
25623;;; Generated autoloads from shadowfile.el 25638;;; Generated autoloads from shadowfile.el
25624 25639
25625(autoload 'shadow-define-cluster "shadowfile" "\ 25640(autoload 'shadow-define-cluster "shadowfile" "\
@@ -25658,7 +25673,7 @@ Set up file shadowing.
25658;;;*** 25673;;;***
25659 25674
25660;;;### (autoloads (shell shell-dumb-shell-regexp) "shell" "shell.el" 25675;;;### (autoloads (shell shell-dumb-shell-regexp) "shell" "shell.el"
25661;;;;;; (20126 50438)) 25676;;;;;; (20168 57844))
25662;;; Generated autoloads from shell.el 25677;;; Generated autoloads from shell.el
25663 25678
25664(defvar shell-dumb-shell-regexp (purecopy "cmd\\(proxy\\)?\\.exe") "\ 25679(defvar shell-dumb-shell-regexp (purecopy "cmd\\(proxy\\)?\\.exe") "\
@@ -25706,8 +25721,8 @@ Otherwise, one argument `-i' is passed to the shell.
25706 25721
25707;;;*** 25722;;;***
25708 25723
25709;;;### (autoloads (shr-insert-document) "shr" "gnus/shr.el" (20119 25724;;;### (autoloads (shr-insert-document) "shr" "gnus/shr.el" (20172
25710;;;;;; 34052)) 25725;;;;;; 54913))
25711;;; Generated autoloads from gnus/shr.el 25726;;; Generated autoloads from gnus/shr.el
25712 25727
25713(autoload 'shr-insert-document "shr" "\ 25728(autoload 'shr-insert-document "shr" "\
@@ -25718,7 +25733,7 @@ Otherwise, one argument `-i' is passed to the shell.
25718;;;*** 25733;;;***
25719 25734
25720;;;### (autoloads (sieve-upload-and-bury sieve-upload sieve-manage) 25735;;;### (autoloads (sieve-upload-and-bury sieve-upload sieve-manage)
25721;;;;;; "sieve" "gnus/sieve.el" (20119 34052)) 25736;;;;;; "sieve" "gnus/sieve.el" (20165 31925))
25722;;; Generated autoloads from gnus/sieve.el 25737;;; Generated autoloads from gnus/sieve.el
25723 25738
25724(autoload 'sieve-manage "sieve" "\ 25739(autoload 'sieve-manage "sieve" "\
@@ -25739,7 +25754,7 @@ Otherwise, one argument `-i' is passed to the shell.
25739;;;*** 25754;;;***
25740 25755
25741;;;### (autoloads (sieve-mode) "sieve-mode" "gnus/sieve-mode.el" 25756;;;### (autoloads (sieve-mode) "sieve-mode" "gnus/sieve-mode.el"
25742;;;;;; (20119 34052)) 25757;;;;;; (19845 45374))
25743;;; Generated autoloads from gnus/sieve-mode.el 25758;;; Generated autoloads from gnus/sieve-mode.el
25744 25759
25745(autoload 'sieve-mode "sieve-mode" "\ 25760(autoload 'sieve-mode "sieve-mode" "\
@@ -25754,8 +25769,8 @@ Turning on Sieve mode runs `sieve-mode-hook'.
25754 25769
25755;;;*** 25770;;;***
25756 25771
25757;;;### (autoloads (simula-mode) "simula" "progmodes/simula.el" (20119 25772;;;### (autoloads (simula-mode) "simula" "progmodes/simula.el" (19890
25758;;;;;; 34052)) 25773;;;;;; 42850))
25759;;; Generated autoloads from progmodes/simula.el 25774;;; Generated autoloads from progmodes/simula.el
25760 25775
25761(autoload 'simula-mode "simula" "\ 25776(autoload 'simula-mode "simula" "\
@@ -25804,7 +25819,7 @@ with no arguments, if that value is non-nil.
25804;;;*** 25819;;;***
25805 25820
25806;;;### (autoloads (skeleton-pair-insert-maybe skeleton-insert skeleton-proxy-new 25821;;;### (autoloads (skeleton-pair-insert-maybe skeleton-insert skeleton-proxy-new
25807;;;;;; define-skeleton) "skeleton" "skeleton.el" (20119 34052)) 25822;;;;;; define-skeleton) "skeleton" "skeleton.el" (19845 45374))
25808;;; Generated autoloads from skeleton.el 25823;;; Generated autoloads from skeleton.el
25809 25824
25810(defvar skeleton-filter-function 'identity "\ 25825(defvar skeleton-filter-function 'identity "\
@@ -25914,7 +25929,7 @@ symmetrical ones, and the same character twice for the others.
25914;;;*** 25929;;;***
25915 25930
25916;;;### (autoloads (smerge-start-session smerge-mode smerge-ediff) 25931;;;### (autoloads (smerge-start-session smerge-mode smerge-ediff)
25917;;;;;; "smerge-mode" "vc/smerge-mode.el" (20119 34052)) 25932;;;;;; "smerge-mode" "vc/smerge-mode.el" (19946 1612))
25918;;; Generated autoloads from vc/smerge-mode.el 25933;;; Generated autoloads from vc/smerge-mode.el
25919 25934
25920(autoload 'smerge-ediff "smerge-mode" "\ 25935(autoload 'smerge-ediff "smerge-mode" "\
@@ -25939,7 +25954,7 @@ If no conflict maker is found, turn off `smerge-mode'.
25939;;;*** 25954;;;***
25940 25955
25941;;;### (autoloads (smiley-buffer smiley-region) "smiley" "gnus/smiley.el" 25956;;;### (autoloads (smiley-buffer smiley-region) "smiley" "gnus/smiley.el"
25942;;;;;; (20119 34052)) 25957;;;;;; (19939 28373))
25943;;; Generated autoloads from gnus/smiley.el 25958;;; Generated autoloads from gnus/smiley.el
25944 25959
25945(autoload 'smiley-region "smiley" "\ 25960(autoload 'smiley-region "smiley" "\
@@ -25957,7 +25972,7 @@ interactively. If there's no argument, do it at the current buffer.
25957;;;*** 25972;;;***
25958 25973
25959;;;### (autoloads (smtpmail-send-queued-mail smtpmail-send-it) "smtpmail" 25974;;;### (autoloads (smtpmail-send-queued-mail smtpmail-send-it) "smtpmail"
25960;;;;;; "mail/smtpmail.el" (20119 34052)) 25975;;;;;; "mail/smtpmail.el" (20168 57844))
25961;;; Generated autoloads from mail/smtpmail.el 25976;;; Generated autoloads from mail/smtpmail.el
25962 25977
25963(autoload 'smtpmail-send-it "smtpmail" "\ 25978(autoload 'smtpmail-send-it "smtpmail" "\
@@ -25972,7 +25987,7 @@ Send mail that was queued as a result of setting `smtpmail-queue-mail'.
25972 25987
25973;;;*** 25988;;;***
25974 25989
25975;;;### (autoloads (snake) "snake" "play/snake.el" (20119 34052)) 25990;;;### (autoloads (snake) "snake" "play/snake.el" (19845 45374))
25976;;; Generated autoloads from play/snake.el 25991;;; Generated autoloads from play/snake.el
25977 25992
25978(autoload 'snake "snake" "\ 25993(autoload 'snake "snake" "\
@@ -25996,7 +26011,7 @@ Snake mode keybindings:
25996;;;*** 26011;;;***
25997 26012
25998;;;### (autoloads (snmpv2-mode snmp-mode) "snmp-mode" "net/snmp-mode.el" 26013;;;### (autoloads (snmpv2-mode snmp-mode) "snmp-mode" "net/snmp-mode.el"
25999;;;;;; (20119 34052)) 26014;;;;;; (20161 45793))
26000;;; Generated autoloads from net/snmp-mode.el 26015;;; Generated autoloads from net/snmp-mode.el
26001 26016
26002(autoload 'snmp-mode "snmp-mode" "\ 26017(autoload 'snmp-mode "snmp-mode" "\
@@ -26025,8 +26040,8 @@ then `snmpv2-mode-hook'.
26025 26040
26026;;;*** 26041;;;***
26027 26042
26028;;;### (autoloads (sunrise-sunset) "solar" "calendar/solar.el" (20119 26043;;;### (autoloads (sunrise-sunset) "solar" "calendar/solar.el" (19886
26029;;;;;; 34052)) 26044;;;;;; 45771))
26030;;; Generated autoloads from calendar/solar.el 26045;;; Generated autoloads from calendar/solar.el
26031 26046
26032(autoload 'sunrise-sunset "solar" "\ 26047(autoload 'sunrise-sunset "solar" "\
@@ -26041,8 +26056,8 @@ This function is suitable for execution in a .emacs file.
26041 26056
26042;;;*** 26057;;;***
26043 26058
26044;;;### (autoloads (solitaire) "solitaire" "play/solitaire.el" (20119 26059;;;### (autoloads (solitaire) "solitaire" "play/solitaire.el" (20165
26045;;;;;; 34052)) 26060;;;;;; 31925))
26046;;; Generated autoloads from play/solitaire.el 26061;;; Generated autoloads from play/solitaire.el
26047 26062
26048(autoload 'solitaire "solitaire" "\ 26063(autoload 'solitaire "solitaire" "\
@@ -26119,7 +26134,7 @@ Pick your favorite shortcuts:
26119 26134
26120;;;### (autoloads (reverse-region sort-columns sort-regexp-fields 26135;;;### (autoloads (reverse-region sort-columns sort-regexp-fields
26121;;;;;; sort-fields sort-numeric-fields sort-pages sort-paragraphs 26136;;;;;; sort-fields sort-numeric-fields sort-pages sort-paragraphs
26122;;;;;; sort-lines sort-subr) "sort" "sort.el" (20119 34052)) 26137;;;;;; sort-lines sort-subr) "sort" "sort.el" (19845 45374))
26123;;; Generated autoloads from sort.el 26138;;; Generated autoloads from sort.el
26124(put 'sort-fold-case 'safe-local-variable 'booleanp) 26139(put 'sort-fold-case 'safe-local-variable 'booleanp)
26125 26140
@@ -26263,8 +26278,8 @@ From a program takes two point or marker arguments, BEG and END.
26263 26278
26264;;;*** 26279;;;***
26265 26280
26266;;;### (autoloads (spam-initialize) "spam" "gnus/spam.el" (20119 26281;;;### (autoloads (spam-initialize) "spam" "gnus/spam.el" (20167
26267;;;;;; 34052)) 26282;;;;;; 36967))
26268;;; Generated autoloads from gnus/spam.el 26283;;; Generated autoloads from gnus/spam.el
26269 26284
26270(autoload 'spam-initialize "spam" "\ 26285(autoload 'spam-initialize "spam" "\
@@ -26280,7 +26295,7 @@ installed through `spam-necessary-extra-headers'.
26280 26295
26281;;;### (autoloads (spam-report-deagentize spam-report-agentize spam-report-url-to-file 26296;;;### (autoloads (spam-report-deagentize spam-report-agentize spam-report-url-to-file
26282;;;;;; spam-report-url-ping-mm-url spam-report-process-queue) "spam-report" 26297;;;;;; spam-report-url-ping-mm-url spam-report-process-queue) "spam-report"
26283;;;;;; "gnus/spam-report.el" (20119 34052)) 26298;;;;;; "gnus/spam-report.el" (20166 16092))
26284;;; Generated autoloads from gnus/spam-report.el 26299;;; Generated autoloads from gnus/spam-report.el
26285 26300
26286(autoload 'spam-report-process-queue "spam-report" "\ 26301(autoload 'spam-report-process-queue "spam-report" "\
@@ -26323,7 +26338,7 @@ Spam reports will be queued with the method used when
26323;;;*** 26338;;;***
26324 26339
26325;;;### (autoloads (speedbar-get-focus speedbar-frame-mode) "speedbar" 26340;;;### (autoloads (speedbar-get-focus speedbar-frame-mode) "speedbar"
26326;;;;;; "speedbar.el" (20119 34052)) 26341;;;;;; "speedbar.el" (20178 7273))
26327;;; Generated autoloads from speedbar.el 26342;;; Generated autoloads from speedbar.el
26328 26343
26329(defalias 'speedbar 'speedbar-frame-mode) 26344(defalias 'speedbar 'speedbar-frame-mode)
@@ -26347,8 +26362,8 @@ selected. If the speedbar frame is active, then select the attached frame.
26347 26362
26348;;;*** 26363;;;***
26349 26364
26350;;;### (autoloads (snarf-spooks spook) "spook" "play/spook.el" (20119 26365;;;### (autoloads (snarf-spooks spook) "spook" "play/spook.el" (19845
26351;;;;;; 34052)) 26366;;;;;; 45374))
26352;;; Generated autoloads from play/spook.el 26367;;; Generated autoloads from play/spook.el
26353 26368
26354(autoload 'spook "spook" "\ 26369(autoload 'spook "spook" "\
@@ -26367,7 +26382,7 @@ Return a vector containing the lines from `spook-phrases-file'.
26367;;;;;; sql-ms sql-ingres sql-solid sql-mysql sql-sqlite sql-informix 26382;;;;;; sql-ms sql-ingres sql-solid sql-mysql sql-sqlite sql-informix
26368;;;;;; sql-sybase sql-oracle sql-product-interactive sql-connect 26383;;;;;; sql-sybase sql-oracle sql-product-interactive sql-connect
26369;;;;;; sql-mode sql-help sql-add-product-keywords) "sql" "progmodes/sql.el" 26384;;;;;; sql-mode sql-help sql-add-product-keywords) "sql" "progmodes/sql.el"
26370;;;;;; (20119 34052)) 26385;;;;;; (20178 7273))
26371;;; Generated autoloads from progmodes/sql.el 26386;;; Generated autoloads from progmodes/sql.el
26372 26387
26373(autoload 'sql-add-product-keywords "sql" "\ 26388(autoload 'sql-add-product-keywords "sql" "\
@@ -26863,7 +26878,7 @@ buffer.
26863;;;*** 26878;;;***
26864 26879
26865;;;### (autoloads (srecode-template-mode) "srecode/srt-mode" "cedet/srecode/srt-mode.el" 26880;;;### (autoloads (srecode-template-mode) "srecode/srt-mode" "cedet/srecode/srt-mode.el"
26866;;;;;; (20119 34052)) 26881;;;;;; (20160 63745))
26867;;; Generated autoloads from cedet/srecode/srt-mode.el 26882;;; Generated autoloads from cedet/srecode/srt-mode.el
26868 26883
26869(autoload 'srecode-template-mode "srecode/srt-mode" "\ 26884(autoload 'srecode-template-mode "srecode/srt-mode" "\
@@ -26876,7 +26891,7 @@ Major-mode for writing SRecode macros.
26876;;;*** 26891;;;***
26877 26892
26878;;;### (autoloads (starttls-open-stream) "starttls" "gnus/starttls.el" 26893;;;### (autoloads (starttls-open-stream) "starttls" "gnus/starttls.el"
26879;;;;;; (20119 34052)) 26894;;;;;; (20175 31160))
26880;;; Generated autoloads from gnus/starttls.el 26895;;; Generated autoloads from gnus/starttls.el
26881 26896
26882(autoload 'starttls-open-stream "starttls" "\ 26897(autoload 'starttls-open-stream "starttls" "\
@@ -26893,7 +26908,7 @@ BUFFER is the buffer (or `buffer-name') to associate with the process.
26893Third arg is name of the host to connect to, or its IP address. 26908Third arg is name of the host to connect to, or its IP address.
26894Fourth arg PORT is an integer specifying a port to connect to. 26909Fourth arg PORT is an integer specifying a port to connect to.
26895If `starttls-use-gnutls' is nil, this may also be a service name, but 26910If `starttls-use-gnutls' is nil, this may also be a service name, but
26896GNUTLS requires a port number. 26911GnuTLS requires a port number.
26897 26912
26898\(fn NAME BUFFER HOST PORT)" nil nil) 26913\(fn NAME BUFFER HOST PORT)" nil nil)
26899 26914
@@ -26903,8 +26918,8 @@ GNUTLS requires a port number.
26903;;;;;; strokes-mode strokes-list-strokes strokes-load-user-strokes 26918;;;;;; strokes-mode strokes-list-strokes strokes-load-user-strokes
26904;;;;;; strokes-help strokes-describe-stroke strokes-do-complex-stroke 26919;;;;;; strokes-help strokes-describe-stroke strokes-do-complex-stroke
26905;;;;;; strokes-do-stroke strokes-read-complex-stroke strokes-read-stroke 26920;;;;;; strokes-do-stroke strokes-read-complex-stroke strokes-read-stroke
26906;;;;;; strokes-global-set-stroke) "strokes" "strokes.el" (20126 26921;;;;;; strokes-global-set-stroke) "strokes" "strokes.el" (20127
26907;;;;;; 50576)) 26922;;;;;; 62865))
26908;;; Generated autoloads from strokes.el 26923;;; Generated autoloads from strokes.el
26909 26924
26910(autoload 'strokes-global-set-stroke "strokes" "\ 26925(autoload 'strokes-global-set-stroke "strokes" "\
@@ -27018,7 +27033,7 @@ Read a complex stroke and insert its glyph into the current buffer.
27018;;;*** 27033;;;***
27019 27034
27020;;;### (autoloads (studlify-buffer studlify-word studlify-region) 27035;;;### (autoloads (studlify-buffer studlify-word studlify-region)
27021;;;;;; "studly" "play/studly.el" (20119 34052)) 27036;;;;;; "studly" "play/studly.el" (19845 45374))
27022;;; Generated autoloads from play/studly.el 27037;;; Generated autoloads from play/studly.el
27023 27038
27024(autoload 'studlify-region "studly" "\ 27039(autoload 'studlify-region "studly" "\
@@ -27039,7 +27054,7 @@ Studlify-case the current buffer.
27039;;;*** 27054;;;***
27040 27055
27041;;;### (autoloads (global-subword-mode subword-mode) "subword" "progmodes/subword.el" 27056;;;### (autoloads (global-subword-mode subword-mode) "subword" "progmodes/subword.el"
27042;;;;;; (20127 25236)) 27057;;;;;; (20127 62865))
27043;;; Generated autoloads from progmodes/subword.el 27058;;; Generated autoloads from progmodes/subword.el
27044 27059
27045(autoload 'subword-mode "subword" "\ 27060(autoload 'subword-mode "subword" "\
@@ -27095,7 +27110,7 @@ See `subword-mode' for more information on Subword mode.
27095;;;*** 27110;;;***
27096 27111
27097;;;### (autoloads (sc-cite-original) "supercite" "mail/supercite.el" 27112;;;### (autoloads (sc-cite-original) "supercite" "mail/supercite.el"
27098;;;;;; (20119 34052)) 27113;;;;;; (19931 11784))
27099;;; Generated autoloads from mail/supercite.el 27114;;; Generated autoloads from mail/supercite.el
27100 27115
27101(autoload 'sc-cite-original "supercite" "\ 27116(autoload 'sc-cite-original "supercite" "\
@@ -27127,8 +27142,8 @@ and `sc-post-hook' is run after the guts of this function.
27127 27142
27128;;;*** 27143;;;***
27129 27144
27130;;;### (autoloads (gpm-mouse-mode) "t-mouse" "t-mouse.el" (20126 27145;;;### (autoloads (gpm-mouse-mode) "t-mouse" "t-mouse.el" (20127
27131;;;;;; 50587)) 27146;;;;;; 62865))
27132;;; Generated autoloads from t-mouse.el 27147;;; Generated autoloads from t-mouse.el
27133 27148
27134(define-obsolete-function-alias 't-mouse-mode 'gpm-mouse-mode "23.1") 27149(define-obsolete-function-alias 't-mouse-mode 'gpm-mouse-mode "23.1")
@@ -27156,7 +27171,7 @@ It relies on the `gpm' daemon being activated.
27156 27171
27157;;;*** 27172;;;***
27158 27173
27159;;;### (autoloads (tabify untabify) "tabify" "tabify.el" (20119 34052)) 27174;;;### (autoloads (tabify untabify) "tabify" "tabify.el" (19998 49767))
27160;;; Generated autoloads from tabify.el 27175;;; Generated autoloads from tabify.el
27161 27176
27162(autoload 'untabify "tabify" "\ 27177(autoload 'untabify "tabify" "\
@@ -27191,7 +27206,7 @@ The variable `tab-width' controls the spacing of tab stops.
27191;;;;;; table-recognize table-insert-row-column table-insert-column 27206;;;;;; table-recognize table-insert-row-column table-insert-column
27192;;;;;; table-insert-row table-insert table-point-left-cell-hook 27207;;;;;; table-insert-row table-insert table-point-left-cell-hook
27193;;;;;; table-point-entered-cell-hook table-load-hook table-cell-map-hook) 27208;;;;;; table-point-entered-cell-hook table-load-hook table-cell-map-hook)
27194;;;;;; "table" "textmodes/table.el" (20119 34052)) 27209;;;;;; "table" "textmodes/table.el" (20179 28130))
27195;;; Generated autoloads from textmodes/table.el 27210;;; Generated autoloads from textmodes/table.el
27196 27211
27197(defvar table-cell-map-hook nil "\ 27212(defvar table-cell-map-hook nil "\
@@ -27780,7 +27795,7 @@ converts a table into plain text without frames. It is a companion to
27780;;;*** 27795;;;***
27781 27796
27782;;;### (autoloads (tabulated-list-mode) "tabulated-list" "emacs-lisp/tabulated-list.el" 27797;;;### (autoloads (tabulated-list-mode) "tabulated-list" "emacs-lisp/tabulated-list.el"
27783;;;;;; (20119 34052)) 27798;;;;;; (20170 13157))
27784;;; Generated autoloads from emacs-lisp/tabulated-list.el 27799;;; Generated autoloads from emacs-lisp/tabulated-list.el
27785 27800
27786(autoload 'tabulated-list-mode "tabulated-list" "\ 27801(autoload 'tabulated-list-mode "tabulated-list" "\
@@ -27822,7 +27837,7 @@ as the ewoc pretty-printer.
27822 27837
27823;;;*** 27838;;;***
27824 27839
27825;;;### (autoloads (talk talk-connect) "talk" "talk.el" (20140 44272)) 27840;;;### (autoloads (talk talk-connect) "talk" "talk.el" (20141 9296))
27826;;; Generated autoloads from talk.el 27841;;; Generated autoloads from talk.el
27827 27842
27828(autoload 'talk-connect "talk" "\ 27843(autoload 'talk-connect "talk" "\
@@ -27837,7 +27852,7 @@ Connect to the Emacs talk group from the current X display or tty frame.
27837 27852
27838;;;*** 27853;;;***
27839 27854
27840;;;### (autoloads (tar-mode) "tar-mode" "tar-mode.el" (20129 34168)) 27855;;;### (autoloads (tar-mode) "tar-mode" "tar-mode.el" (20161 45793))
27841;;; Generated autoloads from tar-mode.el 27856;;; Generated autoloads from tar-mode.el
27842 27857
27843(autoload 'tar-mode "tar-mode" "\ 27858(autoload 'tar-mode "tar-mode" "\
@@ -27861,7 +27876,7 @@ See also: variables `tar-update-datestamp' and `tar-anal-blocksize'.
27861;;;*** 27876;;;***
27862 27877
27863;;;### (autoloads (tcl-help-on-word inferior-tcl tcl-mode) "tcl" 27878;;;### (autoloads (tcl-help-on-word inferior-tcl tcl-mode) "tcl"
27864;;;;;; "progmodes/tcl.el" (20119 34052)) 27879;;;;;; "progmodes/tcl.el" (20164 29468))
27865;;; Generated autoloads from progmodes/tcl.el 27880;;; Generated autoloads from progmodes/tcl.el
27866 27881
27867(autoload 'tcl-mode "tcl" "\ 27882(autoload 'tcl-mode "tcl" "\
@@ -27909,7 +27924,7 @@ Prefix argument means invert sense of `tcl-use-smart-word-finder'.
27909 27924
27910;;;*** 27925;;;***
27911 27926
27912;;;### (autoloads (rsh telnet) "telnet" "net/telnet.el" (20119 34052)) 27927;;;### (autoloads (rsh telnet) "telnet" "net/telnet.el" (20077 56412))
27913;;; Generated autoloads from net/telnet.el 27928;;; Generated autoloads from net/telnet.el
27914 27929
27915(autoload 'telnet "telnet" "\ 27930(autoload 'telnet "telnet" "\
@@ -27935,7 +27950,7 @@ Normally input is edited in Emacs and sent a line at a time.
27935;;;*** 27950;;;***
27936 27951
27937;;;### (autoloads (serial-term ansi-term term make-term) "term" "term.el" 27952;;;### (autoloads (serial-term ansi-term term make-term) "term" "term.el"
27938;;;;;; (20119 34052)) 27953;;;;;; (20178 7273))
27939;;; Generated autoloads from term.el 27954;;; Generated autoloads from term.el
27940 27955
27941(autoload 'make-term "term" "\ 27956(autoload 'make-term "term" "\
@@ -27977,8 +27992,8 @@ use in that buffer.
27977 27992
27978;;;*** 27993;;;***
27979 27994
27980;;;### (autoloads (terminal-emulator) "terminal" "terminal.el" (20119 27995;;;### (autoloads (terminal-emulator) "terminal" "terminal.el" (20167
27981;;;;;; 34052)) 27996;;;;;; 36967))
27982;;; Generated autoloads from terminal.el 27997;;; Generated autoloads from terminal.el
27983 27998
27984(autoload 'terminal-emulator "terminal" "\ 27999(autoload 'terminal-emulator "terminal" "\
@@ -28015,7 +28030,7 @@ subprocess started.
28015;;;*** 28030;;;***
28016 28031
28017;;;### (autoloads (testcover-this-defun) "testcover" "emacs-lisp/testcover.el" 28032;;;### (autoloads (testcover-this-defun) "testcover" "emacs-lisp/testcover.el"
28018;;;;;; (20119 34052)) 28033;;;;;; (20172 54913))
28019;;; Generated autoloads from emacs-lisp/testcover.el 28034;;; Generated autoloads from emacs-lisp/testcover.el
28020 28035
28021(autoload 'testcover-this-defun "testcover" "\ 28036(autoload 'testcover-this-defun "testcover" "\
@@ -28025,7 +28040,7 @@ Start coverage on function under point.
28025 28040
28026;;;*** 28041;;;***
28027 28042
28028;;;### (autoloads (tetris) "tetris" "play/tetris.el" (20119 34052)) 28043;;;### (autoloads (tetris) "tetris" "play/tetris.el" (19889 21967))
28029;;; Generated autoloads from play/tetris.el 28044;;; Generated autoloads from play/tetris.el
28030 28045
28031(autoload 'tetris "tetris" "\ 28046(autoload 'tetris "tetris" "\
@@ -28056,7 +28071,7 @@ tetris-mode keybindings:
28056;;;;;; tex-start-commands tex-start-options slitex-run-command latex-run-command 28071;;;;;; tex-start-commands tex-start-options slitex-run-command latex-run-command
28057;;;;;; tex-run-command tex-offer-save tex-main-file tex-first-line-header-regexp 28072;;;;;; tex-run-command tex-offer-save tex-main-file tex-first-line-header-regexp
28058;;;;;; tex-directory tex-shell-file-name) "tex-mode" "textmodes/tex-mode.el" 28073;;;;;; tex-directory tex-shell-file-name) "tex-mode" "textmodes/tex-mode.el"
28059;;;;;; (20134 8463)) 28074;;;;;; (20178 7273))
28060;;; Generated autoloads from textmodes/tex-mode.el 28075;;; Generated autoloads from textmodes/tex-mode.el
28061 28076
28062(defvar tex-shell-file-name nil "\ 28077(defvar tex-shell-file-name nil "\
@@ -28358,7 +28373,7 @@ Major mode to edit DocTeX files.
28358;;;*** 28373;;;***
28359 28374
28360;;;### (autoloads (texi2info texinfo-format-region texinfo-format-buffer) 28375;;;### (autoloads (texi2info texinfo-format-region texinfo-format-buffer)
28361;;;;;; "texinfmt" "textmodes/texinfmt.el" (20119 34052)) 28376;;;;;; "texinfmt" "textmodes/texinfmt.el" (20183 25152))
28362;;; Generated autoloads from textmodes/texinfmt.el 28377;;; Generated autoloads from textmodes/texinfmt.el
28363 28378
28364(autoload 'texinfo-format-buffer "texinfmt" "\ 28379(autoload 'texinfo-format-buffer "texinfmt" "\
@@ -28398,7 +28413,7 @@ if large. You can use `Info-split' to do this manually.
28398;;;*** 28413;;;***
28399 28414
28400;;;### (autoloads (texinfo-mode texinfo-close-quote texinfo-open-quote) 28415;;;### (autoloads (texinfo-mode texinfo-close-quote texinfo-open-quote)
28401;;;;;; "texinfo" "textmodes/texinfo.el" (20119 34052)) 28416;;;;;; "texinfo" "textmodes/texinfo.el" (19845 45374))
28402;;; Generated autoloads from textmodes/texinfo.el 28417;;; Generated autoloads from textmodes/texinfo.el
28403 28418
28404(defvar texinfo-open-quote (purecopy "``") "\ 28419(defvar texinfo-open-quote (purecopy "``") "\
@@ -28484,7 +28499,7 @@ value of `texinfo-mode-hook'.
28484 28499
28485;;;### (autoloads (thai-composition-function thai-compose-buffer 28500;;;### (autoloads (thai-composition-function thai-compose-buffer
28486;;;;;; thai-compose-string thai-compose-region) "thai-util" "language/thai-util.el" 28501;;;;;; thai-compose-string thai-compose-region) "thai-util" "language/thai-util.el"
28487;;;;;; (20119 34052)) 28502;;;;;; (20168 57844))
28488;;; Generated autoloads from language/thai-util.el 28503;;; Generated autoloads from language/thai-util.el
28489 28504
28490(autoload 'thai-compose-region "thai-util" "\ 28505(autoload 'thai-compose-region "thai-util" "\
@@ -28513,7 +28528,7 @@ Compose Thai characters in the current buffer.
28513 28528
28514;;;### (autoloads (list-at-point number-at-point symbol-at-point 28529;;;### (autoloads (list-at-point number-at-point symbol-at-point
28515;;;;;; sexp-at-point thing-at-point bounds-of-thing-at-point forward-thing) 28530;;;;;; sexp-at-point thing-at-point bounds-of-thing-at-point forward-thing)
28516;;;;;; "thingatpt" "thingatpt.el" (20119 34052)) 28531;;;;;; "thingatpt" "thingatpt.el" (19990 55648))
28517;;; Generated autoloads from thingatpt.el 28532;;; Generated autoloads from thingatpt.el
28518 28533
28519(autoload 'forward-thing "thingatpt" "\ 28534(autoload 'forward-thing "thingatpt" "\
@@ -28576,7 +28591,7 @@ Return the Lisp list at point, or nil if none is found.
28576 28591
28577;;;### (autoloads (thumbs-dired-setroot thumbs-dired-show thumbs-dired-show-marked 28592;;;### (autoloads (thumbs-dired-setroot thumbs-dired-show thumbs-dired-show-marked
28578;;;;;; thumbs-show-from-dir thumbs-find-thumb) "thumbs" "thumbs.el" 28593;;;;;; thumbs-show-from-dir thumbs-find-thumb) "thumbs" "thumbs.el"
28579;;;;;; (20119 34052)) 28594;;;;;; (20168 57844))
28580;;; Generated autoloads from thumbs.el 28595;;; Generated autoloads from thumbs.el
28581 28596
28582(autoload 'thumbs-find-thumb "thumbs" "\ 28597(autoload 'thumbs-find-thumb "thumbs" "\
@@ -28614,8 +28629,8 @@ In dired, call the setroot program on the image at point.
28614;;;;;; tibetan-post-read-conversion tibetan-compose-buffer tibetan-decompose-buffer 28629;;;;;; tibetan-post-read-conversion tibetan-compose-buffer tibetan-decompose-buffer
28615;;;;;; tibetan-decompose-string tibetan-decompose-region tibetan-compose-region 28630;;;;;; tibetan-decompose-string tibetan-decompose-region tibetan-compose-region
28616;;;;;; tibetan-compose-string tibetan-transcription-to-tibetan tibetan-tibetan-to-transcription 28631;;;;;; tibetan-compose-string tibetan-transcription-to-tibetan tibetan-tibetan-to-transcription
28617;;;;;; tibetan-char-p) "tibet-util" "language/tibet-util.el" (20119 28632;;;;;; tibetan-char-p) "tibet-util" "language/tibet-util.el" (20175
28618;;;;;; 34052)) 28633;;;;;; 31160))
28619;;; Generated autoloads from language/tibet-util.el 28634;;; Generated autoloads from language/tibet-util.el
28620 28635
28621(autoload 'tibetan-char-p "tibet-util" "\ 28636(autoload 'tibetan-char-p "tibet-util" "\
@@ -28689,7 +28704,7 @@ See also docstring of the function tibetan-compose-region.
28689;;;*** 28704;;;***
28690 28705
28691;;;### (autoloads (tildify-buffer tildify-region) "tildify" "textmodes/tildify.el" 28706;;;### (autoloads (tildify-buffer tildify-region) "tildify" "textmodes/tildify.el"
28692;;;;;; (20119 34052)) 28707;;;;;; (19845 45374))
28693;;; Generated autoloads from textmodes/tildify.el 28708;;; Generated autoloads from textmodes/tildify.el
28694 28709
28695(autoload 'tildify-region "tildify" "\ 28710(autoload 'tildify-region "tildify" "\
@@ -28714,7 +28729,7 @@ This function performs no refilling of the changed text.
28714 28729
28715;;;### (autoloads (emacs-init-time emacs-uptime display-time-world 28730;;;### (autoloads (emacs-init-time emacs-uptime display-time-world
28716;;;;;; display-time-mode display-time display-time-day-and-date) 28731;;;;;; display-time-mode display-time display-time-day-and-date)
28717;;;;;; "time" "time.el" (20126 50604)) 28732;;;;;; "time" "time.el" (20127 62865))
28718;;; Generated autoloads from time.el 28733;;; Generated autoloads from time.el
28719 28734
28720(defvar display-time-day-and-date nil "\ 28735(defvar display-time-day-and-date nil "\
@@ -28780,7 +28795,7 @@ Return a string giving the duration of the Emacs initialization.
28780;;;;;; time-to-day-in-year date-leap-year-p days-between date-to-day 28795;;;;;; time-to-day-in-year date-leap-year-p days-between date-to-day
28781;;;;;; time-add time-subtract time-since days-to-time time-less-p 28796;;;;;; time-add time-subtract time-since days-to-time time-less-p
28782;;;;;; seconds-to-time date-to-time) "time-date" "calendar/time-date.el" 28797;;;;;; seconds-to-time date-to-time) "time-date" "calendar/time-date.el"
28783;;;;;; (20119 34052)) 28798;;;;;; (19885 24894))
28784;;; Generated autoloads from calendar/time-date.el 28799;;; Generated autoloads from calendar/time-date.el
28785 28800
28786(autoload 'date-to-time "time-date" "\ 28801(autoload 'date-to-time "time-date" "\
@@ -28894,7 +28909,7 @@ This function does not work for SECONDS greater than `most-positive-fixnum'.
28894;;;*** 28909;;;***
28895 28910
28896;;;### (autoloads (time-stamp-toggle-active time-stamp) "time-stamp" 28911;;;### (autoloads (time-stamp-toggle-active time-stamp) "time-stamp"
28897;;;;;; "time-stamp.el" (20119 34052)) 28912;;;;;; "time-stamp.el" (20033 22846))
28898;;; Generated autoloads from time-stamp.el 28913;;; Generated autoloads from time-stamp.el
28899(put 'time-stamp-format 'safe-local-variable 'stringp) 28914(put 'time-stamp-format 'safe-local-variable 'stringp)
28900(put 'time-stamp-time-zone 'safe-local-variable 'string-or-null-p) 28915(put 'time-stamp-time-zone 'safe-local-variable 'string-or-null-p)
@@ -28938,7 +28953,7 @@ With ARG, turn time stamping on if and only if arg is positive.
28938;;;;;; timeclock-workday-remaining-string timeclock-reread-log timeclock-query-out 28953;;;;;; timeclock-workday-remaining-string timeclock-reread-log timeclock-query-out
28939;;;;;; timeclock-change timeclock-status-string timeclock-out timeclock-in 28954;;;;;; timeclock-change timeclock-status-string timeclock-out timeclock-in
28940;;;;;; timeclock-modeline-display) "timeclock" "calendar/timeclock.el" 28955;;;;;; timeclock-modeline-display) "timeclock" "calendar/timeclock.el"
28941;;;;;; (20119 34052)) 28956;;;;;; (20165 31925))
28942;;; Generated autoloads from calendar/timeclock.el 28957;;; Generated autoloads from calendar/timeclock.el
28943 28958
28944(autoload 'timeclock-modeline-display "timeclock" "\ 28959(autoload 'timeclock-modeline-display "timeclock" "\
@@ -29038,7 +29053,7 @@ relative only to the time worked today, and not to past time.
29038;;;*** 29053;;;***
29039 29054
29040;;;### (autoloads (batch-titdic-convert titdic-convert) "titdic-cnv" 29055;;;### (autoloads (batch-titdic-convert titdic-convert) "titdic-cnv"
29041;;;;;; "international/titdic-cnv.el" (20119 34052)) 29056;;;;;; "international/titdic-cnv.el" (20175 31160))
29042;;; Generated autoloads from international/titdic-cnv.el 29057;;; Generated autoloads from international/titdic-cnv.el
29043 29058
29044(autoload 'titdic-convert "titdic-cnv" "\ 29059(autoload 'titdic-convert "titdic-cnv" "\
@@ -29061,7 +29076,7 @@ To get complete usage, invoke \"emacs -batch -f batch-titdic-convert -h\".
29061;;;*** 29076;;;***
29062 29077
29063;;;### (autoloads (tmm-prompt tmm-menubar-mouse tmm-menubar) "tmm" 29078;;;### (autoloads (tmm-prompt tmm-menubar-mouse tmm-menubar) "tmm"
29064;;;;;; "tmm.el" (20119 34052)) 29079;;;;;; "tmm.el" (20163 39903))
29065;;; Generated autoloads from tmm.el 29080;;; Generated autoloads from tmm.el
29066 (define-key global-map "\M-`" 'tmm-menubar) 29081 (define-key global-map "\M-`" 'tmm-menubar)
29067 (define-key global-map [menu-bar mouse-1] 'tmm-menubar-mouse) 29082 (define-key global-map [menu-bar mouse-1] 'tmm-menubar-mouse)
@@ -29101,7 +29116,7 @@ Its value should be an event that has a binding in MENU.
29101 29116
29102;;;### (autoloads (todo-show todo-cp todo-mode todo-print todo-top-priorities 29117;;;### (autoloads (todo-show todo-cp todo-mode todo-print todo-top-priorities
29103;;;;;; todo-insert-item todo-add-item-non-interactively todo-add-category) 29118;;;;;; todo-insert-item todo-add-item-non-interactively todo-add-category)
29104;;;;;; "todo-mode" "calendar/todo-mode.el" (20119 34052)) 29119;;;;;; "todo-mode" "calendar/todo-mode.el" (20168 57844))
29105;;; Generated autoloads from calendar/todo-mode.el 29120;;; Generated autoloads from calendar/todo-mode.el
29106 29121
29107(autoload 'todo-add-category "todo-mode" "\ 29122(autoload 'todo-add-category "todo-mode" "\
@@ -29161,7 +29176,7 @@ Show TODO list.
29161 29176
29162;;;### (autoloads (tool-bar-local-item-from-menu tool-bar-add-item-from-menu 29177;;;### (autoloads (tool-bar-local-item-from-menu tool-bar-add-item-from-menu
29163;;;;;; tool-bar-local-item tool-bar-add-item toggle-tool-bar-mode-from-frame) 29178;;;;;; tool-bar-local-item tool-bar-add-item toggle-tool-bar-mode-from-frame)
29164;;;;;; "tool-bar" "tool-bar.el" (20126 50619)) 29179;;;;;; "tool-bar" "tool-bar.el" (20127 62865))
29165;;; Generated autoloads from tool-bar.el 29180;;; Generated autoloads from tool-bar.el
29166 29181
29167(autoload 'toggle-tool-bar-mode-from-frame "tool-bar" "\ 29182(autoload 'toggle-tool-bar-mode-from-frame "tool-bar" "\
@@ -29232,7 +29247,7 @@ holds a keymap.
29232;;;*** 29247;;;***
29233 29248
29234;;;### (autoloads (tpu-edt-on tpu-edt-mode) "tpu-edt" "emulation/tpu-edt.el" 29249;;;### (autoloads (tpu-edt-on tpu-edt-mode) "tpu-edt" "emulation/tpu-edt.el"
29235;;;;;; (20140 44316)) 29250;;;;;; (20141 9296))
29236;;; Generated autoloads from emulation/tpu-edt.el 29251;;; Generated autoloads from emulation/tpu-edt.el
29237 29252
29238(defvar tpu-edt-mode nil "\ 29253(defvar tpu-edt-mode nil "\
@@ -29259,7 +29274,7 @@ Turn on TPU/edt emulation.
29259;;;*** 29274;;;***
29260 29275
29261;;;### (autoloads (tpu-mapper) "tpu-mapper" "emulation/tpu-mapper.el" 29276;;;### (autoloads (tpu-mapper) "tpu-mapper" "emulation/tpu-mapper.el"
29262;;;;;; (20119 34052)) 29277;;;;;; (19845 45374))
29263;;; Generated autoloads from emulation/tpu-mapper.el 29278;;; Generated autoloads from emulation/tpu-mapper.el
29264 29279
29265(autoload 'tpu-mapper "tpu-mapper" "\ 29280(autoload 'tpu-mapper "tpu-mapper" "\
@@ -29293,7 +29308,7 @@ your local X guru can try to figure out why the key is being ignored.
29293 29308
29294;;;*** 29309;;;***
29295 29310
29296;;;### (autoloads (tq-create) "tq" "emacs-lisp/tq.el" (20119 34052)) 29311;;;### (autoloads (tq-create) "tq" "emacs-lisp/tq.el" (19845 45374))
29297;;; Generated autoloads from emacs-lisp/tq.el 29312;;; Generated autoloads from emacs-lisp/tq.el
29298 29313
29299(autoload 'tq-create "tq" "\ 29314(autoload 'tq-create "tq" "\
@@ -29307,7 +29322,7 @@ to a tcp server on another machine.
29307;;;*** 29322;;;***
29308 29323
29309;;;### (autoloads (trace-function-background trace-function trace-buffer) 29324;;;### (autoloads (trace-function-background trace-function trace-buffer)
29310;;;;;; "trace" "emacs-lisp/trace.el" (20119 34052)) 29325;;;;;; "trace" "emacs-lisp/trace.el" (19845 45374))
29311;;; Generated autoloads from emacs-lisp/trace.el 29326;;; Generated autoloads from emacs-lisp/trace.el
29312 29327
29313(defvar trace-buffer (purecopy "*trace-output*") "\ 29328(defvar trace-buffer (purecopy "*trace-output*") "\
@@ -29344,7 +29359,7 @@ BUFFER defaults to `trace-buffer'.
29344;;;### (autoloads (tramp-unload-tramp tramp-completion-handle-file-name-completion 29359;;;### (autoloads (tramp-unload-tramp tramp-completion-handle-file-name-completion
29345;;;;;; tramp-completion-handle-file-name-all-completions tramp-unload-file-name-handlers 29360;;;;;; tramp-completion-handle-file-name-all-completions tramp-unload-file-name-handlers
29346;;;;;; tramp-file-name-handler tramp-syntax tramp-mode) "tramp" 29361;;;;;; tramp-file-name-handler tramp-syntax tramp-mode) "tramp"
29347;;;;;; "net/tramp.el" (20127 27092)) 29362;;;;;; "net/tramp.el" (20179 28130))
29348;;; Generated autoloads from net/tramp.el 29363;;; Generated autoloads from net/tramp.el
29349 29364
29350(defvar tramp-mode t "\ 29365(defvar tramp-mode t "\
@@ -29477,7 +29492,7 @@ Discard Tramp from loading remote files.
29477;;;*** 29492;;;***
29478 29493
29479;;;### (autoloads (tramp-ftp-enable-ange-ftp) "tramp-ftp" "net/tramp-ftp.el" 29494;;;### (autoloads (tramp-ftp-enable-ange-ftp) "tramp-ftp" "net/tramp-ftp.el"
29480;;;;;; (20119 34052)) 29495;;;;;; (19946 29209))
29481;;; Generated autoloads from net/tramp-ftp.el 29496;;; Generated autoloads from net/tramp-ftp.el
29482 29497
29483(autoload 'tramp-ftp-enable-ange-ftp "tramp-ftp" "\ 29498(autoload 'tramp-ftp-enable-ange-ftp "tramp-ftp" "\
@@ -29487,8 +29502,8 @@ Discard Tramp from loading remote files.
29487 29502
29488;;;*** 29503;;;***
29489 29504
29490;;;### (autoloads (help-with-tutorial) "tutorial" "tutorial.el" (20140 29505;;;### (autoloads (help-with-tutorial) "tutorial" "tutorial.el" (20176
29491;;;;;; 41907)) 29506;;;;;; 51947))
29492;;; Generated autoloads from tutorial.el 29507;;; Generated autoloads from tutorial.el
29493 29508
29494(autoload 'help-with-tutorial "tutorial" "\ 29509(autoload 'help-with-tutorial "tutorial" "\
@@ -29513,7 +29528,7 @@ resumed later.
29513;;;*** 29528;;;***
29514 29529
29515;;;### (autoloads (tai-viet-composition-function) "tv-util" "language/tv-util.el" 29530;;;### (autoloads (tai-viet-composition-function) "tv-util" "language/tv-util.el"
29516;;;;;; (20119 34052)) 29531;;;;;; (19845 45374))
29517;;; Generated autoloads from language/tv-util.el 29532;;; Generated autoloads from language/tv-util.el
29518 29533
29519(autoload 'tai-viet-composition-function "tv-util" "\ 29534(autoload 'tai-viet-composition-function "tv-util" "\
@@ -29524,7 +29539,7 @@ resumed later.
29524;;;*** 29539;;;***
29525 29540
29526;;;### (autoloads (2C-split 2C-associate-buffer 2C-two-columns) "two-column" 29541;;;### (autoloads (2C-split 2C-associate-buffer 2C-two-columns) "two-column"
29527;;;;;; "textmodes/two-column.el" (20140 44080)) 29542;;;;;; "textmodes/two-column.el" (20141 9296))
29528;;; Generated autoloads from textmodes/two-column.el 29543;;; Generated autoloads from textmodes/two-column.el
29529 (autoload '2C-command "two-column" () t 'keymap) 29544 (autoload '2C-command "two-column" () t 'keymap)
29530 (global-set-key "\C-x6" '2C-command) 29545 (global-set-key "\C-x6" '2C-command)
@@ -29575,7 +29590,7 @@ First column's text sSs Second column's text
29575;;;;;; type-break type-break-mode type-break-keystroke-threshold 29590;;;;;; type-break type-break-mode type-break-keystroke-threshold
29576;;;;;; type-break-good-break-interval type-break-good-rest-interval 29591;;;;;; type-break-good-break-interval type-break-good-rest-interval
29577;;;;;; type-break-interval type-break-mode) "type-break" "type-break.el" 29592;;;;;; type-break-interval type-break-mode) "type-break" "type-break.el"
29578;;;;;; (20126 50662)) 29593;;;;;; (20127 62865))
29579;;; Generated autoloads from type-break.el 29594;;; Generated autoloads from type-break.el
29580 29595
29581(defvar type-break-mode nil "\ 29596(defvar type-break-mode nil "\
@@ -29757,7 +29772,7 @@ FRAC should be the inverse of the fractional value; for example, a value of
29757 29772
29758;;;*** 29773;;;***
29759 29774
29760;;;### (autoloads (uce-reply-to-uce) "uce" "mail/uce.el" (20119 34052)) 29775;;;### (autoloads (uce-reply-to-uce) "uce" "mail/uce.el" (19845 45374))
29761;;; Generated autoloads from mail/uce.el 29776;;; Generated autoloads from mail/uce.el
29762 29777
29763(autoload 'uce-reply-to-uce "uce" "\ 29778(autoload 'uce-reply-to-uce "uce" "\
@@ -29775,7 +29790,7 @@ You might need to set `uce-mail-reader' before using this.
29775;;;;;; ucs-normalize-NFKC-string ucs-normalize-NFKC-region ucs-normalize-NFKD-string 29790;;;;;; ucs-normalize-NFKC-string ucs-normalize-NFKC-region ucs-normalize-NFKD-string
29776;;;;;; ucs-normalize-NFKD-region ucs-normalize-NFC-string ucs-normalize-NFC-region 29791;;;;;; ucs-normalize-NFKD-region ucs-normalize-NFC-string ucs-normalize-NFC-region
29777;;;;;; ucs-normalize-NFD-string ucs-normalize-NFD-region) "ucs-normalize" 29792;;;;;; ucs-normalize-NFD-string ucs-normalize-NFD-region) "ucs-normalize"
29778;;;;;; "international/ucs-normalize.el" (20119 34052)) 29793;;;;;; "international/ucs-normalize.el" (20052 53218))
29779;;; Generated autoloads from international/ucs-normalize.el 29794;;; Generated autoloads from international/ucs-normalize.el
29780 29795
29781(autoload 'ucs-normalize-NFD-region "ucs-normalize" "\ 29796(autoload 'ucs-normalize-NFD-region "ucs-normalize" "\
@@ -29841,7 +29856,7 @@ Normalize the string STR by the Unicode NFC and Mac OS's HFS Plus.
29841;;;*** 29856;;;***
29842 29857
29843;;;### (autoloads (ununderline-region underline-region) "underline" 29858;;;### (autoloads (ununderline-region underline-region) "underline"
29844;;;;;; "textmodes/underline.el" (20119 34052)) 29859;;;;;; "textmodes/underline.el" (19845 45374))
29845;;; Generated autoloads from textmodes/underline.el 29860;;; Generated autoloads from textmodes/underline.el
29846 29861
29847(autoload 'underline-region "underline" "\ 29862(autoload 'underline-region "underline" "\
@@ -29862,7 +29877,7 @@ which specify the range to operate on.
29862;;;*** 29877;;;***
29863 29878
29864;;;### (autoloads (unrmail batch-unrmail) "unrmail" "mail/unrmail.el" 29879;;;### (autoloads (unrmail batch-unrmail) "unrmail" "mail/unrmail.el"
29865;;;;;; (20119 34052)) 29880;;;;;; (20172 54913))
29866;;; Generated autoloads from mail/unrmail.el 29881;;; Generated autoloads from mail/unrmail.el
29867 29882
29868(autoload 'batch-unrmail "unrmail" "\ 29883(autoload 'batch-unrmail "unrmail" "\
@@ -29881,8 +29896,8 @@ Convert old-style Rmail Babyl file FILE to system inbox format file TO-FILE.
29881 29896
29882;;;*** 29897;;;***
29883 29898
29884;;;### (autoloads (unsafep) "unsafep" "emacs-lisp/unsafep.el" (20119 29899;;;### (autoloads (unsafep) "unsafep" "emacs-lisp/unsafep.el" (19845
29885;;;;;; 34052)) 29900;;;;;; 45374))
29886;;; Generated autoloads from emacs-lisp/unsafep.el 29901;;; Generated autoloads from emacs-lisp/unsafep.el
29887 29902
29888(autoload 'unsafep "unsafep" "\ 29903(autoload 'unsafep "unsafep" "\
@@ -29895,7 +29910,7 @@ UNSAFEP-VARS is a list of symbols with local bindings.
29895;;;*** 29910;;;***
29896 29911
29897;;;### (autoloads (url-retrieve-synchronously url-retrieve) "url" 29912;;;### (autoloads (url-retrieve-synchronously url-retrieve) "url"
29898;;;;;; "url/url.el" (20119 34052)) 29913;;;;;; "url/url.el" (20162 19074))
29899;;; Generated autoloads from url/url.el 29914;;; Generated autoloads from url/url.el
29900 29915
29901(autoload 'url-retrieve "url" "\ 29916(autoload 'url-retrieve "url" "\
@@ -29937,7 +29952,7 @@ no further processing). URL is either a string or a parsed URL.
29937;;;*** 29952;;;***
29938 29953
29939;;;### (autoloads (url-register-auth-scheme url-get-authentication) 29954;;;### (autoloads (url-register-auth-scheme url-get-authentication)
29940;;;;;; "url-auth" "url/url-auth.el" (20119 34052)) 29955;;;;;; "url-auth" "url/url-auth.el" (19845 45374))
29941;;; Generated autoloads from url/url-auth.el 29956;;; Generated autoloads from url/url-auth.el
29942 29957
29943(autoload 'url-get-authentication "url-auth" "\ 29958(autoload 'url-get-authentication "url-auth" "\
@@ -29979,7 +29994,7 @@ RATING a rating between 1 and 10 of the strength of the authentication.
29979;;;*** 29994;;;***
29980 29995
29981;;;### (autoloads (url-cache-extract url-is-cached url-store-in-cache) 29996;;;### (autoloads (url-cache-extract url-is-cached url-store-in-cache)
29982;;;;;; "url-cache" "url/url-cache.el" (20119 34052)) 29997;;;;;; "url-cache" "url/url-cache.el" (19988 13913))
29983;;; Generated autoloads from url/url-cache.el 29998;;; Generated autoloads from url/url-cache.el
29984 29999
29985(autoload 'url-store-in-cache "url-cache" "\ 30000(autoload 'url-store-in-cache "url-cache" "\
@@ -30000,7 +30015,7 @@ Extract FNAM from the local disk cache.
30000 30015
30001;;;*** 30016;;;***
30002 30017
30003;;;### (autoloads (url-cid) "url-cid" "url/url-cid.el" (20119 34052)) 30018;;;### (autoloads (url-cid) "url-cid" "url/url-cid.el" (19845 45374))
30004;;; Generated autoloads from url/url-cid.el 30019;;; Generated autoloads from url/url-cid.el
30005 30020
30006(autoload 'url-cid "url-cid" "\ 30021(autoload 'url-cid "url-cid" "\
@@ -30011,7 +30026,7 @@ Extract FNAM from the local disk cache.
30011;;;*** 30026;;;***
30012 30027
30013;;;### (autoloads (url-dav-vc-registered url-dav-supported-p) "url-dav" 30028;;;### (autoloads (url-dav-vc-registered url-dav-supported-p) "url-dav"
30014;;;;;; "url/url-dav.el" (20119 34052)) 30029;;;;;; "url/url-dav.el" (20168 57844))
30015;;; Generated autoloads from url/url-dav.el 30030;;; Generated autoloads from url/url-dav.el
30016 30031
30017(autoload 'url-dav-supported-p "url-dav" "\ 30032(autoload 'url-dav-supported-p "url-dav" "\
@@ -30026,8 +30041,8 @@ Extract FNAM from the local disk cache.
30026 30041
30027;;;*** 30042;;;***
30028 30043
30029;;;### (autoloads (url-file) "url-file" "url/url-file.el" (20119 30044;;;### (autoloads (url-file) "url-file" "url/url-file.el" (19845
30030;;;;;; 34052)) 30045;;;;;; 45374))
30031;;; Generated autoloads from url/url-file.el 30046;;; Generated autoloads from url/url-file.el
30032 30047
30033(autoload 'url-file "url-file" "\ 30048(autoload 'url-file "url-file" "\
@@ -30038,7 +30053,7 @@ Handle file: and ftp: URLs.
30038;;;*** 30053;;;***
30039 30054
30040;;;### (autoloads (url-open-stream url-gateway-nslookup-host) "url-gw" 30055;;;### (autoloads (url-open-stream url-gateway-nslookup-host) "url-gw"
30041;;;;;; "url/url-gw.el" (20119 34052)) 30056;;;;;; "url/url-gw.el" (19864 29553))
30042;;; Generated autoloads from url/url-gw.el 30057;;; Generated autoloads from url/url-gw.el
30043 30058
30044(autoload 'url-gateway-nslookup-host "url-gw" "\ 30059(autoload 'url-gateway-nslookup-host "url-gw" "\
@@ -30058,7 +30073,7 @@ Might do a non-blocking connection; use `process-status' to check.
30058 30073
30059;;;### (autoloads (url-insert-file-contents url-file-local-copy url-copy-file 30074;;;### (autoloads (url-insert-file-contents url-file-local-copy url-copy-file
30060;;;;;; url-file-handler url-handler-mode) "url-handlers" "url/url-handlers.el" 30075;;;;;; url-file-handler url-handler-mode) "url-handlers" "url/url-handlers.el"
30061;;;;;; (20127 23866)) 30076;;;;;; (20127 62865))
30062;;; Generated autoloads from url/url-handlers.el 30077;;; Generated autoloads from url/url-handlers.el
30063 30078
30064(defvar url-handler-mode nil "\ 30079(defvar url-handler-mode nil "\
@@ -30113,7 +30128,7 @@ accessible.
30113;;;*** 30128;;;***
30114 30129
30115;;;### (autoloads (url-http-options url-http-file-attributes url-http-file-exists-p 30130;;;### (autoloads (url-http-options url-http-file-attributes url-http-file-exists-p
30116;;;;;; url-http) "url-http" "url/url-http.el" (20119 34052)) 30131;;;;;; url-http) "url-http" "url/url-http.el" (20167 36967))
30117;;; Generated autoloads from url/url-http.el 30132;;; Generated autoloads from url/url-http.el
30118 30133
30119(autoload 'url-http "url-http" "\ 30134(autoload 'url-http "url-http" "\
@@ -30179,7 +30194,7 @@ HTTPS retrievals are asynchronous.")
30179 30194
30180;;;*** 30195;;;***
30181 30196
30182;;;### (autoloads (url-irc) "url-irc" "url/url-irc.el" (20119 34052)) 30197;;;### (autoloads (url-irc) "url-irc" "url/url-irc.el" (19845 45374))
30183;;; Generated autoloads from url/url-irc.el 30198;;; Generated autoloads from url/url-irc.el
30184 30199
30185(autoload 'url-irc "url-irc" "\ 30200(autoload 'url-irc "url-irc" "\
@@ -30189,8 +30204,8 @@ HTTPS retrievals are asynchronous.")
30189 30204
30190;;;*** 30205;;;***
30191 30206
30192;;;### (autoloads (url-ldap) "url-ldap" "url/url-ldap.el" (20119 30207;;;### (autoloads (url-ldap) "url-ldap" "url/url-ldap.el" (20164
30193;;;;;; 34052)) 30208;;;;;; 60780))
30194;;; Generated autoloads from url/url-ldap.el 30209;;; Generated autoloads from url/url-ldap.el
30195 30210
30196(autoload 'url-ldap "url-ldap" "\ 30211(autoload 'url-ldap "url-ldap" "\
@@ -30204,7 +30219,7 @@ URL can be a URL string, or a URL vector of the type returned by
30204;;;*** 30219;;;***
30205 30220
30206;;;### (autoloads (url-mailto url-mail) "url-mailto" "url/url-mailto.el" 30221;;;### (autoloads (url-mailto url-mail) "url-mailto" "url/url-mailto.el"
30207;;;;;; (20119 34052)) 30222;;;;;; (19845 45374))
30208;;; Generated autoloads from url/url-mailto.el 30223;;; Generated autoloads from url/url-mailto.el
30209 30224
30210(autoload 'url-mail "url-mailto" "\ 30225(autoload 'url-mail "url-mailto" "\
@@ -30220,7 +30235,7 @@ Handle the mailto: URL syntax.
30220;;;*** 30235;;;***
30221 30236
30222;;;### (autoloads (url-data url-generic-emulator-loader url-info 30237;;;### (autoloads (url-data url-generic-emulator-loader url-info
30223;;;;;; url-man) "url-misc" "url/url-misc.el" (20119 34052)) 30238;;;;;; url-man) "url-misc" "url/url-misc.el" (19845 45374))
30224;;; Generated autoloads from url/url-misc.el 30239;;; Generated autoloads from url/url-misc.el
30225 30240
30226(autoload 'url-man "url-misc" "\ 30241(autoload 'url-man "url-misc" "\
@@ -30252,7 +30267,7 @@ Fetch a data URL (RFC 2397).
30252;;;*** 30267;;;***
30253 30268
30254;;;### (autoloads (url-snews url-news) "url-news" "url/url-news.el" 30269;;;### (autoloads (url-snews url-news) "url-news" "url/url-news.el"
30255;;;;;; (20119 34052)) 30270;;;;;; (19845 45374))
30256;;; Generated autoloads from url/url-news.el 30271;;; Generated autoloads from url/url-news.el
30257 30272
30258(autoload 'url-news "url-news" "\ 30273(autoload 'url-news "url-news" "\
@@ -30269,7 +30284,7 @@ Fetch a data URL (RFC 2397).
30269 30284
30270;;;### (autoloads (url-ns-user-pref url-ns-prefs isInNet isResolvable 30285;;;### (autoloads (url-ns-user-pref url-ns-prefs isInNet isResolvable
30271;;;;;; dnsResolve dnsDomainIs isPlainHostName) "url-ns" "url/url-ns.el" 30286;;;;;; dnsResolve dnsDomainIs isPlainHostName) "url-ns" "url/url-ns.el"
30272;;;;;; (20119 34052)) 30287;;;;;; (19845 45374))
30273;;; Generated autoloads from url/url-ns.el 30288;;; Generated autoloads from url/url-ns.el
30274 30289
30275(autoload 'isPlainHostName "url-ns" "\ 30290(autoload 'isPlainHostName "url-ns" "\
@@ -30310,7 +30325,7 @@ Fetch a data URL (RFC 2397).
30310;;;*** 30325;;;***
30311 30326
30312;;;### (autoloads (url-generic-parse-url url-recreate-url) "url-parse" 30327;;;### (autoloads (url-generic-parse-url url-recreate-url) "url-parse"
30313;;;;;; "url/url-parse.el" (20119 34052)) 30328;;;;;; "url/url-parse.el" (19845 45374))
30314;;; Generated autoloads from url/url-parse.el 30329;;; Generated autoloads from url/url-parse.el
30315 30330
30316(autoload 'url-recreate-url "url-parse" "\ 30331(autoload 'url-recreate-url "url-parse" "\
@@ -30328,7 +30343,7 @@ TYPE USER PASSWORD HOST PORTSPEC FILENAME TARGET ATTRIBUTES FULLNESS.
30328;;;*** 30343;;;***
30329 30344
30330;;;### (autoloads (url-setup-privacy-info) "url-privacy" "url/url-privacy.el" 30345;;;### (autoloads (url-setup-privacy-info) "url-privacy" "url/url-privacy.el"
30331;;;;;; (20119 34052)) 30346;;;;;; (19845 45374))
30332;;; Generated autoloads from url/url-privacy.el 30347;;; Generated autoloads from url/url-privacy.el
30333 30348
30334(autoload 'url-setup-privacy-info "url-privacy" "\ 30349(autoload 'url-setup-privacy-info "url-privacy" "\
@@ -30339,7 +30354,7 @@ Setup variables that expose info about you and your system.
30339;;;*** 30354;;;***
30340 30355
30341;;;### (autoloads (url-queue-retrieve) "url-queue" "url/url-queue.el" 30356;;;### (autoloads (url-queue-retrieve) "url-queue" "url/url-queue.el"
30342;;;;;; (20119 34052)) 30357;;;;;; (19943 25429))
30343;;; Generated autoloads from url/url-queue.el 30358;;; Generated autoloads from url/url-queue.el
30344 30359
30345(autoload 'url-queue-retrieve "url-queue" "\ 30360(autoload 'url-queue-retrieve "url-queue" "\
@@ -30358,7 +30373,7 @@ controls the level of parallelism via the
30358;;;;;; url-pretty-length url-strip-leading-spaces url-eat-trailing-space 30373;;;;;; url-pretty-length url-strip-leading-spaces url-eat-trailing-space
30359;;;;;; url-get-normalized-date url-lazy-message url-normalize-url 30374;;;;;; url-get-normalized-date url-lazy-message url-normalize-url
30360;;;;;; url-insert-entities-in-string url-parse-args url-debug url-debug) 30375;;;;;; url-insert-entities-in-string url-parse-args url-debug url-debug)
30361;;;;;; "url-util" "url/url-util.el" (20119 34052)) 30376;;;;;; "url-util" "url/url-util.el" (19867 59212))
30362;;; Generated autoloads from url/url-util.el 30377;;; Generated autoloads from url/url-util.el
30363 30378
30364(defvar url-debug nil "\ 30379(defvar url-debug nil "\
@@ -30494,7 +30509,7 @@ This uses `url-current-object', set locally to the buffer.
30494;;;*** 30509;;;***
30495 30510
30496;;;### (autoloads (ask-user-about-supersession-threat ask-user-about-lock) 30511;;;### (autoloads (ask-user-about-supersession-threat ask-user-about-lock)
30497;;;;;; "userlock" "userlock.el" (20119 34052)) 30512;;;;;; "userlock" "userlock.el" (19845 45374))
30498;;; Generated autoloads from userlock.el 30513;;; Generated autoloads from userlock.el
30499 30514
30500(autoload 'ask-user-about-lock "userlock" "\ 30515(autoload 'ask-user-about-lock "userlock" "\
@@ -30524,7 +30539,7 @@ The buffer in question is current when this function is called.
30524 30539
30525;;;### (autoloads (utf-7-imap-pre-write-conversion utf-7-pre-write-conversion 30540;;;### (autoloads (utf-7-imap-pre-write-conversion utf-7-pre-write-conversion
30526;;;;;; utf-7-imap-post-read-conversion utf-7-post-read-conversion) 30541;;;;;; utf-7-imap-post-read-conversion utf-7-post-read-conversion)
30527;;;;;; "utf-7" "international/utf-7.el" (20119 34052)) 30542;;;;;; "utf-7" "international/utf-7.el" (19845 45374))
30528;;; Generated autoloads from international/utf-7.el 30543;;; Generated autoloads from international/utf-7.el
30529 30544
30530(autoload 'utf-7-post-read-conversion "utf-7" "\ 30545(autoload 'utf-7-post-read-conversion "utf-7" "\
@@ -30549,7 +30564,7 @@ The buffer in question is current when this function is called.
30549 30564
30550;;;*** 30565;;;***
30551 30566
30552;;;### (autoloads (utf7-encode) "utf7" "gnus/utf7.el" (20119 34052)) 30567;;;### (autoloads (utf7-encode) "utf7" "gnus/utf7.el" (19845 45374))
30553;;; Generated autoloads from gnus/utf7.el 30568;;; Generated autoloads from gnus/utf7.el
30554 30569
30555(autoload 'utf7-encode "utf7" "\ 30570(autoload 'utf7-encode "utf7" "\
@@ -30561,7 +30576,7 @@ Encode UTF-7 STRING. Use IMAP modification if FOR-IMAP is non-nil.
30561 30576
30562;;;### (autoloads (uudecode-decode-region uudecode-decode-region-internal 30577;;;### (autoloads (uudecode-decode-region uudecode-decode-region-internal
30563;;;;;; uudecode-decode-region-external) "uudecode" "mail/uudecode.el" 30578;;;;;; uudecode-decode-region-external) "uudecode" "mail/uudecode.el"
30564;;;;;; (20119 34052)) 30579;;;;;; (19845 45374))
30565;;; Generated autoloads from mail/uudecode.el 30580;;; Generated autoloads from mail/uudecode.el
30566 30581
30567(autoload 'uudecode-decode-region-external "uudecode" "\ 30582(autoload 'uudecode-decode-region-external "uudecode" "\
@@ -30591,8 +30606,8 @@ If FILE-NAME is non-nil, save the result to FILE-NAME.
30591;;;;;; vc-print-log vc-retrieve-tag vc-create-tag vc-merge vc-insert-headers 30606;;;;;; vc-print-log vc-retrieve-tag vc-create-tag vc-merge vc-insert-headers
30592;;;;;; vc-revision-other-window vc-root-diff vc-ediff vc-version-ediff 30607;;;;;; vc-revision-other-window vc-root-diff vc-ediff vc-version-ediff
30593;;;;;; vc-diff vc-version-diff vc-register vc-next-action vc-before-checkin-hook 30608;;;;;; vc-diff vc-version-diff vc-register vc-next-action vc-before-checkin-hook
30594;;;;;; vc-checkin-hook vc-checkout-hook) "vc" "vc/vc.el" (20128 30609;;;;;; vc-checkin-hook vc-checkout-hook) "vc" "vc/vc.el" (20172
30595;;;;;; 38948)) 30610;;;;;; 54913))
30596;;; Generated autoloads from vc/vc.el 30611;;; Generated autoloads from vc/vc.el
30597 30612
30598(defvar vc-checkout-hook nil "\ 30613(defvar vc-checkout-hook nil "\
@@ -30875,7 +30890,7 @@ Return the branch part of a revision number REV.
30875;;;*** 30890;;;***
30876 30891
30877;;;### (autoloads (vc-annotate) "vc-annotate" "vc/vc-annotate.el" 30892;;;### (autoloads (vc-annotate) "vc-annotate" "vc/vc-annotate.el"
30878;;;;;; (20119 34052)) 30893;;;;;; (19920 63959))
30879;;; Generated autoloads from vc/vc-annotate.el 30894;;; Generated autoloads from vc/vc-annotate.el
30880 30895
30881(autoload 'vc-annotate "vc-annotate" "\ 30896(autoload 'vc-annotate "vc-annotate" "\
@@ -30912,7 +30927,7 @@ mode-specific menu. `vc-annotate-color-map' and
30912 30927
30913;;;*** 30928;;;***
30914 30929
30915;;;### (autoloads nil "vc-arch" "vc/vc-arch.el" (20119 34052)) 30930;;;### (autoloads nil "vc-arch" "vc/vc-arch.el" (20168 57844))
30916;;; Generated autoloads from vc/vc-arch.el 30931;;; Generated autoloads from vc/vc-arch.el
30917 (defun vc-arch-registered (file) 30932 (defun vc-arch-registered (file)
30918 (if (vc-find-root file "{arch}/=tagging-method") 30933 (if (vc-find-root file "{arch}/=tagging-method")
@@ -30922,13 +30937,14 @@ mode-specific menu. `vc-annotate-color-map' and
30922 30937
30923;;;*** 30938;;;***
30924 30939
30925;;;### (autoloads nil "vc-bzr" "vc/vc-bzr.el" (20127 27092)) 30940;;;### (autoloads nil "vc-bzr" "vc/vc-bzr.el" (20174 10230))
30926;;; Generated autoloads from vc/vc-bzr.el 30941;;; Generated autoloads from vc/vc-bzr.el
30927 30942
30928(defconst vc-bzr-admin-dirname ".bzr" "\ 30943(defconst vc-bzr-admin-dirname ".bzr" "\
30929Name of the directory containing Bzr repository status files.") 30944Name of the directory containing Bzr repository status files.")
30930 30945
30931(defconst vc-bzr-admin-checkout-format-file (concat vc-bzr-admin-dirname "/checkout/format")) 30946(defconst vc-bzr-admin-checkout-format-file (concat vc-bzr-admin-dirname "/checkout/format") "\
30947Name of the format file in a .bzr directory.")
30932 (defun vc-bzr-registered (file) 30948 (defun vc-bzr-registered (file)
30933 (if (vc-find-root file vc-bzr-admin-checkout-format-file) 30949 (if (vc-find-root file vc-bzr-admin-checkout-format-file)
30934 (progn 30950 (progn
@@ -30937,9 +30953,10 @@ Name of the directory containing Bzr repository status files.")
30937 30953
30938;;;*** 30954;;;***
30939 30955
30940;;;### (autoloads nil "vc-cvs" "vc/vc-cvs.el" (20119 34052)) 30956;;;### (autoloads nil "vc-cvs" "vc/vc-cvs.el" (20174 10230))
30941;;; Generated autoloads from vc/vc-cvs.el 30957;;; Generated autoloads from vc/vc-cvs.el
30942 (defun vc-cvs-registered (f) 30958(defun vc-cvs-registered (f)
30959 "Return non-nil if file F is registered with CVS."
30943 (when (file-readable-p (expand-file-name 30960 (when (file-readable-p (expand-file-name
30944 "CVS/Entries" (file-name-directory f))) 30961 "CVS/Entries" (file-name-directory f)))
30945 (load "vc-cvs") 30962 (load "vc-cvs")
@@ -30947,7 +30964,7 @@ Name of the directory containing Bzr repository status files.")
30947 30964
30948;;;*** 30965;;;***
30949 30966
30950;;;### (autoloads (vc-dir) "vc-dir" "vc/vc-dir.el" (20119 34052)) 30967;;;### (autoloads (vc-dir) "vc-dir" "vc/vc-dir.el" (20168 57844))
30951;;; Generated autoloads from vc/vc-dir.el 30968;;; Generated autoloads from vc/vc-dir.el
30952 30969
30953(autoload 'vc-dir "vc-dir" "\ 30970(autoload 'vc-dir "vc-dir" "\
@@ -30972,7 +30989,7 @@ These are the commands available for use in the file status buffer:
30972;;;*** 30989;;;***
30973 30990
30974;;;### (autoloads (vc-do-command) "vc-dispatcher" "vc/vc-dispatcher.el" 30991;;;### (autoloads (vc-do-command) "vc-dispatcher" "vc/vc-dispatcher.el"
30975;;;;;; (20119 34052)) 30992;;;;;; (20168 57844))
30976;;; Generated autoloads from vc/vc-dispatcher.el 30993;;; Generated autoloads from vc/vc-dispatcher.el
30977 30994
30978(autoload 'vc-do-command "vc-dispatcher" "\ 30995(autoload 'vc-do-command "vc-dispatcher" "\
@@ -30995,7 +31012,7 @@ case, and the process object in the asynchronous case.
30995 31012
30996;;;*** 31013;;;***
30997 31014
30998;;;### (autoloads nil "vc-git" "vc/vc-git.el" (20119 34052)) 31015;;;### (autoloads nil "vc-git" "vc/vc-git.el" (20087 5852))
30999;;; Generated autoloads from vc/vc-git.el 31016;;; Generated autoloads from vc/vc-git.el
31000 (defun vc-git-registered (file) 31017 (defun vc-git-registered (file)
31001 "Return non-nil if FILE is registered with git." 31018 "Return non-nil if FILE is registered with git."
@@ -31006,7 +31023,7 @@ case, and the process object in the asynchronous case.
31006 31023
31007;;;*** 31024;;;***
31008 31025
31009;;;### (autoloads nil "vc-hg" "vc/vc-hg.el" (20119 34052)) 31026;;;### (autoloads nil "vc-hg" "vc/vc-hg.el" (19845 45374))
31010;;; Generated autoloads from vc/vc-hg.el 31027;;; Generated autoloads from vc/vc-hg.el
31011 (defun vc-hg-registered (file) 31028 (defun vc-hg-registered (file)
31012 "Return non-nil if FILE is registered with hg." 31029 "Return non-nil if FILE is registered with hg."
@@ -31017,12 +31034,14 @@ case, and the process object in the asynchronous case.
31017 31034
31018;;;*** 31035;;;***
31019 31036
31020;;;### (autoloads nil "vc-mtn" "vc/vc-mtn.el" (20119 34052)) 31037;;;### (autoloads nil "vc-mtn" "vc/vc-mtn.el" (20174 10230))
31021;;; Generated autoloads from vc/vc-mtn.el 31038;;; Generated autoloads from vc/vc-mtn.el
31022 31039
31023(defconst vc-mtn-admin-dir "_MTN") 31040(defconst vc-mtn-admin-dir "_MTN" "\
31041Name of the monotone directory.")
31024 31042
31025(defconst vc-mtn-admin-format (concat vc-mtn-admin-dir "/format")) 31043(defconst vc-mtn-admin-format (concat vc-mtn-admin-dir "/format") "\
31044Name of the monotone directory's format file.")
31026 (defun vc-mtn-registered (file) 31045 (defun vc-mtn-registered (file)
31027 (if (vc-find-root file vc-mtn-admin-format) 31046 (if (vc-find-root file vc-mtn-admin-format)
31028 (progn 31047 (progn
@@ -31032,7 +31051,7 @@ case, and the process object in the asynchronous case.
31032;;;*** 31051;;;***
31033 31052
31034;;;### (autoloads (vc-rcs-master-templates) "vc-rcs" "vc/vc-rcs.el" 31053;;;### (autoloads (vc-rcs-master-templates) "vc-rcs" "vc/vc-rcs.el"
31035;;;;;; (20119 34052)) 31054;;;;;; (20161 45793))
31036;;; Generated autoloads from vc/vc-rcs.el 31055;;; Generated autoloads from vc/vc-rcs.el
31037 31056
31038(defvar vc-rcs-master-templates (purecopy '("%sRCS/%s,v" "%s%s,v" "%sRCS/%s")) "\ 31057(defvar vc-rcs-master-templates (purecopy '("%sRCS/%s,v" "%s%s,v" "%sRCS/%s")) "\
@@ -31046,7 +31065,7 @@ For a description of possible values, see `vc-check-master-templates'.")
31046;;;*** 31065;;;***
31047 31066
31048;;;### (autoloads (vc-sccs-master-templates) "vc-sccs" "vc/vc-sccs.el" 31067;;;### (autoloads (vc-sccs-master-templates) "vc-sccs" "vc/vc-sccs.el"
31049;;;;;; (20119 34052)) 31068;;;;;; (19845 45374))
31050;;; Generated autoloads from vc/vc-sccs.el 31069;;; Generated autoloads from vc/vc-sccs.el
31051 31070
31052(defvar vc-sccs-master-templates (purecopy '("%sSCCS/s.%s" "%ss.%s" vc-sccs-search-project-dir)) "\ 31071(defvar vc-sccs-master-templates (purecopy '("%sSCCS/s.%s" "%ss.%s" vc-sccs-search-project-dir)) "\
@@ -31063,7 +31082,7 @@ find any project directory." (let ((project-dir (getenv "PROJECTDIR")) dirs dir)
31063 31082
31064;;;*** 31083;;;***
31065 31084
31066;;;### (autoloads nil "vc-svn" "vc/vc-svn.el" (20119 34052)) 31085;;;### (autoloads nil "vc-svn" "vc/vc-svn.el" (20162 19074))
31067;;; Generated autoloads from vc/vc-svn.el 31086;;; Generated autoloads from vc/vc-svn.el
31068 (defun vc-svn-registered (f) 31087 (defun vc-svn-registered (f)
31069 (let ((admin-dir (cond ((and (eq system-type 'windows-nt) 31088 (let ((admin-dir (cond ((and (eq system-type 'windows-nt)
@@ -31077,7 +31096,7 @@ find any project directory." (let ((project-dir (getenv "PROJECTDIR")) dirs dir)
31077;;;*** 31096;;;***
31078 31097
31079;;;### (autoloads (vera-mode) "vera-mode" "progmodes/vera-mode.el" 31098;;;### (autoloads (vera-mode) "vera-mode" "progmodes/vera-mode.el"
31080;;;;;; (20129 34267)) 31099;;;;;; (20131 59880))
31081;;; Generated autoloads from progmodes/vera-mode.el 31100;;; Generated autoloads from progmodes/vera-mode.el
31082 (add-to-list 'auto-mode-alist (cons (purecopy "\\.vr[hi]?\\'") 'vera-mode)) 31101 (add-to-list 'auto-mode-alist (cons (purecopy "\\.vr[hi]?\\'") 'vera-mode))
31083 31102
@@ -31135,7 +31154,7 @@ Key bindings:
31135;;;*** 31154;;;***
31136 31155
31137;;;### (autoloads (verilog-mode) "verilog-mode" "progmodes/verilog-mode.el" 31156;;;### (autoloads (verilog-mode) "verilog-mode" "progmodes/verilog-mode.el"
31138;;;;;; (20119 34052)) 31157;;;;;; (20183 25152))
31139;;; Generated autoloads from progmodes/verilog-mode.el 31158;;; Generated autoloads from progmodes/verilog-mode.el
31140 31159
31141(autoload 'verilog-mode "verilog-mode" "\ 31160(autoload 'verilog-mode "verilog-mode" "\
@@ -31242,6 +31261,8 @@ Some other functions are:
31242 \\[verilog-sk-initial] Insert an initial begin .. end block. 31261 \\[verilog-sk-initial] Insert an initial begin .. end block.
31243 \\[verilog-sk-fork] Insert a fork begin .. end .. join block. 31262 \\[verilog-sk-fork] Insert a fork begin .. end .. join block.
31244 \\[verilog-sk-module] Insert a module .. (/*AUTOARG*/);.. endmodule block. 31263 \\[verilog-sk-module] Insert a module .. (/*AUTOARG*/);.. endmodule block.
31264 \\[verilog-sk-ovm-class] Insert an OVM Class block.
31265 \\[verilog-sk-uvm-class] Insert an UVM Class block.
31245 \\[verilog-sk-primitive] Insert a primitive .. (.. );.. endprimitive block. 31266 \\[verilog-sk-primitive] Insert a primitive .. (.. );.. endprimitive block.
31246 \\[verilog-sk-repeat] Insert a repeat (..) begin .. end block. 31267 \\[verilog-sk-repeat] Insert a repeat (..) begin .. end block.
31247 \\[verilog-sk-specify] Insert a specify .. endspecify block. 31268 \\[verilog-sk-specify] Insert a specify .. endspecify block.
@@ -31272,7 +31293,7 @@ Key bindings specific to `verilog-mode-map' are:
31272;;;*** 31293;;;***
31273 31294
31274;;;### (autoloads (vhdl-mode) "vhdl-mode" "progmodes/vhdl-mode.el" 31295;;;### (autoloads (vhdl-mode) "vhdl-mode" "progmodes/vhdl-mode.el"
31275;;;;;; (20127 25049)) 31296;;;;;; (20168 57844))
31276;;; Generated autoloads from progmodes/vhdl-mode.el 31297;;; Generated autoloads from progmodes/vhdl-mode.el
31277 31298
31278(autoload 'vhdl-mode "vhdl-mode" "\ 31299(autoload 'vhdl-mode "vhdl-mode" "\
@@ -31724,10 +31745,10 @@ Usage:
31724 31745
31725 31746
31726 PRINTING: 31747 PRINTING:
31727 Postscript printing with different faces (an optimized set of faces is 31748 PostScript printing with different faces (an optimized set of faces is
31728 used if `vhdl-print-customize-faces' is non-nil) or colors (if 31749 used if `vhdl-print-customize-faces' is non-nil) or colors (if
31729 `ps-print-color-p' is non-nil) is possible using the standard Emacs 31750 `ps-print-color-p' is non-nil) is possible using the standard Emacs
31730 postscript printing commands. Option `vhdl-print-two-column' defines 31751 PostScript printing commands. Option `vhdl-print-two-column' defines
31731 appropriate default settings for nice landscape two-column printing. 31752 appropriate default settings for nice landscape two-column printing.
31732 The paper format can be set by option `ps-paper-type'. Do not forget to 31753 The paper format can be set by option `ps-paper-type'. Do not forget to
31733 switch `ps-print-color-p' to nil for printing on black-and-white 31754 switch `ps-print-color-p' to nil for printing on black-and-white
@@ -31813,7 +31834,7 @@ Key bindings:
31813 31834
31814;;;*** 31835;;;***
31815 31836
31816;;;### (autoloads (vi-mode) "vi" "emulation/vi.el" (20119 34052)) 31837;;;### (autoloads (vi-mode) "vi" "emulation/vi.el" (20104 14925))
31817;;; Generated autoloads from emulation/vi.el 31838;;; Generated autoloads from emulation/vi.el
31818 31839
31819(autoload 'vi-mode "vi" "\ 31840(autoload 'vi-mode "vi" "\
@@ -31868,7 +31889,7 @@ Syntax table and abbrevs while in vi mode remain as they were in Emacs.
31868;;;### (autoloads (viqr-pre-write-conversion viqr-post-read-conversion 31889;;;### (autoloads (viqr-pre-write-conversion viqr-post-read-conversion
31869;;;;;; viet-encode-viqr-buffer viet-encode-viqr-region viet-decode-viqr-buffer 31890;;;;;; viet-encode-viqr-buffer viet-encode-viqr-region viet-decode-viqr-buffer
31870;;;;;; viet-decode-viqr-region viet-encode-viscii-char) "viet-util" 31891;;;;;; viet-decode-viqr-region viet-encode-viscii-char) "viet-util"
31871;;;;;; "language/viet-util.el" (20119 34052)) 31892;;;;;; "language/viet-util.el" (19845 45374))
31872;;; Generated autoloads from language/viet-util.el 31893;;; Generated autoloads from language/viet-util.el
31873 31894
31874(autoload 'viet-encode-viscii-char "viet-util" "\ 31895(autoload 'viet-encode-viscii-char "viet-util" "\
@@ -31916,7 +31937,7 @@ Convert Vietnamese characters of the current buffer to `VIQR' mnemonics.
31916;;;;;; view-mode view-buffer-other-frame view-buffer-other-window 31937;;;;;; view-mode view-buffer-other-frame view-buffer-other-window
31917;;;;;; view-buffer view-file-other-frame view-file-other-window 31938;;;;;; view-buffer view-file-other-frame view-file-other-window
31918;;;;;; view-file kill-buffer-if-not-modified view-remove-frame-by-deleting) 31939;;;;;; view-file kill-buffer-if-not-modified view-remove-frame-by-deleting)
31919;;;;;; "view" "view.el" (20126 50686)) 31940;;;;;; "view" "view.el" (20174 10230))
31920;;; Generated autoloads from view.el 31941;;; Generated autoloads from view.el
31921 31942
31922(defvar view-remove-frame-by-deleting t "\ 31943(defvar view-remove-frame-by-deleting t "\
@@ -32158,8 +32179,8 @@ Exit View mode and make the current buffer editable.
32158 32179
32159;;;*** 32180;;;***
32160 32181
32161;;;### (autoloads (vip-mode vip-setup) "vip" "emulation/vip.el" (20140 32182;;;### (autoloads (vip-mode vip-setup) "vip" "emulation/vip.el" (20141
32162;;;;;; 44329)) 32183;;;;;; 9296))
32163;;; Generated autoloads from emulation/vip.el 32184;;; Generated autoloads from emulation/vip.el
32164 32185
32165(autoload 'vip-setup "vip" "\ 32186(autoload 'vip-setup "vip" "\
@@ -32175,7 +32196,7 @@ Turn on VIP emulation of VI.
32175;;;*** 32196;;;***
32176 32197
32177;;;### (autoloads (viper-mode toggle-viper-mode) "viper" "emulation/viper.el" 32198;;;### (autoloads (viper-mode toggle-viper-mode) "viper" "emulation/viper.el"
32178;;;;;; (20119 34052)) 32199;;;;;; (20167 36967))
32179;;; Generated autoloads from emulation/viper.el 32200;;; Generated autoloads from emulation/viper.el
32180 32201
32181(autoload 'toggle-viper-mode "viper" "\ 32202(autoload 'toggle-viper-mode "viper" "\
@@ -32192,7 +32213,7 @@ Turn on Viper emulation of Vi in Emacs. See Info node `(viper)Top'.
32192;;;*** 32213;;;***
32193 32214
32194;;;### (autoloads (warn lwarn display-warning) "warnings" "emacs-lisp/warnings.el" 32215;;;### (autoloads (warn lwarn display-warning) "warnings" "emacs-lisp/warnings.el"
32195;;;;;; (20119 34052)) 32216;;;;;; (19906 31087))
32196;;; Generated autoloads from emacs-lisp/warnings.el 32217;;; Generated autoloads from emacs-lisp/warnings.el
32197 32218
32198(defvar warning-prefix-function nil "\ 32219(defvar warning-prefix-function nil "\
@@ -32282,7 +32303,7 @@ this is equivalent to `display-warning', using
32282;;;*** 32303;;;***
32283 32304
32284;;;### (autoloads (wdired-change-to-wdired-mode) "wdired" "wdired.el" 32305;;;### (autoloads (wdired-change-to-wdired-mode) "wdired" "wdired.el"
32285;;;;;; (20119 34052)) 32306;;;;;; (20174 10230))
32286;;; Generated autoloads from wdired.el 32307;;; Generated autoloads from wdired.el
32287 32308
32288(autoload 'wdired-change-to-wdired-mode "wdired" "\ 32309(autoload 'wdired-change-to-wdired-mode "wdired" "\
@@ -32298,7 +32319,7 @@ See `wdired-mode'.
32298 32319
32299;;;*** 32320;;;***
32300 32321
32301;;;### (autoloads (webjump) "webjump" "net/webjump.el" (20119 34052)) 32322;;;### (autoloads (webjump) "webjump" "net/webjump.el" (20159 42847))
32302;;; Generated autoloads from net/webjump.el 32323;;; Generated autoloads from net/webjump.el
32303 32324
32304(autoload 'webjump "webjump" "\ 32325(autoload 'webjump "webjump" "\
@@ -32315,7 +32336,7 @@ Please submit bug reports and other feedback to the author, Neil W. Van Dyke
32315;;;*** 32336;;;***
32316 32337
32317;;;### (autoloads (which-function-mode) "which-func" "progmodes/which-func.el" 32338;;;### (autoloads (which-function-mode) "which-func" "progmodes/which-func.el"
32318;;;;;; (20127 25007)) 32339;;;;;; (20127 62865))
32319;;; Generated autoloads from progmodes/which-func.el 32340;;; Generated autoloads from progmodes/which-func.el
32320 (put 'which-func-format 'risky-local-variable t) 32341 (put 'which-func-format 'risky-local-variable t)
32321 (put 'which-func-current 'risky-local-variable t) 32342 (put 'which-func-current 'risky-local-variable t)
@@ -32348,7 +32369,7 @@ in certain major modes.
32348;;;### (autoloads (whitespace-report-region whitespace-report whitespace-cleanup-region 32369;;;### (autoloads (whitespace-report-region whitespace-report whitespace-cleanup-region
32349;;;;;; whitespace-cleanup global-whitespace-toggle-options whitespace-toggle-options 32370;;;;;; whitespace-cleanup global-whitespace-toggle-options whitespace-toggle-options
32350;;;;;; global-whitespace-newline-mode global-whitespace-mode whitespace-newline-mode 32371;;;;;; global-whitespace-newline-mode global-whitespace-mode whitespace-newline-mode
32351;;;;;; whitespace-mode) "whitespace" "whitespace.el" (20142 405)) 32372;;;;;; whitespace-mode) "whitespace" "whitespace.el" (20176 51947))
32352;;; Generated autoloads from whitespace.el 32373;;; Generated autoloads from whitespace.el
32353 32374
32354(autoload 'whitespace-mode "whitespace" "\ 32375(autoload 'whitespace-mode "whitespace" "\
@@ -32747,7 +32768,7 @@ cleaning up these problems.
32747;;;*** 32768;;;***
32748 32769
32749;;;### (autoloads (widget-minor-mode widget-browse-other-window widget-browse 32770;;;### (autoloads (widget-minor-mode widget-browse-other-window widget-browse
32750;;;;;; widget-browse-at) "wid-browse" "wid-browse.el" (20126 45211)) 32771;;;;;; widget-browse-at) "wid-browse" "wid-browse.el" (20127 62865))
32751;;; Generated autoloads from wid-browse.el 32772;;; Generated autoloads from wid-browse.el
32752 32773
32753(autoload 'widget-browse-at "wid-browse" "\ 32774(autoload 'widget-browse-at "wid-browse" "\
@@ -32773,8 +32794,8 @@ Minor mode for traversing widgets.
32773;;;*** 32794;;;***
32774 32795
32775;;;### (autoloads (widget-setup widget-insert widget-delete widget-create 32796;;;### (autoloads (widget-setup widget-insert widget-delete widget-create
32776;;;;;; widget-prompt-value widgetp) "wid-edit" "wid-edit.el" (20119 32797;;;;;; widget-prompt-value widgetp) "wid-edit" "wid-edit.el" (20162
32777;;;;;; 34052)) 32798;;;;;; 19074))
32778;;; Generated autoloads from wid-edit.el 32799;;; Generated autoloads from wid-edit.el
32779 32800
32780(autoload 'widgetp "wid-edit" "\ 32801(autoload 'widgetp "wid-edit" "\
@@ -32817,8 +32838,8 @@ Setup current buffer so editing string widgets works.
32817;;;*** 32838;;;***
32818 32839
32819;;;### (autoloads (windmove-default-keybindings windmove-down windmove-right 32840;;;### (autoloads (windmove-default-keybindings windmove-down windmove-right
32820;;;;;; windmove-up windmove-left) "windmove" "windmove.el" (20119 32841;;;;;; windmove-up windmove-left) "windmove" "windmove.el" (20161
32821;;;;;; 34052)) 32842;;;;;; 45793))
32822;;; Generated autoloads from windmove.el 32843;;; Generated autoloads from windmove.el
32823 32844
32824(autoload 'windmove-left "windmove" "\ 32845(autoload 'windmove-left "windmove" "\
@@ -32871,7 +32892,7 @@ Default MODIFIER is 'shift.
32871;;;*** 32892;;;***
32872 32893
32873;;;### (autoloads (winner-mode winner-mode) "winner" "winner.el" 32894;;;### (autoloads (winner-mode winner-mode) "winner" "winner.el"
32874;;;;;; (20119 34052)) 32895;;;;;; (19998 49767))
32875;;; Generated autoloads from winner.el 32896;;; Generated autoloads from winner.el
32876 32897
32877(defvar winner-mode nil "\ 32898(defvar winner-mode nil "\
@@ -32890,7 +32911,7 @@ With arg, turn Winner mode on if and only if arg is positive.
32890;;;*** 32911;;;***
32891 32912
32892;;;### (autoloads (woman-bookmark-jump woman-find-file woman-dired-find-file 32913;;;### (autoloads (woman-bookmark-jump woman-find-file woman-dired-find-file
32893;;;;;; woman woman-locale) "woman" "woman.el" (20119 34052)) 32914;;;;;; woman woman-locale) "woman" "woman.el" (20168 57844))
32894;;; Generated autoloads from woman.el 32915;;; Generated autoloads from woman.el
32895 32916
32896(defvar woman-locale nil "\ 32917(defvar woman-locale nil "\
@@ -32939,7 +32960,7 @@ Default bookmark handler for Woman buffers.
32939;;;*** 32960;;;***
32940 32961
32941;;;### (autoloads (wordstar-mode) "ws-mode" "emulation/ws-mode.el" 32962;;;### (autoloads (wordstar-mode) "ws-mode" "emulation/ws-mode.el"
32942;;;;;; (20140 44344)) 32963;;;;;; (20141 9296))
32943;;; Generated autoloads from emulation/ws-mode.el 32964;;; Generated autoloads from emulation/ws-mode.el
32944 32965
32945(autoload 'wordstar-mode "ws-mode" "\ 32966(autoload 'wordstar-mode "ws-mode" "\
@@ -33051,7 +33072,7 @@ The key bindings are:
33051 33072
33052;;;*** 33073;;;***
33053 33074
33054;;;### (autoloads (xesam-search) "xesam" "net/xesam.el" (20127 25788)) 33075;;;### (autoloads (xesam-search) "xesam" "net/xesam.el" (20175 31160))
33055;;; Generated autoloads from net/xesam.el 33076;;; Generated autoloads from net/xesam.el
33056 33077
33057(autoload 'xesam-search "xesam" "\ 33078(autoload 'xesam-search "xesam" "\
@@ -33071,7 +33092,7 @@ Example:
33071;;;*** 33092;;;***
33072 33093
33073;;;### (autoloads (xml-parse-region xml-parse-file) "xml" "xml.el" 33094;;;### (autoloads (xml-parse-region xml-parse-file) "xml" "xml.el"
33074;;;;;; (20119 34052)) 33095;;;;;; (20168 57844))
33075;;; Generated autoloads from xml.el 33096;;; Generated autoloads from xml.el
33076 33097
33077(autoload 'xml-parse-file "xml" "\ 33098(autoload 'xml-parse-file "xml" "\
@@ -33097,7 +33118,7 @@ If PARSE-NS is non-nil, then QNAMES are expanded.
33097;;;*** 33118;;;***
33098 33119
33099;;;### (autoloads (xmltok-get-declared-encoding-position) "xmltok" 33120;;;### (autoloads (xmltok-get-declared-encoding-position) "xmltok"
33100;;;;;; "nxml/xmltok.el" (20119 34052)) 33121;;;;;; "nxml/xmltok.el" (19845 45374))
33101;;; Generated autoloads from nxml/xmltok.el 33122;;; Generated autoloads from nxml/xmltok.el
33102 33123
33103(autoload 'xmltok-get-declared-encoding-position "xmltok" "\ 33124(autoload 'xmltok-get-declared-encoding-position "xmltok" "\
@@ -33115,8 +33136,8 @@ If LIMIT is non-nil, then do not consider characters beyond LIMIT.
33115 33136
33116;;;*** 33137;;;***
33117 33138
33118;;;### (autoloads (xterm-mouse-mode) "xt-mouse" "xt-mouse.el" (20126 33139;;;### (autoloads (xterm-mouse-mode) "xt-mouse" "xt-mouse.el" (20127
33119;;;;;; 50742)) 33140;;;;;; 62865))
33120;;; Generated autoloads from xt-mouse.el 33141;;; Generated autoloads from xt-mouse.el
33121 33142
33122(defvar xterm-mouse-mode nil "\ 33143(defvar xterm-mouse-mode nil "\
@@ -33146,7 +33167,7 @@ down the SHIFT key while pressing the mouse button.
33146;;;*** 33167;;;***
33147 33168
33148;;;### (autoloads (yenc-extract-filename yenc-decode-region) "yenc" 33169;;;### (autoloads (yenc-extract-filename yenc-decode-region) "yenc"
33149;;;;;; "gnus/yenc.el" (20119 34052)) 33170;;;;;; "gnus/yenc.el" (19845 45374))
33150;;; Generated autoloads from gnus/yenc.el 33171;;; Generated autoloads from gnus/yenc.el
33151 33172
33152(autoload 'yenc-decode-region "yenc" "\ 33173(autoload 'yenc-decode-region "yenc" "\
@@ -33162,7 +33183,7 @@ Extract file name from an yenc header.
33162;;;*** 33183;;;***
33163 33184
33164;;;### (autoloads (psychoanalyze-pinhead apropos-zippy insert-zippyism 33185;;;### (autoloads (psychoanalyze-pinhead apropos-zippy insert-zippyism
33165;;;;;; yow) "yow" "play/yow.el" (20119 34052)) 33186;;;;;; yow) "yow" "play/yow.el" (19845 45374))
33166;;; Generated autoloads from play/yow.el 33187;;; Generated autoloads from play/yow.el
33167 33188
33168(autoload 'yow "yow" "\ 33189(autoload 'yow "yow" "\
@@ -33188,7 +33209,7 @@ Zippy goes to the analyst.
33188 33209
33189;;;*** 33210;;;***
33190 33211
33191;;;### (autoloads (zone) "zone" "play/zone.el" (20119 34052)) 33212;;;### (autoloads (zone) "zone" "play/zone.el" (19889 21967))
33192;;; Generated autoloads from play/zone.el 33213;;; Generated autoloads from play/zone.el
33193 33214
33194(autoload 'zone "zone" "\ 33215(autoload 'zone "zone" "\
@@ -33204,46 +33225,47 @@ Zone out, completely.
33204;;;;;; "calc/calc-fin.el" "calc/calc-forms.el" "calc/calc-frac.el" 33225;;;;;; "calc/calc-fin.el" "calc/calc-forms.el" "calc/calc-frac.el"
33205;;;;;; "calc/calc-funcs.el" "calc/calc-graph.el" "calc/calc-help.el" 33226;;;;;; "calc/calc-funcs.el" "calc/calc-graph.el" "calc/calc-help.el"
33206;;;;;; "calc/calc-incom.el" "calc/calc-keypd.el" "calc/calc-lang.el" 33227;;;;;; "calc/calc-incom.el" "calc/calc-keypd.el" "calc/calc-lang.el"
33207;;;;;; "calc/calc-macs.el" "calc/calc-map.el" "calc/calc-math.el" 33228;;;;;; "calc/calc-loaddefs.el" "calc/calc-macs.el" "calc/calc-map.el"
33208;;;;;; "calc/calc-menu.el" "calc/calc-misc.el" "calc/calc-mode.el" 33229;;;;;; "calc/calc-math.el" "calc/calc-menu.el" "calc/calc-misc.el"
33209;;;;;; "calc/calc-mtx.el" "calc/calc-nlfit.el" "calc/calc-poly.el" 33230;;;;;; "calc/calc-mode.el" "calc/calc-mtx.el" "calc/calc-nlfit.el"
33210;;;;;; "calc/calc-prog.el" "calc/calc-rewr.el" "calc/calc-rules.el" 33231;;;;;; "calc/calc-poly.el" "calc/calc-prog.el" "calc/calc-rewr.el"
33211;;;;;; "calc/calc-sel.el" "calc/calc-stat.el" "calc/calc-store.el" 33232;;;;;; "calc/calc-rules.el" "calc/calc-sel.el" "calc/calc-stat.el"
33212;;;;;; "calc/calc-stuff.el" "calc/calc-trail.el" "calc/calc-units.el" 33233;;;;;; "calc/calc-store.el" "calc/calc-stuff.el" "calc/calc-trail.el"
33213;;;;;; "calc/calc-vec.el" "calc/calc-yank.el" "calc/calcalg2.el" 33234;;;;;; "calc/calc-units.el" "calc/calc-vec.el" "calc/calc-yank.el"
33214;;;;;; "calc/calcalg3.el" "calc/calccomp.el" "calc/calcsel2.el" 33235;;;;;; "calc/calcalg2.el" "calc/calcalg3.el" "calc/calccomp.el"
33215;;;;;; "calendar/cal-bahai.el" "calendar/cal-coptic.el" "calendar/cal-french.el" 33236;;;;;; "calc/calcsel2.el" "calendar/cal-bahai.el" "calendar/cal-coptic.el"
33216;;;;;; "calendar/cal-html.el" "calendar/cal-islam.el" "calendar/cal-iso.el" 33237;;;;;; "calendar/cal-french.el" "calendar/cal-html.el" "calendar/cal-islam.el"
33217;;;;;; "calendar/cal-julian.el" "calendar/cal-loaddefs.el" "calendar/cal-mayan.el" 33238;;;;;; "calendar/cal-iso.el" "calendar/cal-julian.el" "calendar/cal-loaddefs.el"
33218;;;;;; "calendar/cal-menu.el" "calendar/cal-move.el" "calendar/cal-persia.el" 33239;;;;;; "calendar/cal-mayan.el" "calendar/cal-menu.el" "calendar/cal-move.el"
33219;;;;;; "calendar/cal-tex.el" "calendar/cal-x.el" "calendar/diary-loaddefs.el" 33240;;;;;; "calendar/cal-persia.el" "calendar/cal-tex.el" "calendar/cal-x.el"
33220;;;;;; "calendar/hol-loaddefs.el" "cdl.el" "cedet/cedet-cscope.el" 33241;;;;;; "calendar/diary-loaddefs.el" "calendar/hol-loaddefs.el" "cdl.el"
33221;;;;;; "cedet/cedet-files.el" "cedet/cedet-global.el" "cedet/cedet-idutils.el" 33242;;;;;; "cedet/cedet-cscope.el" "cedet/cedet-files.el" "cedet/cedet-global.el"
33222;;;;;; "cedet/cedet.el" "cedet/ede/auto.el" "cedet/ede/autoconf-edit.el" 33243;;;;;; "cedet/cedet-idutils.el" "cedet/cedet.el" "cedet/ede/auto.el"
33223;;;;;; "cedet/ede/base.el" "cedet/ede/cpp-root.el" "cedet/ede/custom.el" 33244;;;;;; "cedet/ede/autoconf-edit.el" "cedet/ede/base.el" "cedet/ede/cpp-root.el"
33224;;;;;; "cedet/ede/dired.el" "cedet/ede/emacs.el" "cedet/ede/files.el" 33245;;;;;; "cedet/ede/custom.el" "cedet/ede/dired.el" "cedet/ede/emacs.el"
33225;;;;;; "cedet/ede/generic.el" "cedet/ede/linux.el" "cedet/ede/locate.el" 33246;;;;;; "cedet/ede/files.el" "cedet/ede/generic.el" "cedet/ede/linux.el"
33226;;;;;; "cedet/ede/make.el" "cedet/ede/makefile-edit.el" "cedet/ede/pconf.el" 33247;;;;;; "cedet/ede/loaddefs.el" "cedet/ede/locate.el" "cedet/ede/make.el"
33227;;;;;; "cedet/ede/pmake.el" "cedet/ede/proj-archive.el" "cedet/ede/proj-aux.el" 33248;;;;;; "cedet/ede/makefile-edit.el" "cedet/ede/pconf.el" "cedet/ede/pmake.el"
33228;;;;;; "cedet/ede/proj-comp.el" "cedet/ede/proj-elisp.el" "cedet/ede/proj-info.el" 33249;;;;;; "cedet/ede/proj-archive.el" "cedet/ede/proj-aux.el" "cedet/ede/proj-comp.el"
33229;;;;;; "cedet/ede/proj-misc.el" "cedet/ede/proj-obj.el" "cedet/ede/proj-prog.el" 33250;;;;;; "cedet/ede/proj-elisp.el" "cedet/ede/proj-info.el" "cedet/ede/proj-misc.el"
33230;;;;;; "cedet/ede/proj-scheme.el" "cedet/ede/proj-shared.el" "cedet/ede/proj.el" 33251;;;;;; "cedet/ede/proj-obj.el" "cedet/ede/proj-prog.el" "cedet/ede/proj-scheme.el"
33231;;;;;; "cedet/ede/project-am.el" "cedet/ede/shell.el" "cedet/ede/simple.el" 33252;;;;;; "cedet/ede/proj-shared.el" "cedet/ede/proj.el" "cedet/ede/project-am.el"
33232;;;;;; "cedet/ede/source.el" "cedet/ede/speedbar.el" "cedet/ede/srecode.el" 33253;;;;;; "cedet/ede/shell.el" "cedet/ede/simple.el" "cedet/ede/source.el"
33233;;;;;; "cedet/ede/system.el" "cedet/ede/util.el" "cedet/inversion.el" 33254;;;;;; "cedet/ede/speedbar.el" "cedet/ede/srecode.el" "cedet/ede/system.el"
33234;;;;;; "cedet/mode-local.el" "cedet/pulse.el" "cedet/semantic/analyze.el" 33255;;;;;; "cedet/ede/util.el" "cedet/inversion.el" "cedet/mode-local.el"
33235;;;;;; "cedet/semantic/analyze/complete.el" "cedet/semantic/analyze/debug.el" 33256;;;;;; "cedet/pulse.el" "cedet/semantic/analyze.el" "cedet/semantic/analyze/complete.el"
33236;;;;;; "cedet/semantic/analyze/fcn.el" "cedet/semantic/analyze/refs.el" 33257;;;;;; "cedet/semantic/analyze/debug.el" "cedet/semantic/analyze/fcn.el"
33237;;;;;; "cedet/semantic/bovine.el" "cedet/semantic/bovine/c-by.el" 33258;;;;;; "cedet/semantic/analyze/refs.el" "cedet/semantic/bovine.el"
33238;;;;;; "cedet/semantic/bovine/c.el" "cedet/semantic/bovine/debug.el" 33259;;;;;; "cedet/semantic/bovine/c-by.el" "cedet/semantic/bovine/c.el"
33239;;;;;; "cedet/semantic/bovine/el.el" "cedet/semantic/bovine/gcc.el" 33260;;;;;; "cedet/semantic/bovine/debug.el" "cedet/semantic/bovine/el.el"
33240;;;;;; "cedet/semantic/bovine/make-by.el" "cedet/semantic/bovine/make.el" 33261;;;;;; "cedet/semantic/bovine/gcc.el" "cedet/semantic/bovine/make-by.el"
33241;;;;;; "cedet/semantic/bovine/scm-by.el" "cedet/semantic/bovine/scm.el" 33262;;;;;; "cedet/semantic/bovine/make.el" "cedet/semantic/bovine/scm-by.el"
33242;;;;;; "cedet/semantic/chart.el" "cedet/semantic/complete.el" "cedet/semantic/ctxt.el" 33263;;;;;; "cedet/semantic/bovine/scm.el" "cedet/semantic/chart.el"
33243;;;;;; "cedet/semantic/db-debug.el" "cedet/semantic/db-ebrowse.el" 33264;;;;;; "cedet/semantic/complete.el" "cedet/semantic/ctxt.el" "cedet/semantic/db-debug.el"
33244;;;;;; "cedet/semantic/db-el.el" "cedet/semantic/db-file.el" "cedet/semantic/db-find.el" 33265;;;;;; "cedet/semantic/db-ebrowse.el" "cedet/semantic/db-el.el"
33245;;;;;; "cedet/semantic/db-global.el" "cedet/semantic/db-javascript.el" 33266;;;;;; "cedet/semantic/db-file.el" "cedet/semantic/db-find.el" "cedet/semantic/db-global.el"
33246;;;;;; "cedet/semantic/db-mode.el" "cedet/semantic/db-ref.el" "cedet/semantic/db-typecache.el" 33267;;;;;; "cedet/semantic/db-javascript.el" "cedet/semantic/db-mode.el"
33268;;;;;; "cedet/semantic/db-ref.el" "cedet/semantic/db-typecache.el"
33247;;;;;; "cedet/semantic/db.el" "cedet/semantic/debug.el" "cedet/semantic/decorate.el" 33269;;;;;; "cedet/semantic/db.el" "cedet/semantic/debug.el" "cedet/semantic/decorate.el"
33248;;;;;; "cedet/semantic/decorate/include.el" "cedet/semantic/decorate/mode.el" 33270;;;;;; "cedet/semantic/decorate/include.el" "cedet/semantic/decorate/mode.el"
33249;;;;;; "cedet/semantic/dep.el" "cedet/semantic/doc.el" "cedet/semantic/ede-grammar.el" 33271;;;;;; "cedet/semantic/dep.el" "cedet/semantic/doc.el" "cedet/semantic/ede-grammar.el"
@@ -33251,13 +33273,13 @@ Zone out, completely.
33251;;;;;; "cedet/semantic/fw.el" "cedet/semantic/grammar-wy.el" "cedet/semantic/grammar.el" 33273;;;;;; "cedet/semantic/fw.el" "cedet/semantic/grammar-wy.el" "cedet/semantic/grammar.el"
33252;;;;;; "cedet/semantic/html.el" "cedet/semantic/ia-sb.el" "cedet/semantic/ia.el" 33274;;;;;; "cedet/semantic/html.el" "cedet/semantic/ia-sb.el" "cedet/semantic/ia.el"
33253;;;;;; "cedet/semantic/idle.el" "cedet/semantic/imenu.el" "cedet/semantic/java.el" 33275;;;;;; "cedet/semantic/idle.el" "cedet/semantic/imenu.el" "cedet/semantic/java.el"
33254;;;;;; "cedet/semantic/lex-spp.el" "cedet/semantic/lex.el" "cedet/semantic/mru-bookmark.el" 33276;;;;;; "cedet/semantic/lex-spp.el" "cedet/semantic/lex.el" "cedet/semantic/loaddefs.el"
33255;;;;;; "cedet/semantic/sb.el" "cedet/semantic/scope.el" "cedet/semantic/senator.el" 33277;;;;;; "cedet/semantic/mru-bookmark.el" "cedet/semantic/sb.el" "cedet/semantic/scope.el"
33256;;;;;; "cedet/semantic/sort.el" "cedet/semantic/symref.el" "cedet/semantic/symref/cscope.el" 33278;;;;;; "cedet/semantic/senator.el" "cedet/semantic/sort.el" "cedet/semantic/symref.el"
33257;;;;;; "cedet/semantic/symref/filter.el" "cedet/semantic/symref/global.el" 33279;;;;;; "cedet/semantic/symref/cscope.el" "cedet/semantic/symref/filter.el"
33258;;;;;; "cedet/semantic/symref/grep.el" "cedet/semantic/symref/idutils.el" 33280;;;;;; "cedet/semantic/symref/global.el" "cedet/semantic/symref/grep.el"
33259;;;;;; "cedet/semantic/symref/list.el" "cedet/semantic/tag-file.el" 33281;;;;;; "cedet/semantic/symref/idutils.el" "cedet/semantic/symref/list.el"
33260;;;;;; "cedet/semantic/tag-ls.el" "cedet/semantic/tag-write.el" 33282;;;;;; "cedet/semantic/tag-file.el" "cedet/semantic/tag-ls.el" "cedet/semantic/tag-write.el"
33261;;;;;; "cedet/semantic/tag.el" "cedet/semantic/texi.el" "cedet/semantic/util-modes.el" 33283;;;;;; "cedet/semantic/tag.el" "cedet/semantic/texi.el" "cedet/semantic/util-modes.el"
33262;;;;;; "cedet/semantic/util.el" "cedet/semantic/wisent.el" "cedet/semantic/wisent/comp.el" 33284;;;;;; "cedet/semantic/util.el" "cedet/semantic/wisent.el" "cedet/semantic/wisent/comp.el"
33263;;;;;; "cedet/semantic/wisent/java-tags.el" "cedet/semantic/wisent/javascript.el" 33285;;;;;; "cedet/semantic/wisent/java-tags.el" "cedet/semantic/wisent/javascript.el"
@@ -33269,32 +33291,33 @@ Zone out, completely.
33269;;;;;; "cedet/srecode/el.el" "cedet/srecode/expandproto.el" "cedet/srecode/extract.el" 33291;;;;;; "cedet/srecode/el.el" "cedet/srecode/expandproto.el" "cedet/srecode/extract.el"
33270;;;;;; "cedet/srecode/fields.el" "cedet/srecode/filters.el" "cedet/srecode/find.el" 33292;;;;;; "cedet/srecode/fields.el" "cedet/srecode/filters.el" "cedet/srecode/find.el"
33271;;;;;; "cedet/srecode/getset.el" "cedet/srecode/insert.el" "cedet/srecode/java.el" 33293;;;;;; "cedet/srecode/getset.el" "cedet/srecode/insert.el" "cedet/srecode/java.el"
33272;;;;;; "cedet/srecode/map.el" "cedet/srecode/mode.el" "cedet/srecode/semantic.el" 33294;;;;;; "cedet/srecode/loaddefs.el" "cedet/srecode/map.el" "cedet/srecode/mode.el"
33273;;;;;; "cedet/srecode/srt-wy.el" "cedet/srecode/srt.el" "cedet/srecode/table.el" 33295;;;;;; "cedet/srecode/semantic.el" "cedet/srecode/srt-wy.el" "cedet/srecode/srt.el"
33274;;;;;; "cedet/srecode/template.el" "cedet/srecode/texi.el" "cus-dep.el" 33296;;;;;; "cedet/srecode/table.el" "cedet/srecode/template.el" "cedet/srecode/texi.el"
33275;;;;;; "dframe.el" "dired-aux.el" "dired-x.el" "dos-fns.el" "dos-vars.el" 33297;;;;;; "cus-dep.el" "dframe.el" "dired-aux.el" "dired-x.el" "dos-fns.el"
33276;;;;;; "dos-w32.el" "dynamic-setting.el" "emacs-lisp/assoc.el" "emacs-lisp/authors.el" 33298;;;;;; "dos-vars.el" "dos-w32.el" "dynamic-setting.el" "emacs-lisp/assoc.el"
33277;;;;;; "emacs-lisp/avl-tree.el" "emacs-lisp/bindat.el" "emacs-lisp/byte-opt.el" 33299;;;;;; "emacs-lisp/authors.el" "emacs-lisp/avl-tree.el" "emacs-lisp/bindat.el"
33278;;;;;; "emacs-lisp/chart.el" "emacs-lisp/cl-extra.el" "emacs-lisp/cl-loaddefs.el" 33300;;;;;; "emacs-lisp/byte-opt.el" "emacs-lisp/chart.el" "emacs-lisp/cl-extra.el"
33279;;;;;; "emacs-lisp/cl-macs.el" "emacs-lisp/cl-seq.el" "emacs-lisp/cl-specs.el" 33301;;;;;; "emacs-lisp/cl-loaddefs.el" "emacs-lisp/cl-macs.el" "emacs-lisp/cl-seq.el"
33280;;;;;; "emacs-lisp/cust-print.el" "emacs-lisp/eieio-base.el" "emacs-lisp/eieio-custom.el" 33302;;;;;; "emacs-lisp/cl-specs.el" "emacs-lisp/cust-print.el" "emacs-lisp/eieio-base.el"
33281;;;;;; "emacs-lisp/eieio-datadebug.el" "emacs-lisp/eieio-opt.el" 33303;;;;;; "emacs-lisp/eieio-custom.el" "emacs-lisp/eieio-datadebug.el"
33282;;;;;; "emacs-lisp/eieio-speedbar.el" "emacs-lisp/eieio.el" "emacs-lisp/find-gc.el" 33304;;;;;; "emacs-lisp/eieio-opt.el" "emacs-lisp/eieio-speedbar.el"
33283;;;;;; "emacs-lisp/gulp.el" "emacs-lisp/lisp-mnt.el" "emacs-lisp/package-x.el" 33305;;;;;; "emacs-lisp/eieio.el" "emacs-lisp/find-gc.el" "emacs-lisp/gulp.el"
33284;;;;;; "emacs-lisp/regi.el" "emacs-lisp/smie.el" "emacs-lisp/tcover-ses.el" 33306;;;;;; "emacs-lisp/lisp-mnt.el" "emacs-lisp/package-x.el" "emacs-lisp/regi.el"
33285;;;;;; "emacs-lisp/tcover-unsafep.el" "emulation/cua-gmrk.el" "emulation/cua-rect.el" 33307;;;;;; "emacs-lisp/smie.el" "emacs-lisp/tcover-ses.el" "emacs-lisp/tcover-unsafep.el"
33286;;;;;; "emulation/edt-lk201.el" "emulation/edt-mapper.el" "emulation/edt-pc.el" 33308;;;;;; "emulation/cua-gmrk.el" "emulation/cua-rect.el" "emulation/edt-lk201.el"
33287;;;;;; "emulation/edt-vt100.el" "emulation/tpu-extras.el" "emulation/viper-cmd.el" 33309;;;;;; "emulation/edt-mapper.el" "emulation/edt-pc.el" "emulation/edt-vt100.el"
33288;;;;;; "emulation/viper-ex.el" "emulation/viper-init.el" "emulation/viper-keym.el" 33310;;;;;; "emulation/tpu-extras.el" "emulation/viper-cmd.el" "emulation/viper-ex.el"
33289;;;;;; "emulation/viper-macs.el" "emulation/viper-mous.el" "emulation/viper-util.el" 33311;;;;;; "emulation/viper-init.el" "emulation/viper-keym.el" "emulation/viper-macs.el"
33290;;;;;; "erc/erc-backend.el" "erc/erc-goodies.el" "erc/erc-ibuffer.el" 33312;;;;;; "emulation/viper-mous.el" "emulation/viper-util.el" "erc/erc-backend.el"
33291;;;;;; "erc/erc-lang.el" "eshell/em-alias.el" "eshell/em-banner.el" 33313;;;;;; "erc/erc-goodies.el" "erc/erc-ibuffer.el" "erc/erc-lang.el"
33292;;;;;; "eshell/em-basic.el" "eshell/em-cmpl.el" "eshell/em-dirs.el" 33314;;;;;; "eshell/em-alias.el" "eshell/em-banner.el" "eshell/em-basic.el"
33293;;;;;; "eshell/em-glob.el" "eshell/em-hist.el" "eshell/em-ls.el" 33315;;;;;; "eshell/em-cmpl.el" "eshell/em-dirs.el" "eshell/em-glob.el"
33294;;;;;; "eshell/em-pred.el" "eshell/em-prompt.el" "eshell/em-rebind.el" 33316;;;;;; "eshell/em-hist.el" "eshell/em-ls.el" "eshell/em-pred.el"
33295;;;;;; "eshell/em-script.el" "eshell/em-smart.el" "eshell/em-term.el" 33317;;;;;; "eshell/em-prompt.el" "eshell/em-rebind.el" "eshell/em-script.el"
33296;;;;;; "eshell/em-unix.el" "eshell/em-xtra.el" "eshell/esh-arg.el" 33318;;;;;; "eshell/em-smart.el" "eshell/em-term.el" "eshell/em-unix.el"
33297;;;;;; "eshell/esh-cmd.el" "eshell/esh-ext.el" "eshell/esh-io.el" 33319;;;;;; "eshell/em-xtra.el" "eshell/esh-arg.el" "eshell/esh-cmd.el"
33320;;;;;; "eshell/esh-ext.el" "eshell/esh-groups.el" "eshell/esh-io.el"
33298;;;;;; "eshell/esh-module.el" "eshell/esh-opt.el" "eshell/esh-proc.el" 33321;;;;;; "eshell/esh-module.el" "eshell/esh-opt.el" "eshell/esh-proc.el"
33299;;;;;; "eshell/esh-util.el" "eshell/esh-var.el" "ezimage.el" "foldout.el" 33322;;;;;; "eshell/esh-util.el" "eshell/esh-var.el" "ezimage.el" "foldout.el"
33300;;;;;; "format-spec.el" "forms-d2.el" "forms-pass.el" "fringe.el" 33323;;;;;; "format-spec.el" "forms-d2.el" "forms-pass.el" "fringe.el"
@@ -33397,8 +33420,8 @@ Zone out, completely.
33397;;;;;; "vc/ediff-init.el" "vc/ediff-merg.el" "vc/ediff-ptch.el" 33420;;;;;; "vc/ediff-init.el" "vc/ediff-merg.el" "vc/ediff-ptch.el"
33398;;;;;; "vc/ediff-vers.el" "vc/ediff-wind.el" "vc/pcvs-info.el" "vc/pcvs-parse.el" 33421;;;;;; "vc/ediff-vers.el" "vc/ediff-wind.el" "vc/pcvs-info.el" "vc/pcvs-parse.el"
33399;;;;;; "vc/pcvs-util.el" "vc/vc-dav.el" "vcursor.el" "vt-control.el" 33422;;;;;; "vc/pcvs-util.el" "vc/vc-dav.el" "vcursor.el" "vt-control.el"
33400;;;;;; "vt100-led.el" "w32-fns.el" "w32-vars.el" "x-dnd.el") (20142 33423;;;;;; "vt100-led.el" "w32-fns.el" "w32-vars.el" "x-dnd.el") (20183
33401;;;;;; 850 416521)) 33424;;;;;; 25444 347950))
33402 33425
33403;;;*** 33426;;;***
33404 33427
diff --git a/lisp/man.el b/lisp/man.el
index 0d991a76f52..aeba3327c40 100644
--- a/lisp/man.el
+++ b/lisp/man.el
@@ -687,7 +687,7 @@ POS defaults to `point'."
687 ;; Otherwise record the current column and look backwards. 687 ;; Otherwise record the current column and look backwards.
688 (setq column (current-column)) 688 (setq column (current-column))
689 (skip-chars-backward ",; \t") 689 (skip-chars-backward ",; \t")
690 ;; Record the distance travelled. 690 ;; Record the distance traveled.
691 (setq distance (- column (current-column))) 691 (setq distance (- column (current-column)))
692 (when (looking-back 692 (when (looking-back
693 (concat "([ \t]*\\(?:" Man-section-regexp "\\)[ \t]*)")) 693 (concat "([ \t]*\\(?:" Man-section-regexp "\\)[ \t]*)"))
@@ -754,8 +754,10 @@ POS defaults to `point'."
754 754
755(defun Man-completion-table (string pred action) 755(defun Man-completion-table (string pred action)
756 (cond 756 (cond
757 ((eq action 'lambda) 757 ;; This ends up returning t for pretty much any string, and hence leads to
758 (not (string-match "([^)]*\\'" string))) 758 ;; spurious "complete but not unique" messages. And since `man' doesn't
759 ;; require-match anyway, there's not point being clever.
760 ;;((eq action 'lambda) (not (string-match "([^)]*\\'" string)))
759 ((equal string "-k") 761 ((equal string "-k")
760 ;; Let SPC (minibuffer-complete-word) insert the space. 762 ;; Let SPC (minibuffer-complete-word) insert the space.
761 (complete-with-action action '("-k ") string pred)) 763 (complete-with-action action '("-k ") string pred))
diff --git a/lisp/net/ange-ftp.el b/lisp/net/ange-ftp.el
index 7ae6912cf8f..a0d2281bfe8 100644
--- a/lisp/net/ange-ftp.el
+++ b/lisp/net/ange-ftp.el
@@ -1664,7 +1664,7 @@ good, skip, fatal, or unknown."
1664 (if (not (and seen-prompt ange-ftp-pending-error-line)) 1664 (if (not (and seen-prompt ange-ftp-pending-error-line))
1665 (ange-ftp-process-handle-line line proc) 1665 (ange-ftp-process-handle-line line proc)
1666 ;; If we've seen a potential error message and it 1666 ;; If we've seen a potential error message and it
1667 ;; hasn't been cancelled by a good message before 1667 ;; hasn't been canceled by a good message before
1668 ;; seeing a prompt, then the error was real. 1668 ;; seeing a prompt, then the error was real.
1669 (delete-process proc) 1669 (delete-process proc)
1670 (setq ange-ftp-process-busy nil 1670 (setq ange-ftp-process-busy nil
diff --git a/lisp/net/tramp-sh.el b/lisp/net/tramp-sh.el
index 941b788ae4d..ee4c8966626 100644
--- a/lisp/net/tramp-sh.el
+++ b/lisp/net/tramp-sh.el
@@ -1042,9 +1042,9 @@ target of the symlink differ."
1042 (tramp-flush-file-property l (file-name-directory l-localname)) 1042 (tramp-flush-file-property l (file-name-directory l-localname))
1043 (tramp-flush-file-property l l-localname) 1043 (tramp-flush-file-property l l-localname)
1044 1044
1045 ;; Right, they are on the same host, regardless of user, method, etc. 1045 ;; Right, they are on the same host, regardless of user, method,
1046 ;; We now make the link on the remote machine. This will occur as the user 1046 ;; etc. We now make the link on the remote machine. This will
1047 ;; that FILENAME belongs to. 1047 ;; occur as the user that FILENAME belongs to.
1048 (tramp-send-command-and-check 1048 (tramp-send-command-and-check
1049 l 1049 l
1050 (format 1050 (format
@@ -4224,148 +4224,166 @@ connection if a previous connection has died for some reason."
4224 (setq p nil))) 4224 (setq p nil)))
4225 4225
4226 ;; New connection must be opened. 4226 ;; New connection must be opened.
4227 (unless (and p (processp p) (memq (process-status p) '(run open))) 4227 (condition-case err
4228 4228 (unless (and p (processp p) (memq (process-status p) '(run open)))
4229 ;; We call `tramp-get-buffer' in order to get a debug buffer for 4229
4230 ;; messages from the beginning. 4230 ;; We call `tramp-get-buffer' in order to get a debug
4231 (tramp-get-buffer vec) 4231 ;; buffer for messages from the beginning.
4232 (tramp-with-progress-reporter 4232 (tramp-get-buffer vec)
4233 vec 3 4233 (tramp-with-progress-reporter
4234 (if (zerop (length (tramp-file-name-user vec))) 4234 vec 3
4235 (format "Opening connection for %s using %s" 4235 (if (zerop (length (tramp-file-name-user vec)))
4236 (tramp-file-name-host vec) 4236 (format "Opening connection for %s using %s"
4237 (tramp-file-name-method vec)) 4237 (tramp-file-name-host vec)
4238 (format "Opening connection for %s@%s using %s" 4238 (tramp-file-name-method vec))
4239 (tramp-file-name-user vec) 4239 (format "Opening connection for %s@%s using %s"
4240 (tramp-file-name-host vec) 4240 (tramp-file-name-user vec)
4241 (tramp-file-name-method vec))) 4241 (tramp-file-name-host vec)
4242 4242 (tramp-file-name-method vec)))
4243 ;; Start new process. 4243
4244 (when (and p (processp p)) 4244 ;; Start new process.
4245 (delete-process p)) 4245 (when (and p (processp p))
4246 (setenv "TERM" tramp-terminal-type) 4246 (delete-process p))
4247 (setenv "LC_ALL" "C") 4247 (setenv "TERM" tramp-terminal-type)
4248 (setenv "PROMPT_COMMAND") 4248 (setenv "LC_ALL" "C")
4249 (setenv "PS1" tramp-initial-end-of-output) 4249 (setenv "PROMPT_COMMAND")
4250 (let* ((target-alist (tramp-compute-multi-hops vec)) 4250 (setenv "PS1" tramp-initial-end-of-output)
4251 (process-connection-type tramp-process-connection-type) 4251 (let* ((target-alist (tramp-compute-multi-hops vec))
4252 (process-adaptive-read-buffering nil) 4252 (process-connection-type tramp-process-connection-type)
4253 (coding-system-for-read nil) 4253 (process-adaptive-read-buffering nil)
4254 ;; This must be done in order to avoid our file name handler. 4254 (coding-system-for-read nil)
4255 (p (let ((default-directory 4255 ;; This must be done in order to avoid our file
4256 (tramp-compat-temporary-file-directory))) 4256 ;; name handler.
4257 (apply 4257 (p (let ((default-directory
4258 'start-process 4258 (tramp-compat-temporary-file-directory)))
4259 (tramp-get-connection-name vec) 4259 (apply
4260 (tramp-get-connection-buffer vec) 4260 'start-process
4261 (if tramp-encoding-command-interactive 4261 (tramp-get-connection-name vec)
4262 (list tramp-encoding-shell 4262 (tramp-get-connection-buffer vec)
4263 tramp-encoding-command-interactive) 4263 (if tramp-encoding-command-interactive
4264 (list tramp-encoding-shell)))))) 4264 (list tramp-encoding-shell
4265 4265 tramp-encoding-command-interactive)
4266 ;; Set sentinel and query flag. 4266 (list tramp-encoding-shell))))))
4267 (tramp-set-connection-property p "vector" vec) 4267
4268 (set-process-sentinel p 'tramp-process-sentinel) 4268 ;; Set sentinel and query flag.
4269 (tramp-compat-set-process-query-on-exit-flag p nil) 4269 (tramp-set-connection-property p "vector" vec)
4270 (set-process-sentinel p 'tramp-process-sentinel)
4271 (tramp-compat-set-process-query-on-exit-flag p nil)
4270 4272
4271 (tramp-message
4272 vec 6 "%s" (mapconcat 'identity (process-command p) " "))
4273
4274 ;; Check whether process is alive.
4275 (tramp-barf-if-no-shell-prompt
4276 p 60 "Couldn't find local shell prompt %s" tramp-encoding-shell)
4277
4278 ;; Now do all the connections as specified.
4279 (while target-alist
4280 (let* ((hop (car target-alist))
4281 (l-method (tramp-file-name-method hop))
4282 (l-user (tramp-file-name-user hop))
4283 (l-host (tramp-file-name-host hop))
4284 (l-port nil)
4285 (login-program
4286 (tramp-get-method-parameter
4287 l-method 'tramp-login-program))
4288 (login-args
4289 (tramp-get-method-parameter l-method 'tramp-login-args))
4290 (async-args
4291 (tramp-get-method-parameter l-method 'tramp-async-args))
4292 (gw-args
4293 (tramp-get-method-parameter l-method 'tramp-gw-args))
4294 (gw (tramp-get-file-property hop "" "gateway" nil))
4295 (g-method (and gw (tramp-file-name-method gw)))
4296 (g-user (and gw (tramp-file-name-user gw)))
4297 (g-host (and gw (tramp-file-name-real-host gw)))
4298 (command login-program)
4299 ;; We don't create the temporary file. In fact,
4300 ;; it is just a prefix for the ControlPath option
4301 ;; of ssh; the real temporary file has another
4302 ;; name, and it is created and protected by ssh.
4303 ;; It is also removed by ssh when the connection
4304 ;; is closed.
4305 (tmpfile
4306 (tramp-set-connection-property
4307 p "temp-file"
4308 (make-temp-name
4309 (expand-file-name
4310 tramp-temp-name-prefix
4311 (tramp-compat-temporary-file-directory)))))
4312 spec)
4313
4314 ;; Add arguments for asynchronous processes.
4315 (when (and process-name async-args)
4316 (setq login-args (append async-args login-args)))
4317
4318 ;; Add gateway arguments if necessary.
4319 (when (and gw gw-args)
4320 (setq login-args (append gw-args login-args)))
4321
4322 ;; Check for port number. Until now, there's no need
4323 ;; for handling like method, user, host.
4324 (when (string-match tramp-host-with-port-regexp l-host)
4325 (setq l-port (match-string 2 l-host)
4326 l-host (match-string 1 l-host)))
4327
4328 ;; Set variables for computing the prompt for reading
4329 ;; password. They can also be derived from a gateway.
4330 (setq tramp-current-method (or g-method l-method)
4331 tramp-current-user (or g-user l-user)
4332 tramp-current-host (or g-host l-host))
4333
4334 ;; Replace login-args place holders.
4335 (setq
4336 l-host (or l-host "")
4337 l-user (or l-user "")
4338 l-port (or l-port "")
4339 spec (format-spec-make
4340 ?h l-host ?u l-user ?p l-port ?t tmpfile)
4341 command
4342 (concat
4343 ;; We do not want to see the trailing local prompt in
4344 ;; `start-file-process'.
4345 (unless (memq system-type '(windows-nt)) "exec ")
4346 command " "
4347 (mapconcat
4348 (lambda (x)
4349 (setq x (mapcar (lambda (y) (format-spec y spec)) x))
4350 (unless (member "" x) (mapconcat 'identity x " ")))
4351 login-args " ")
4352 ;; Local shell could be a Windows COMSPEC. It
4353 ;; doesn't know the ";" syntax, but we must exit
4354 ;; always for `start-file-process'. "exec" does not
4355 ;; work either.
4356 (if (memq system-type '(windows-nt)) " && exit || exit")))
4357
4358 ;; Send the command.
4359 (tramp-message vec 3 "Sending command `%s'" command)
4360 (tramp-send-command vec command t t)
4361 (tramp-process-actions p vec pos tramp-actions-before-shell 60)
4362 (tramp-message 4273 (tramp-message
4363 vec 3 "Found remote shell prompt on `%s'" l-host)) 4274 vec 6 "%s" (mapconcat 'identity (process-command p) " "))
4364 ;; Next hop. 4275
4365 (setq target-alist (cdr target-alist))) 4276 ;; Check whether process is alive.
4366 4277 (tramp-barf-if-no-shell-prompt
4367 ;; Make initial shell settings. 4278 p 60
4368 (tramp-open-connection-setup-interactive-shell p vec))))))) 4279 "Couldn't find local shell prompt %s" tramp-encoding-shell)
4280
4281 ;; Now do all the connections as specified.
4282 (while target-alist
4283 (let* ((hop (car target-alist))
4284 (l-method (tramp-file-name-method hop))
4285 (l-user (tramp-file-name-user hop))
4286 (l-host (tramp-file-name-host hop))
4287 (l-port nil)
4288 (login-program
4289 (tramp-get-method-parameter
4290 l-method 'tramp-login-program))
4291 (login-args
4292 (tramp-get-method-parameter
4293 l-method 'tramp-login-args))
4294 (async-args
4295 (tramp-get-method-parameter
4296 l-method 'tramp-async-args))
4297 (gw-args
4298 (tramp-get-method-parameter l-method 'tramp-gw-args))
4299 (gw (tramp-get-file-property hop "" "gateway" nil))
4300 (g-method (and gw (tramp-file-name-method gw)))
4301 (g-user (and gw (tramp-file-name-user gw)))
4302 (g-host (and gw (tramp-file-name-real-host gw)))
4303 (command login-program)
4304 ;; We don't create the temporary file. In
4305 ;; fact, it is just a prefix for the
4306 ;; ControlPath option of ssh; the real
4307 ;; temporary file has another name, and it is
4308 ;; created and protected by ssh. It is also
4309 ;; removed by ssh when the connection is
4310 ;; closed.
4311 (tmpfile
4312 (tramp-set-connection-property
4313 p "temp-file"
4314 (make-temp-name
4315 (expand-file-name
4316 tramp-temp-name-prefix
4317 (tramp-compat-temporary-file-directory)))))
4318 spec)
4319
4320 ;; Add arguments for asynchronous processes.
4321 (when (and process-name async-args)
4322 (setq login-args (append async-args login-args)))
4323
4324 ;; Add gateway arguments if necessary.
4325 (when (and gw gw-args)
4326 (setq login-args (append gw-args login-args)))
4327
4328 ;; Check for port number. Until now, there's no
4329 ;; need for handling like method, user, host.
4330 (when (string-match tramp-host-with-port-regexp l-host)
4331 (setq l-port (match-string 2 l-host)
4332 l-host (match-string 1 l-host)))
4333
4334 ;; Set variables for computing the prompt for
4335 ;; reading password. They can also be derived
4336 ;; from a gateway.
4337 (setq tramp-current-method (or g-method l-method)
4338 tramp-current-user (or g-user l-user)
4339 tramp-current-host (or g-host l-host))
4340
4341 ;; Replace login-args place holders.
4342 (setq
4343 l-host (or l-host "")
4344 l-user (or l-user "")
4345 l-port (or l-port "")
4346 spec (format-spec-make
4347 ?h l-host ?u l-user ?p l-port ?t tmpfile)
4348 command
4349 (concat
4350 ;; We do not want to see the trailing local
4351 ;; prompt in `start-file-process'.
4352 (unless (memq system-type '(windows-nt)) "exec ")
4353 command " "
4354 (mapconcat
4355 (lambda (x)
4356 (setq x (mapcar (lambda (y) (format-spec y spec)) x))
4357 (unless (member "" x) (mapconcat 'identity x " ")))
4358 login-args " ")
4359 ;; Local shell could be a Windows COMSPEC. It
4360 ;; doesn't know the ";" syntax, but we must exit
4361 ;; always for `start-file-process'. "exec" does
4362 ;; not work either.
4363 (if (memq system-type '(windows-nt)) " && exit || exit")))
4364
4365 ;; Send the command.
4366 (tramp-message vec 3 "Sending command `%s'" command)
4367 (tramp-send-command vec command t t)
4368 (tramp-process-actions
4369 p vec pos tramp-actions-before-shell 60)
4370 (tramp-message
4371 vec 3 "Found remote shell prompt on `%s'" l-host))
4372 ;; Next hop.
4373 (setq target-alist (cdr target-alist)))
4374
4375 ;; Make initial shell settings.
4376 (tramp-open-connection-setup-interactive-shell p vec))))
4377
4378 ;; When the user did interrupt, we must cleanup.
4379 (quit
4380 (let ((p (tramp-get-connection-process vec)))
4381 (when (and p (processp p))
4382 (tramp-flush-connection-property vec)
4383 (tramp-flush-connection-property p)
4384 (delete-process p)))
4385 ;; Propagate the quit signal.
4386 (signal (car err) (cdr err)))))))
4369 4387
4370(defun tramp-send-command (vec command &optional neveropen nooutput) 4388(defun tramp-send-command (vec command &optional neveropen nooutput)
4371 "Send the COMMAND to connection VEC. 4389 "Send the COMMAND to connection VEC.
diff --git a/lisp/net/zeroconf.el b/lisp/net/zeroconf.el
index cc538c224dc..a889a6a4177 100644
--- a/lisp/net/zeroconf.el
+++ b/lisp/net/zeroconf.el
@@ -82,7 +82,7 @@
82 82
83;; The function `zeroconf-publish-service' publishes a new service to 83;; The function `zeroconf-publish-service' publishes a new service to
84;; the Avahi daemon. Although the domain, where to the service is 84;; the Avahi daemon. Although the domain, where to the service is
85;; published, can be specified by this function, it is usally the 85;; published, can be specified by this function, it is usually the
86;; default domain "local" (also written as nil or ""). 86;; default domain "local" (also written as nil or "").
87 87
88;; (zeroconf-publish-service 88;; (zeroconf-publish-service
diff --git a/lisp/nxml/rng-valid.el b/lisp/nxml/rng-valid.el
index 9a29e3d4cca..1f69f5d7bf3 100644
--- a/lisp/nxml/rng-valid.el
+++ b/lisp/nxml/rng-valid.el
@@ -377,8 +377,8 @@ The schema is set like `rng-auto-set-schema'."
377(defun rng-kill-timers () 377(defun rng-kill-timers ()
378 ;; rng-validate-timer and rng-validate-quick-timer have the 378 ;; rng-validate-timer and rng-validate-quick-timer have the
379 ;; permanent-local property, so that the timers can be 379 ;; permanent-local property, so that the timers can be
380 ;; cancelled even after changing mode. 380 ;; canceled even after changing mode.
381 ;; This function takes care of cancelling the timers and 381 ;; This function takes care of canceling the timers and
382 ;; then killing the local variables. 382 ;; then killing the local variables.
383 (when (local-variable-p 'rng-validate-timer) 383 (when (local-variable-p 'rng-validate-timer)
384 (when rng-validate-timer 384 (when rng-validate-timer
diff --git a/lisp/obsolete/pgg.el b/lisp/obsolete/pgg.el
index 42030f7d502..876f3744bc2 100644
--- a/lisp/obsolete/pgg.el
+++ b/lisp/obsolete/pgg.el
@@ -174,7 +174,7 @@ is true, or else the output buffer is displayed."
174(defvar pgg-pending-timers (make-vector 7 0) 174(defvar pgg-pending-timers (make-vector 7 0)
175 "Hash table for managing scheduled pgg cache management timers. 175 "Hash table for managing scheduled pgg cache management timers.
176 176
177We associate key and timer, so the timer can be cancelled if a new 177We associate key and timer, so the timer can be canceled if a new
178timeout for the key is set while an old one is still pending.") 178timeout for the key is set while an old one is still pending.")
179 179
180(defun pgg-read-passphrase (prompt &optional key notruncate) 180(defun pgg-read-passphrase (prompt &optional key notruncate)
diff --git a/lisp/org/ChangeLog b/lisp/org/ChangeLog
index 1c8a3e72956..cb518f97a19 100644
--- a/lisp/org/ChangeLog
+++ b/lisp/org/ChangeLog
@@ -278,7 +278,7 @@
278 278
279 * org-archive.el (org-archive-subtree): While it might be possible 279 * org-archive.el (org-archive-subtree): While it might be possible
280 to archive an headline of a temporary buffer (i.e. not visiting a 280 to archive an headline of a temporary buffer (i.e. not visiting a
281 file), it wouldn't be really sensical. 281 file), it wouldn't be really sensible.
282 282
2832011-07-28 Nicolas Goaziou <n.goaziou@gmail.com> 2832011-07-28 Nicolas Goaziou <n.goaziou@gmail.com>
284 284
@@ -4008,7 +4008,7 @@
4008 * org-list.el (org-list-blocks): New variable. 4008 * org-list.el (org-list-blocks): New variable.
4009 (org-list-context): New function. 4009 (org-list-context): New function.
4010 (org-list-full-item-re): New variable. 4010 (org-list-full-item-re): New variable.
4011 (org-list-struct-assoc-at-point): Use new varible. 4011 (org-list-struct-assoc-at-point): Use new variable.
4012 (org-list-struct): Rewrite of function. Now, list data is 4012 (org-list-struct): Rewrite of function. Now, list data is
4013 collected by looking at the list line after line. It reads the 4013 collected by looking at the list line after line. It reads the
4014 whole list each time because reading only a subtree was not enough 4014 whole list each time because reading only a subtree was not enough
@@ -8139,7 +8139,7 @@
81392010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> 81392010-11-11 Nicolas Goaziou <n.goaziou@gmail.com>
8140 8140
8141 * org-list.el (org-insert-item-internal): New function to handle 8141 * org-list.el (org-insert-item-internal): New function to handle
8142 positionning and contents of an item being inserted at a specific 8142 positioning and contents of an item being inserted at a specific
8143 pos. It is not possible anymore to split a term in a description 8143 pos. It is not possible anymore to split a term in a description
8144 list or a checkbox when inserting a new item. 8144 list or a checkbox when inserting a new item.
8145 8145
@@ -9758,7 +9758,7 @@
9758 9758
97592010-07-19 Bastien Guerry <bzg@altern.org> 97592010-07-19 Bastien Guerry <bzg@altern.org>
9760 9760
9761 * org-timer.el (org-timer-set-timer): Fix bug about cancelling 9761 * org-timer.el (org-timer-set-timer): Fix bug about canceling
9762 timers. 9762 timers.
9763 9763
97642010-07-19 David Maus <dmaus@ictsoc.de> 97642010-07-19 David Maus <dmaus@ictsoc.de>
@@ -12582,7 +12582,7 @@
12582 buffer and at the position of the given clock. However, changes 12582 buffer and at the position of the given clock. However, changes
12583 to the current clock are local and have no effect on the user's 12583 to the current clock are local and have no effect on the user's
12584 active clock. This allows, for example, far any clock to be 12584 active clock. This allows, for example, far any clock to be
12585 cancelled without cancelling the active clock. 12585 canceled without canceling the active clock.
12586 (org-clock-clock-in): New inline function that switches the active 12586 (org-clock-clock-in): New inline function that switches the active
12587 clock to the given clock. If either the argument RESUME, or the 12587 clock to the given clock. If either the argument RESUME, or the
12588 global `org-clock-in-resume', are non-nil, it will resume a clock 12588 global `org-clock-in-resume', are non-nil, it will resume a clock
diff --git a/lisp/org/org-agenda.el b/lisp/org/org-agenda.el
index 2f4617f5146..a54f3c4c3d3 100644
--- a/lisp/org/org-agenda.el
+++ b/lisp/org/org-agenda.el
@@ -8331,7 +8331,7 @@ tag and (if present) the flagging note."
8331 (org-agenda-remove-flag hdmarker) 8331 (org-agenda-remove-flag hdmarker)
8332 (let ((win (get-buffer-window "*Flagging Note*"))) 8332 (let ((win (get-buffer-window "*Flagging Note*")))
8333 (and win (delete-window win))) 8333 (and win (delete-window win)))
8334 (message "Entry unflaged")) 8334 (message "Entry unflagged"))
8335 (setq note (org-entry-get hdmarker "THEFLAGGINGNOTE")) 8335 (setq note (org-entry-get hdmarker "THEFLAGGINGNOTE"))
8336 (unless note 8336 (unless note
8337 (error "No flagging note")) 8337 (error "No flagging note"))
@@ -8354,7 +8354,7 @@ tag and (if present) the flagging note."
8354 (org-entry-delete nil "THEFLAGGINGNOTE") 8354 (org-entry-delete nil "THEFLAGGINGNOTE")
8355 (setq newhead (org-get-heading))) 8355 (setq newhead (org-get-heading)))
8356 (org-agenda-change-all-lines newhead marker) 8356 (org-agenda-change-all-lines newhead marker)
8357 (message "Entry unflaged"))) 8357 (message "Entry unflagged")))
8358 8358
8359(defun org-agenda-get-any-marker (&optional pos) 8359(defun org-agenda-get-any-marker (&optional pos)
8360 (or (get-text-property (or pos (point-at-bol)) 'org-hd-marker) 8360 (or (get-text-property (or pos (point-at-bol)) 'org-hd-marker)
diff --git a/lisp/org/org-clock.el b/lisp/org/org-clock.el
index 6d82d4529b6..09b646d40ba 100644
--- a/lisp/org/org-clock.el
+++ b/lisp/org/org-clock.el
@@ -328,7 +328,7 @@ to add an effort property.")
328 "Hook run when stopping the current clock.") 328 "Hook run when stopping the current clock.")
329 329
330(defvar org-clock-cancel-hook nil 330(defvar org-clock-cancel-hook nil
331 "Hook run when cancelling the current clock.") 331 "Hook run when canceling the current clock.")
332(defvar org-clock-goto-hook nil 332(defvar org-clock-goto-hook nil
333 "Hook run when selecting the currently clocked-in entry.") 333 "Hook run when selecting the currently clocked-in entry.")
334(defvar org-clock-has-been-used nil 334(defvar org-clock-has-been-used nil
@@ -346,7 +346,7 @@ to add an effort property.")
346(defvar org-clock-start-time "") 346(defvar org-clock-start-time "")
347 347
348(defvar org-clock-leftover-time nil 348(defvar org-clock-leftover-time nil
349 "If non-nil, user cancelled a clock; this is when leftover time started.") 349 "If non-nil, user canceled a clock; this is when leftover time started.")
350 350
351(defvar org-clock-effort "" 351(defvar org-clock-effort ""
352 "Effort estimate of the currently clocking task.") 352 "Effort estimate of the currently clocking task.")
diff --git a/lisp/org/org-list.el b/lisp/org/org-list.el
index a86c145a9ee..72fc71854e2 100644
--- a/lisp/org/org-list.el
+++ b/lisp/org/org-list.el
@@ -68,7 +68,7 @@
68 68
69;; Computing a list structure can be a costly operation on huge lists 69;; Computing a list structure can be a costly operation on huge lists
70;; (a few thousand lines long). Thus, code should follow the rule : 70;; (a few thousand lines long). Thus, code should follow the rule :
71;; "collect once, use many". As a corollary, it is usally a bad idea 71;; "collect once, use many". As a corollary, it is usually a bad idea
72;; to use directly an interactive function inside the code, as those, 72;; to use directly an interactive function inside the code, as those,
73;; being independent entities, read the whole list structure another 73;; being independent entities, read the whole list structure another
74;; time. 74;; time.
diff --git a/lisp/org/org-protocol.el b/lisp/org/org-protocol.el
index 655123cafa9..ca7bfe2a4d0 100644
--- a/lisp/org/org-protocol.el
+++ b/lisp/org/org-protocol.el
@@ -145,8 +145,8 @@
145(defgroup org-protocol nil 145(defgroup org-protocol nil
146 "Intercept calls from emacsclient to trigger custom actions. 146 "Intercept calls from emacsclient to trigger custom actions.
147 147
148This is done by advising `server-visit-files' to scann the list of filenames 148This is done by advising `server-visit-files' to scan the list of filenames
149for `org-protocol-the-protocol' and sub-procols defined in 149for `org-protocol-the-protocol' and sub-protocols defined in
150`org-protocol-protocol-alist' and `org-protocol-protocol-alist-default'." 150`org-protocol-protocol-alist' and `org-protocol-protocol-alist-default'."
151 :version "22.1" 151 :version "22.1"
152 :group 'convenience 152 :group 'convenience
diff --git a/lisp/org/org-publish.el b/lisp/org/org-publish.el
index 0c924cd9f07..61edef50738 100644
--- a/lisp/org/org-publish.el
+++ b/lisp/org/org-publish.el
@@ -278,12 +278,12 @@ in the sitemap."
278 :type 'string) 278 :type 'string)
279 279
280(defcustom org-publish-sitemap-file-entry-format "%t" 280(defcustom org-publish-sitemap-file-entry-format "%t"
281 "How a sitemap file entry is formated. 281 "How a sitemap file entry is formatted.
282You could use brackets to delimit on what part the link will be. 282You could use brackets to delimit on what part the link will be.
283 283
284%t is the title. 284%t is the title.
285%a is the author. 285%a is the author.
286%d is the date formated using `org-publish-sitemap-date-format'." 286%d is the date formatted using `org-publish-sitemap-date-format'."
287 :group 'org-publish 287 :group 'org-publish
288 :type 'string) 288 :type 'string)
289 289
diff --git a/lisp/org/org-taskjuggler.el b/lisp/org/org-taskjuggler.el
index 1fb3114bf3f..45b16aecf12 100644
--- a/lisp/org/org-taskjuggler.el
+++ b/lisp/org/org-taskjuggler.el
@@ -571,7 +571,7 @@ with separator \"\n\"."
571 (and filtered-items (mapconcat 'identity filtered-items "\n")))) 571 (and filtered-items (mapconcat 'identity filtered-items "\n"))))
572 572
573(defun org-taskjuggler-get-attributes (item attributes) 573(defun org-taskjuggler-get-attributes (item attributes)
574 "Return all attribute as a single formated string. ITEM is an 574 "Return all attributes as a single formatted string. ITEM is an
575alist representing either a resource or a task. ATTRIBUTES is a 575alist representing either a resource or a task. ATTRIBUTES is a
576list of symbols. Only entries from ITEM are considered that are 576list of symbols. Only entries from ITEM are considered that are
577listed in ATTRIBUTES." 577listed in ATTRIBUTES."
diff --git a/lisp/pcmpl-gnu.el b/lisp/pcmpl-gnu.el
index b2c8de6ec2f..608a9dc2e88 100644
--- a/lisp/pcmpl-gnu.el
+++ b/lisp/pcmpl-gnu.el
@@ -309,7 +309,8 @@
309 (let* ((fa (file-attributes (pcomplete-arg 1))) 309 (let* ((fa (file-attributes (pcomplete-arg 1)))
310 (size (nth 7 fa))) 310 (size (nth 7 fa)))
311 (and (numberp size) 311 (and (numberp size)
312 (< size large-file-warning-threshold)))) 312 (or (null large-file-warning-threshold)
313 (< size large-file-warning-threshold)))))
313 (let ((file (pcomplete-arg 1))) 314 (let ((file (pcomplete-arg 1)))
314 (completion-table-dynamic 315 (completion-table-dynamic
315 (lambda (_string) 316 (lambda (_string)
diff --git a/lisp/play/gametree.el b/lisp/play/gametree.el
index 4d514d2d0aa..e7ed146b4a1 100644
--- a/lisp/play/gametree.el
+++ b/lisp/play/gametree.el
@@ -549,7 +549,7 @@ Argument is a character, naming the register."
549(defun gametree-save-and-hack-layout () 549(defun gametree-save-and-hack-layout ()
550 "Save the current tree layout and hack the file local variable spec. 550 "Save the current tree layout and hack the file local variable spec.
551This function saves the current layout in `gametree-local-layout' and, 551This function saves the current layout in `gametree-local-layout' and,
552if a local file varible specification for this variable exists in the 552if a local file variable specification for this variable exists in the
553buffer, it is replaced by the new value. See the documentation for 553buffer, it is replaced by the new value. See the documentation for
554`gametree-local-layout' for more information." 554`gametree-local-layout' for more information."
555 (interactive) 555 (interactive)
diff --git a/lisp/progmodes/cc-cmds.el b/lisp/progmodes/cc-cmds.el
index 8e4ac92d96f..4981bbfd2bc 100644
--- a/lisp/progmodes/cc-cmds.el
+++ b/lisp/progmodes/cc-cmds.el
@@ -2051,7 +2051,7 @@ function does not require the declaration to contain a brace block."
2051 (c-narrow-to-comment-innards range) ; This may move point back. 2051 (c-narrow-to-comment-innards range) ; This may move point back.
2052 (let* ((here (point)) 2052 (let* ((here (point))
2053 last 2053 last
2054 (here-filler ; matches WS and comment-prefices at point. 2054 (here-filler ; matches WS and comment-prefixes at point.
2055 (concat "\\=\\(^[ \t]*\\(" c-current-comment-prefix "\\)" 2055 (concat "\\=\\(^[ \t]*\\(" c-current-comment-prefix "\\)"
2056 "\\|[ \t\n\r\f]\\)*")) 2056 "\\|[ \t\n\r\f]\\)*"))
2057 (prefix-at-bol-here ; matches WS and prefix at BOL, just before point 2057 (prefix-at-bol-here ; matches WS and prefix at BOL, just before point
@@ -2071,7 +2071,7 @@ function does not require the declaration to contain a brace block."
2071 2071
2072 ;; Now seek successively earlier sentence ends between PAR-BEG and 2072 ;; Now seek successively earlier sentence ends between PAR-BEG and
2073 ;; HERE, until the "start of sentence" following it is earlier than 2073 ;; HERE, until the "start of sentence" following it is earlier than
2074 ;; HERE, or we hit PAR-BEG. Beware of comment prefices! 2074 ;; HERE, or we hit PAR-BEG. Beware of comment prefixes!
2075 (while (and (re-search-backward (c-sentence-end) par-beg 'limit) 2075 (while (and (re-search-backward (c-sentence-end) par-beg 'limit)
2076 (setq last (point)) 2076 (setq last (point))
2077 (goto-char (match-end 0)) ; tentative beginning of sentence 2077 (goto-char (match-end 0)) ; tentative beginning of sentence
diff --git a/lisp/progmodes/dcl-mode.el b/lisp/progmodes/dcl-mode.el
index d855861d552..eeb145e2b1a 100644
--- a/lisp/progmodes/dcl-mode.el
+++ b/lisp/progmodes/dcl-mode.el
@@ -708,7 +708,7 @@ Returns point of the found command line or nil if not able to move."
708 (setq done t) ; not a label-only line, exit the loop 708 (setq done t) ; not a label-only line, exit the loop
709 (setq retval (point)))) 709 (setq retval (point))))
710 ;; We couldn't go further back, and we haven't found a command yet. 710 ;; We couldn't go further back, and we haven't found a command yet.
711 ;; Return to the start positionn 711 ;; Return to the start position.
712 (goto-char start) 712 (goto-char start)
713 (setq done t) 713 (setq done t)
714 (setq retval nil))) 714 (setq retval nil)))
@@ -756,7 +756,7 @@ Returns point of the found command line or nil if not able to move."
756 (setq done t) ; not a label-only line, exit the loop 756 (setq done t) ; not a label-only line, exit the loop
757 (setq retval (point))))) 757 (setq retval (point)))))
758 ;; We couldn't go further back, and we haven't found a command yet. 758 ;; We couldn't go further back, and we haven't found a command yet.
759 ;; Return to the start positionn 759 ;; Return to the start position.
760 (goto-char start) 760 (goto-char start)
761 (setq done t) 761 (setq done t)
762 (setq retval nil))) 762 (setq retval nil)))
diff --git a/lisp/progmodes/idlwave.el b/lisp/progmodes/idlwave.el
index d8715599d74..24deb569d74 100644
--- a/lisp/progmodes/idlwave.el
+++ b/lisp/progmodes/idlwave.el
@@ -7866,7 +7866,7 @@ itself."
7866 "Display online help about the completion at point." 7866 "Display online help about the completion at point."
7867 (interactive "eP") 7867 (interactive "eP")
7868 ;; Restore last-command for next command, to make 7868 ;; Restore last-command for next command, to make
7869 ;; scrolling/cancelling of completions work. 7869 ;; scrolling/canceling of completions work.
7870 (setq this-command last-command) 7870 (setq this-command last-command)
7871 (idlwave-do-mouse-completion-help ev)) 7871 (idlwave-do-mouse-completion-help ev))
7872 7872
diff --git a/lisp/progmodes/js.el b/lisp/progmodes/js.el
index 94a9c250fee..f0c86265232 100644
--- a/lisp/progmodes/js.el
+++ b/lisp/progmodes/js.el
@@ -3000,7 +3000,7 @@ browser, respectively."
3000 '(js> ((fifth hitab) "selectedTab") (fourth hitab)) 3000 '(js> ((fifth hitab) "selectedTab") (fourth hitab))
3001 cmds))) 3001 cmds)))
3002 3002
3003 ;; Hilighting whole window 3003 ;; Highlighting whole window
3004 ((third hitab) 3004 ((third hitab)
3005 (push '(js! ((third hitab) "document" 3005 (push '(js! ((third hitab) "document"
3006 "documentElement" "setAttribute") 3006 "documentElement" "setAttribute")
diff --git a/lisp/progmodes/prolog.el b/lisp/progmodes/prolog.el
index 24ca78ad4ef..5b229cc0c24 100644
--- a/lisp/progmodes/prolog.el
+++ b/lisp/progmodes/prolog.el
@@ -868,8 +868,9 @@ VERSION is of the format (Major . Minor)"
868(defun prolog-find-value-by-system (alist) 868(defun prolog-find-value-by-system (alist)
869 "Get value from ALIST according to `prolog-system'." 869 "Get value from ALIST according to `prolog-system'."
870 (let ((system (or prolog-system 870 (let ((system (or prolog-system
871 (buffer-local-value 'prolog-system 871 (let ((infbuf (prolog-inferior-buffer 'dont-run)))
872 (prolog-inferior-buffer 'dont-run))))) 872 (when infbuf
873 (buffer-local-value 'prolog-system infbuf))))))
873 (if (listp alist) 874 (if (listp alist)
874 (let (result 875 (let (result
875 id) 876 id)
@@ -1522,7 +1523,7 @@ This function must be called from the source code buffer."
1522 ;; Emacs-20). 1523 ;; Emacs-20).
1523 (set (make-local-variable 'compilation-parse-errors-function) 1524 (set (make-local-variable 'compilation-parse-errors-function)
1524 'prolog-parse-sicstus-compilation-errors)) 1525 'prolog-parse-sicstus-compilation-errors))
1525 (toggle-read-only 0) 1526 (setq buffer-read-only nil)
1526 (insert command-string "\n")) 1527 (insert command-string "\n"))
1527 (save-selected-window 1528 (save-selected-window
1528 (pop-to-buffer buffer)) 1529 (pop-to-buffer buffer))
diff --git a/lisp/progmodes/verilog-mode.el b/lisp/progmodes/verilog-mode.el
index 3570a2cfa3e..3ae66a477e8 100644
--- a/lisp/progmodes/verilog-mode.el
+++ b/lisp/progmodes/verilog-mode.el
@@ -87,7 +87,7 @@
87;; you may add the below lines (the values of the variables presented 87;; you may add the below lines (the values of the variables presented
88;; here are the defaults). Note also that if you use an Emacs that 88;; here are the defaults). Note also that if you use an Emacs that
89;; supports custom, it's probably better to use the custom menu to 89;; supports custom, it's probably better to use the custom menu to
90;; edit these. If working as a member of a large team these settings 90;; edit these. If working as a member of a large team these settings
91;; should be common across all users (in a site-start file), or set 91;; should be common across all users (in a site-start file), or set
92;; in Local Variables in every file. Otherwise, different people's 92;; in Local Variables in every file. Otherwise, different people's
93;; AUTO expansion may result different whitespace changes. 93;; AUTO expansion may result different whitespace changes.
@@ -123,9 +123,9 @@
123;;; Code: 123;;; Code:
124 124
125;; This variable will always hold the version number of the mode 125;; This variable will always hold the version number of the mode
126(defconst verilog-mode-version "650" 126(defconst verilog-mode-version "725"
127 "Version of this Verilog mode.") 127 "Version of this Verilog mode.")
128(defconst verilog-mode-release-date "2010-11-05-GNU" 128(defconst verilog-mode-release-date "2011-11-27-GNU"
129 "Release date of this Verilog mode.") 129 "Release date of this Verilog mode.")
130(defconst verilog-mode-release-emacs t 130(defconst verilog-mode-release-emacs t
131 "If non-nil, this version of Verilog mode was released with Emacs itself.") 131 "If non-nil, this version of Verilog mode was released with Emacs itself.")
@@ -174,6 +174,18 @@
174 (char-after (1- (point))))) 174 (char-after (1- (point)))))
175 (error nil)) 175 (error nil))
176 (condition-case nil 176 (condition-case nil
177 (if (fboundp 'when)
178 nil ;; fab
179 (defsubst point-at-bol (&optional N)
180 (save-excursion (beginning-of-line N) (point))))
181 (error nil))
182 (condition-case nil
183 (if (fboundp 'when)
184 nil ;; fab
185 (defsubst point-at-eol (&optional N)
186 (save-excursion (end-of-line N) (point))))
187 (error nil))
188 (condition-case nil
177 (require 'custom) 189 (require 'custom)
178 (error nil)) 190 (error nil))
179 (condition-case nil 191 (condition-case nil
@@ -275,8 +287,19 @@ STRING should be given if the last search was by `string-match' on STRING."
275(eval-and-compile 287(eval-and-compile
276 ;; Both xemacs and emacs 288 ;; Both xemacs and emacs
277 (condition-case nil 289 (condition-case nil
290 (require 'diff) ;; diff-command and diff-switches
291 (error nil))
292 (condition-case nil
293 (require 'compile) ;; compilation-error-regexp-alist-alist
294 (error nil))
295 (condition-case nil
278 (unless (fboundp 'buffer-chars-modified-tick) ;; Emacs 22 added 296 (unless (fboundp 'buffer-chars-modified-tick) ;; Emacs 22 added
279 (defmacro buffer-chars-modified-tick () (buffer-modified-tick))) 297 (defmacro buffer-chars-modified-tick () (buffer-modified-tick)))
298 (error nil))
299 ;; Added in Emacs 24.1
300 (condition-case nil
301 (unless (fboundp 'prog-mode)
302 (define-derived-mode prog-mode fundamental-mode "Prog"))
280 (error nil))) 303 (error nil)))
281 304
282(eval-when-compile 305(eval-when-compile
@@ -310,6 +333,14 @@ STRING should be given if the last search was by `string-match' on STRING."
310;; `("Verilog" ("MA" ["SAA" nil :help "Help SAA"] ["SAB" nil :help "Help SAA"]) 333;; `("Verilog" ("MA" ["SAA" nil :help "Help SAA"] ["SAB" nil :help "Help SAA"])
311;; "----" ["MB" nil :help "Help MB"])) 334;; "----" ["MB" nil :help "Help MB"]))
312 335
336(defun verilog-define-abbrev (table name expansion &optional hook)
337 "Filter `define-abbrev' TABLE NAME EXPANSION and call HOOK.
338Provides SYSTEM-FLAG in newer Emacs."
339 (condition-case nil
340 (define-abbrev table name expansion hook 0 t)
341 (error
342 (define-abbrev table name expansion hook))))
343
313(defun verilog-customize () 344(defun verilog-customize ()
314 "Customize variables and other settings used by Verilog-Mode." 345 "Customize variables and other settings used by Verilog-Mode."
315 (interactive) 346 (interactive)
@@ -335,9 +366,31 @@ This function may be removed when Emacs 21 is no longer supported."
335 ;; And GNU Emacs 22 has obsoleted last-command-char 366 ;; And GNU Emacs 22 has obsoleted last-command-char
336 last-command-event))) 367 last-command-event)))
337 368
338(defalias 'verilog-syntax-ppss 369(defvar verilog-no-change-functions nil
339 (if (fboundp 'syntax-ppss) 'syntax-ppss 370 "True if `after-change-functions' is disabled.
340 (lambda (&optional pos) (parse-partial-sexp (point-min) (or pos (point)))))) 371Use of `syntax-ppss' may break, as ppss's cache may get corrupted.")
372
373(defvar verilog-in-hooks nil
374 "True when within a `verilog-run-hooks' block.")
375
376(defmacro verilog-run-hooks (&rest hooks)
377 "Run each hook in HOOKS using `run-hooks'.
378Set `verilog-in-hooks' during this time, to assist AUTO caches."
379 `(let ((verilog-in-hooks t))
380 (run-hooks ,@hooks)))
381
382(defun verilog-syntax-ppss (&optional pos)
383 (when verilog-no-change-functions
384 (if verilog-in-hooks
385 (verilog-scan-cache-flush)
386 ;; else don't let the AUTO code itself get away with flushing the cache,
387 ;; as that'll make things very slow
388 (backtrace)
389 (error "%s: Internal problem; use of syntax-ppss when cache may be corrupt"
390 (verilog-point-text))))
391 (if (fboundp 'syntax-ppss)
392 (syntax-ppss pos)
393 (parse-partial-sexp (point-min) (or pos (point)))))
341 394
342(defgroup verilog-mode nil 395(defgroup verilog-mode nil
343 "Facilitates easy editing of Verilog source text." 396 "Facilitates easy editing of Verilog source text."
@@ -631,6 +684,22 @@ file referenced. If false, this is not supported."
631 :type 'boolean) 684 :type 'boolean)
632(put 'verilog-highlight-includes 'safe-local-variable 'verilog-booleanp) 685(put 'verilog-highlight-includes 'safe-local-variable 'verilog-booleanp)
633 686
687(defcustom verilog-auto-declare-nettype nil
688 "*Non-nil specifies the data type to use with `verilog-auto-input' etc.
689Set this to \"wire\" if the Verilog code uses \"`default_nettype
690none\". Note using `default_nettype none isn't recommended practice; this
691mode is experimental."
692 :group 'verilog-mode-actions
693 :type 'boolean)
694(put 'verilog-auto-declare-nettype 'safe-local-variable `stringp)
695
696(defcustom verilog-auto-wire-type nil
697 "*Non-nil specifies the data type to use with `verilog-auto-wire' etc.
698Set this to \"logic\" for SystemVerilog code, or use `verilog-auto-logic'."
699 :group 'verilog-mode-actions
700 :type 'boolean)
701(put 'verilog-auto-wire-type 'safe-local-variable `stringp)
702
634(defcustom verilog-auto-endcomments t 703(defcustom verilog-auto-endcomments t
635 "*True means insert a comment /* ... */ after 'end's. 704 "*True means insert a comment /* ... */ after 'end's.
636The name of the function or case will be set between the braces." 705The name of the function or case will be set between the braces."
@@ -638,6 +707,12 @@ The name of the function or case will be set between the braces."
638 :type 'boolean) 707 :type 'boolean)
639(put 'verilog-auto-endcomments 'safe-local-variable 'verilog-booleanp) 708(put 'verilog-auto-endcomments 'safe-local-variable 'verilog-booleanp)
640 709
710(defcustom verilog-auto-delete-trailing-whitespace nil
711 "*True means to `delete-trailing-whitespace' in `verilog-auto'."
712 :group 'verilog-mode-actions
713 :type 'boolean)
714(put 'verilog-auto-delete-trailing-whitespace 'safe-local-variable 'verilog-booleanp)
715
641(defcustom verilog-auto-ignore-concat nil 716(defcustom verilog-auto-ignore-concat nil
642 "*True means ignore signals in {...} concatenations for AUTOWIRE etc. 717 "*True means ignore signals in {...} concatenations for AUTOWIRE etc.
643This will exclude signals referenced as pin connections in {...} 718This will exclude signals referenced as pin connections in {...}
@@ -696,6 +771,12 @@ always be saved."
696(defvar verilog-auto-last-file-locals nil 771(defvar verilog-auto-last-file-locals nil
697 "Text from file-local-variables during last evaluation.") 772 "Text from file-local-variables during last evaluation.")
698 773
774(defvar verilog-diff-function 'verilog-diff-report
775 "*Function to run when `verilog-diff-auto' detects differences.
776Function takes three arguments, the original buffer, the
777difference buffer, and the point in original buffer with the
778first difference.")
779
699;;; Compile support 780;;; Compile support
700(require 'compile) 781(require 'compile)
701(defvar verilog-error-regexp-added nil) 782(defvar verilog-error-regexp-added nil)
@@ -896,6 +977,19 @@ of each Verilog file that requires it, rather than being set globally."
896 :type 'boolean) 977 :type 'boolean)
897(put 'verilog-auto-sense-defines-constant 'safe-local-variable 'verilog-booleanp) 978(put 'verilog-auto-sense-defines-constant 'safe-local-variable 'verilog-booleanp)
898 979
980(defcustom verilog-auto-reset-blocking-in-non t
981 "*If true, AUTORESET will reset those signals which were
982assigned with blocking assignments (=) even in a block with
983non-blocking assignments (<=).
984
985If nil, all blocking assigned signals are ignored when any
986non-blocking assignment is in the AUTORESET block. This allows
987blocking assignments to be used for temporary values and not have
988those temporaries reset. See example in `verilog-auto-reset'."
989 :type 'boolean
990 :group 'verilog-mode-auto)
991(put 'verilog-auto-reset-blocking-in-non 'safe-local-variable 'verilog-booleanp)
992
899(defcustom verilog-auto-reset-widths t 993(defcustom verilog-auto-reset-widths t
900 "*If true, AUTORESET should determine the width of signals. 994 "*If true, AUTORESET should determine the width of signals.
901This is then used to set the width of the zero (32'h0 for example). This 995This is then used to set the width of the zero (32'h0 for example). This
@@ -917,7 +1011,9 @@ the MSB or LSB of a signal inside an AUTORESET."
917Declaration order is advantageous with order based instantiations 1011Declaration order is advantageous with order based instantiations
918and is the default for backward compatibility. Sorted order 1012and is the default for backward compatibility. Sorted order
919reduces changes when declarations are moved around in a file, and 1013reduces changes when declarations are moved around in a file, and
920it's bad practice to rely on order based instantiations anyhow." 1014it's bad practice to rely on order based instantiations anyhow.
1015
1016See also `verilog-auto-inst-sort'."
921 :group 'verilog-mode-auto 1017 :group 'verilog-mode-auto
922 :type 'boolean) 1018 :type 'boolean)
923(put 'verilog-auto-arg-sort 'safe-local-variable 'verilog-booleanp) 1019(put 'verilog-auto-arg-sort 'safe-local-variable 'verilog-booleanp)
@@ -969,6 +1065,18 @@ instead expand to:
969 :type 'boolean) 1065 :type 'boolean)
970(put 'verilog-auto-inst-param-value 'safe-local-variable 'verilog-booleanp) 1066(put 'verilog-auto-inst-param-value 'safe-local-variable 'verilog-booleanp)
971 1067
1068(defcustom verilog-auto-inst-sort nil
1069 "*If set, AUTOINST signal names will be sorted, not in declaration order.
1070Also affects AUTOINSTPARAM. Declaration order is the default for
1071backward compatibility, and as some teams prefer signals that are
1072declared together to remain together. Sorted order reduces
1073changes when declarations are moved around in a file.
1074
1075See also `verilog-auto-arg-sort'."
1076 :group 'verilog-mode-auto
1077 :type 'boolean)
1078(put 'verilog-auto-inst-sort 'safe-local-variable 'verilog-booleanp)
1079
972(defcustom verilog-auto-inst-vector t 1080(defcustom verilog-auto-inst-vector t
973 "*If true, when creating default ports with AUTOINST, use bus subscripts. 1081 "*If true, when creating default ports with AUTOINST, use bus subscripts.
974If nil, skip the subscript when it matches the entire bus as declared in 1082If nil, skip the subscript when it matches the entire bus as declared in
@@ -981,12 +1089,20 @@ speed up some simulators, but is less general and harder to read, so avoid."
981 1089
982(defcustom verilog-auto-inst-template-numbers nil 1090(defcustom verilog-auto-inst-template-numbers nil
983 "*If true, when creating templated ports with AUTOINST, add a comment. 1091 "*If true, when creating templated ports with AUTOINST, add a comment.
984The comment will add the line number of the template that was used for that 1092
985port declaration. Setting this aids in debugging, but nil is suggested for 1093If t, the comment will add the line number of the template that
986regular use to prevent large numbers of merge conflicts." 1094was used for that port declaration. This setting is suggested
1095only for debugging use, as regular use may cause a large numbers
1096of merge conflicts.
1097
1098If 'lhs', the comment will show the left hand side of the
1099AUTO_TEMPLATE rule that is matched. This is less precise than
1100numbering (t) when multiple rules have the same pin name, but
1101won't merge conflict."
987 :group 'verilog-mode-auto 1102 :group 'verilog-mode-auto
988 :type 'boolean) 1103 :type '(choice (const nil) (const t) (const lhs)))
989(put 'verilog-auto-inst-template-numbers 'safe-local-variable 'verilog-booleanp) 1104(put 'verilog-auto-inst-template-numbers 'safe-local-variable
1105 '(lambda (x) (memq x '(nil t lhs))))
990 1106
991(defcustom verilog-auto-inst-column 40 1107(defcustom verilog-auto-inst-column 40
992 "*Indent-to column number for net name part of AUTOINST created pin." 1108 "*Indent-to column number for net name part of AUTOINST created pin."
@@ -1015,6 +1131,14 @@ See the \\[verilog-faq] for examples on using this."
1015 :type 'string) 1131 :type 'string)
1016(put 'verilog-auto-output-ignore-regexp 'safe-local-variable 'stringp) 1132(put 'verilog-auto-output-ignore-regexp 'safe-local-variable 'stringp)
1017 1133
1134(defcustom verilog-auto-tieoff-declaration "wire"
1135 "*Data type used for the declaration for AUTOTIEOFF. If \"wire\" then
1136create a wire, if \"assign\" create an assignment, else the data type for
1137variable creation."
1138 :group 'verilog-mode-auto
1139 :type 'string)
1140(put 'verilog-auto-tieoff-declaration 'safe-local-variable 'stringp)
1141
1018(defcustom verilog-auto-tieoff-ignore-regexp nil 1142(defcustom verilog-auto-tieoff-ignore-regexp nil
1019 "*If set, when creating AUTOTIEOFF list, ignore signals matching this regexp. 1143 "*If set, when creating AUTOTIEOFF list, ignore signals matching this regexp.
1020See the \\[verilog-faq] for examples on using this." 1144See the \\[verilog-faq] for examples on using this."
@@ -1114,8 +1238,10 @@ If set will become buffer local.")
1114 (define-key map "\M-\r" `electric-verilog-terminate-and-indent) 1238 (define-key map "\M-\r" `electric-verilog-terminate-and-indent)
1115 (define-key map "\M-\t" 'verilog-complete-word) 1239 (define-key map "\M-\t" 'verilog-complete-word)
1116 (define-key map "\M-?" 'verilog-show-completions) 1240 (define-key map "\M-?" 'verilog-show-completions)
1241 ;; Note \C-c and letter are reserved for users
1117 (define-key map "\C-c\`" 'verilog-lint-off) 1242 (define-key map "\C-c\`" 'verilog-lint-off)
1118 (define-key map "\C-c\*" 'verilog-delete-auto-star-implicit) 1243 (define-key map "\C-c\*" 'verilog-delete-auto-star-implicit)
1244 (define-key map "\C-c\?" 'verilog-diff-auto)
1119 (define-key map "\C-c\C-r" 'verilog-label-be) 1245 (define-key map "\C-c\C-r" 'verilog-label-be)
1120 (define-key map "\C-c\C-i" 'verilog-pretty-declarations) 1246 (define-key map "\C-c\C-i" 'verilog-pretty-declarations)
1121 (define-key map "\C-c=" 'verilog-pretty-expr) 1247 (define-key map "\C-c=" 'verilog-pretty-expr)
@@ -1241,6 +1367,8 @@ If set will become buffer local.")
1241 :help "Expand AUTO meta-comment statements"] 1367 :help "Expand AUTO meta-comment statements"]
1242 ["Kill AUTOs" verilog-delete-auto 1368 ["Kill AUTOs" verilog-delete-auto
1243 :help "Remove AUTO expansions"] 1369 :help "Remove AUTO expansions"]
1370 ["Diff AUTOs" verilog-diff-auto
1371 :help "Show differences in AUTO expansions"]
1244 ["Inject AUTOs" verilog-inject-auto 1372 ["Inject AUTOs" verilog-inject-auto
1245 :help "Inject AUTOs into legacy non-AUTO buffer"] 1373 :help "Inject AUTOs into legacy non-AUTO buffer"]
1246 ("AUTO Help..." 1374 ("AUTO Help..."
@@ -1264,6 +1392,8 @@ If set will become buffer local.")
1264 :help "Help on AUTOASCIIENUM - creating ASCII for enumerations"] 1392 :help "Help on AUTOASCIIENUM - creating ASCII for enumerations"]
1265 ["AUTOINOUTCOMP" (describe-function 'verilog-auto-inout-comp) 1393 ["AUTOINOUTCOMP" (describe-function 'verilog-auto-inout-comp)
1266 :help "Help on AUTOINOUTCOMP - copying complemented i/o from another file"] 1394 :help "Help on AUTOINOUTCOMP - copying complemented i/o from another file"]
1395 ["AUTOINOUTIN" (describe-function 'verilog-auto-inout-in)
1396 :help "Help on AUTOINOUTCOMP - copying i/o from another file as all inputs"]
1267 ["AUTOINOUTMODULE" (describe-function 'verilog-auto-inout-module) 1397 ["AUTOINOUTMODULE" (describe-function 'verilog-auto-inout-module)
1268 :help "Help on AUTOINOUTMODULE - copying i/o from another file"] 1398 :help "Help on AUTOINOUTMODULE - copying i/o from another file"]
1269 ["AUTOINSERTLISP" (describe-function 'verilog-auto-insert-lisp) 1399 ["AUTOINSERTLISP" (describe-function 'verilog-auto-insert-lisp)
@@ -1278,6 +1408,8 @@ If set will become buffer local.")
1278 :help "Help on expanding Verilog-2001 .* pins"] 1408 :help "Help on expanding Verilog-2001 .* pins"]
1279 ["AUTOINSTPARAM" (describe-function 'verilog-auto-inst-param) 1409 ["AUTOINSTPARAM" (describe-function 'verilog-auto-inst-param)
1280 :help "Help on AUTOINSTPARAM - adding parameter pins to cells"] 1410 :help "Help on AUTOINSTPARAM - adding parameter pins to cells"]
1411 ["AUTOLOGIC" (describe-function 'verilog-auto-logic)
1412 :help "Help on AUTOLOGIC - declaring logic signals"]
1281 ["AUTOOUTPUT" (describe-function 'verilog-auto-output) 1413 ["AUTOOUTPUT" (describe-function 'verilog-auto-output)
1282 :help "Help on AUTOOUTPUT - adding outputs from cells"] 1414 :help "Help on AUTOOUTPUT - adding outputs from cells"]
1283 ["AUTOOUTPUTEVERY" (describe-function 'verilog-auto-output-every) 1415 ["AUTOOUTPUTEVERY" (describe-function 'verilog-auto-output-every)
@@ -1318,6 +1450,10 @@ If set will become buffer local.")
1318 "----" 1450 "----"
1319 ["Module" verilog-sk-module 1451 ["Module" verilog-sk-module
1320 :help "Insert a module .. (/*AUTOARG*/);.. endmodule block"] 1452 :help "Insert a module .. (/*AUTOARG*/);.. endmodule block"]
1453 ["OVM Class" verilog-sk-ovm-class
1454 :help "Insert an OVM class block"]
1455 ["UVM Class" verilog-sk-uvm-class
1456 :help "Insert an UVM class block"]
1321 ["Primitive" verilog-sk-primitive 1457 ["Primitive" verilog-sk-primitive
1322 :help "Insert a primitive .. (.. );.. endprimitive block"] 1458 :help "Insert a primitive .. (.. );.. endprimitive block"]
1323 "----" 1459 "----"
@@ -1372,6 +1508,31 @@ If set will become buffer local.")
1372 "Abbrev table in use in Verilog-mode buffers.") 1508 "Abbrev table in use in Verilog-mode buffers.")
1373 1509
1374(define-abbrev-table 'verilog-mode-abbrev-table ()) 1510(define-abbrev-table 'verilog-mode-abbrev-table ())
1511(verilog-define-abbrev verilog-mode-abbrev-table "class" "" 'verilog-sk-ovm-class)
1512(verilog-define-abbrev verilog-mode-abbrev-table "always" "" 'verilog-sk-always)
1513(verilog-define-abbrev verilog-mode-abbrev-table "begin" nil `verilog-sk-begin)
1514(verilog-define-abbrev verilog-mode-abbrev-table "case" "" `verilog-sk-case)
1515(verilog-define-abbrev verilog-mode-abbrev-table "for" "" `verilog-sk-for)
1516(verilog-define-abbrev verilog-mode-abbrev-table "generate" "" `verilog-sk-generate)
1517(verilog-define-abbrev verilog-mode-abbrev-table "initial" "" `verilog-sk-initial)
1518(verilog-define-abbrev verilog-mode-abbrev-table "fork" "" `verilog-sk-fork)
1519(verilog-define-abbrev verilog-mode-abbrev-table "module" "" `verilog-sk-module)
1520(verilog-define-abbrev verilog-mode-abbrev-table "primitive" "" `verilog-sk-primitive)
1521(verilog-define-abbrev verilog-mode-abbrev-table "repeat" "" `verilog-sk-repeat)
1522(verilog-define-abbrev verilog-mode-abbrev-table "specify" "" `verilog-sk-specify)
1523(verilog-define-abbrev verilog-mode-abbrev-table "task" "" `verilog-sk-task)
1524(verilog-define-abbrev verilog-mode-abbrev-table "while" "" `verilog-sk-while)
1525(verilog-define-abbrev verilog-mode-abbrev-table "casex" "" `verilog-sk-casex)
1526(verilog-define-abbrev verilog-mode-abbrev-table "casez" "" `verilog-sk-casez)
1527(verilog-define-abbrev verilog-mode-abbrev-table "if" "" `verilog-sk-if)
1528(verilog-define-abbrev verilog-mode-abbrev-table "else if" "" `verilog-sk-else-if)
1529(verilog-define-abbrev verilog-mode-abbrev-table "assign" "" `verilog-sk-assign)
1530(verilog-define-abbrev verilog-mode-abbrev-table "function" "" `verilog-sk-function)
1531(verilog-define-abbrev verilog-mode-abbrev-table "input" "" `verilog-sk-input)
1532(verilog-define-abbrev verilog-mode-abbrev-table "output" "" `verilog-sk-output)
1533(verilog-define-abbrev verilog-mode-abbrev-table "inout" "" `verilog-sk-inout)
1534(verilog-define-abbrev verilog-mode-abbrev-table "wire" "" `verilog-sk-wire)
1535(verilog-define-abbrev verilog-mode-abbrev-table "reg" "" `verilog-sk-reg)
1375 1536
1376;; 1537;;
1377;; Macros 1538;; Macros
@@ -1386,6 +1547,9 @@ FIXEDCASE and LITERAL as in `replace-match`. STRING is what to replace.
1386The case (verilog-string-replace-matches \"o\" \"oo\" nil nil \"foobar\") 1547The case (verilog-string-replace-matches \"o\" \"oo\" nil nil \"foobar\")
1387will break, as the o's continuously replace. xa -> x works ok though." 1548will break, as the o's continuously replace. xa -> x works ok though."
1388 ;; Hopefully soon to a emacs built-in 1549 ;; Hopefully soon to a emacs built-in
1550 ;; Also note \ in the replacement prevent multiple replacements; IE
1551 ;; (verilog-string-replace-matches "@" "\\\\([0-9]+\\\\)" nil nil "wire@_@")
1552 ;; Gives "wire\([0-9]+\)_@" not "wire\([0-9]+\)_\([0-9]+\)"
1389 (let ((start 0)) 1553 (let ((start 0))
1390 (while (string-match from-string string start) 1554 (while (string-match from-string string start)
1391 (setq string (replace-match to-string fixedcase literal string) 1555 (setq string (replace-match to-string fixedcase literal string)
@@ -1434,26 +1598,28 @@ will break, as the o's continuously replace. xa -> x works ok though."
1434(defsubst verilog-re-search-forward-quick (regexp bound noerror) 1598(defsubst verilog-re-search-forward-quick (regexp bound noerror)
1435 "Like `verilog-re-search-forward', including use of REGEXP BOUND and NOERROR, 1599 "Like `verilog-re-search-forward', including use of REGEXP BOUND and NOERROR,
1436but trashes match data and is faster for REGEXP that doesn't match often. 1600but trashes match data and is faster for REGEXP that doesn't match often.
1437This may at some point use text properties to ignore comments, 1601This uses `verilog-scan' and text properties to ignore comments,
1438so there may be a large up front penalty for the first search." 1602so there may be a large up front penalty for the first search."
1439 (let (pt) 1603 (let (pt)
1440 (while (and (not pt) 1604 (while (and (not pt)
1441 (re-search-forward regexp bound noerror)) 1605 (re-search-forward regexp bound noerror))
1442 (if (not (verilog-inside-comment-p)) 1606 (if (verilog-inside-comment-or-string-p)
1443 (setq pt (match-end 0)))) 1607 (re-search-forward "[/\"\n]" nil t) ;; Only way a comment or quote can end
1608 (setq pt (match-end 0))))
1444 pt)) 1609 pt))
1445 1610
1446(defsubst verilog-re-search-backward-quick (regexp bound noerror) 1611(defsubst verilog-re-search-backward-quick (regexp bound noerror)
1447 ; checkdoc-params: (REGEXP BOUND NOERROR) 1612 ; checkdoc-params: (REGEXP BOUND NOERROR)
1448 "Like `verilog-re-search-backward', including use of REGEXP BOUND and NOERROR, 1613 "Like `verilog-re-search-backward', including use of REGEXP BOUND and NOERROR,
1449but trashes match data and is faster for REGEXP that doesn't match often. 1614but trashes match data and is faster for REGEXP that doesn't match often.
1450This may at some point use text properties to ignore comments, 1615This uses `verilog-scan' and text properties to ignore comments,
1451so there may be a large up front penalty for the first search." 1616so there may be a large up front penalty for the first search."
1452 (let (pt) 1617 (let (pt)
1453 (while (and (not pt) 1618 (while (and (not pt)
1454 (re-search-backward regexp bound noerror)) 1619 (re-search-backward regexp bound noerror))
1455 (if (not (verilog-inside-comment-p)) 1620 (if (verilog-inside-comment-or-string-p)
1456 (setq pt (match-end 0)))) 1621 (re-search-backward "[/\"]" nil t) ;; Only way a comment or quote can begin
1622 (setq pt (match-beginning 0))))
1457 pt)) 1623 pt))
1458 1624
1459(defsubst verilog-re-search-forward-substr (substr regexp bound noerror) 1625(defsubst verilog-re-search-forward-substr (substr regexp bound noerror)
@@ -1496,6 +1662,14 @@ This speeds up complicated regexp matches."
1496 done)) 1662 done))
1497;;(verilog-re-search-backward-substr "-end" "get-end-of" nil t) ;;-end (test bait) 1663;;(verilog-re-search-backward-substr "-end" "get-end-of" nil t) ;;-end (test bait)
1498 1664
1665(defun verilog-delete-trailing-whitespace ()
1666 "Delete trailing spaces or tabs, but not newlines nor linefeeds."
1667 ;; Similar to `delete-trailing-whitespace' but that's not present in XEmacs
1668 (save-excursion
1669 (goto-char (point-min))
1670 (while (re-search-forward "[ \t]+$" nil t) ;; Not syntatic WS as no formfeed
1671 (replace-match "" nil nil))))
1672
1499(defvar compile-command) 1673(defvar compile-command)
1500 1674
1501;; compilation program 1675;; compilation program
@@ -1535,11 +1709,11 @@ portion, will be substituted."
1535 (set (make-local-variable 'compile-command) "make ")) 1709 (set (make-local-variable 'compile-command) "make "))
1536 (t 1710 (t
1537 (set (make-local-variable 'compile-command) 1711 (set (make-local-variable 'compile-command)
1538 (if verilog-tool 1712 (if verilog-tool
1539 (if (string-match "%s" (eval verilog-tool)) 1713 (if (string-match "%s" (eval verilog-tool))
1540 (format (eval verilog-tool) (or buffer-file-name "")) 1714 (format (eval verilog-tool) (or buffer-file-name ""))
1541 (concat (eval verilog-tool) " " (or buffer-file-name ""))) 1715 (concat (eval verilog-tool) " " (or buffer-file-name "")))
1542 "")))) 1716 ""))))
1543 (verilog-modify-compile-command)) 1717 (verilog-modify-compile-command))
1544 1718
1545(defun verilog-expand-command (command) 1719(defun verilog-expand-command (command)
@@ -1564,7 +1738,7 @@ be substituted."
1564 (stringp compile-command) 1738 (stringp compile-command)
1565 (string-match "\\b\\(__FLAGS__\\|__FILE__\\)\\b" compile-command)) 1739 (string-match "\\b\\(__FLAGS__\\|__FILE__\\)\\b" compile-command))
1566 (set (make-local-variable 'compile-command) 1740 (set (make-local-variable 'compile-command)
1567 (verilog-expand-command compile-command)))) 1741 (verilog-expand-command compile-command))))
1568 1742
1569(if (featurep 'xemacs) 1743(if (featurep 'xemacs)
1570 ;; Following code only gets called from compilation-mode-hook on XEmacs to add error handling. 1744 ;; Following code only gets called from compilation-mode-hook on XEmacs to add error handling.
@@ -1585,8 +1759,8 @@ find the errors."
1585 (cdr compilation-error-regexp-alist-alist))))) 1759 (cdr compilation-error-regexp-alist-alist)))))
1586 (if (boundp 'compilation-font-lock-keywords) 1760 (if (boundp 'compilation-font-lock-keywords)
1587 (progn 1761 (progn
1588 (set (make-local-variable 'compilation-font-lock-keywords) 1762 (set (make-local-variable 'compilation-font-lock-keywords)
1589 verilog-error-font-lock-keywords) 1763 verilog-error-font-lock-keywords)
1590 (font-lock-set-defaults))) 1764 (font-lock-set-defaults)))
1591 ;; Need to re-run compilation-error-regexp builder 1765 ;; Need to re-run compilation-error-regexp builder
1592 (if (fboundp 'compilation-build-compilation-error-regexp-alist) 1766 (if (fboundp 'compilation-build-compilation-error-regexp-alist)
@@ -1657,6 +1831,30 @@ find the errors."
1657 "`ovm_sequencer_utils_end" 1831 "`ovm_sequencer_utils_end"
1658 ) nil ))) 1832 ) nil )))
1659 1833
1834(defconst verilog-uvm-begin-re
1835 (eval-when-compile
1836 (verilog-regexp-opt
1837 '(
1838 "`uvm_component_utils_begin"
1839 "`uvm_component_param_utils_begin"
1840 "`uvm_field_utils_begin"
1841 "`uvm_object_utils_begin"
1842 "`uvm_object_param_utils_begin"
1843 "`uvm_sequence_utils_begin"
1844 "`uvm_sequencer_utils_begin"
1845 ) nil )))
1846
1847(defconst verilog-uvm-end-re
1848 (eval-when-compile
1849 (verilog-regexp-opt
1850 '(
1851 "`uvm_component_utils_end"
1852 "`uvm_field_utils_end"
1853 "`uvm_object_utils_end"
1854 "`uvm_sequence_utils_end"
1855 "`uvm_sequencer_utils_end"
1856 ) nil )))
1857
1660(defconst verilog-vmm-begin-re 1858(defconst verilog-vmm-begin-re
1661 (eval-when-compile 1859 (eval-when-compile
1662 (verilog-regexp-opt 1860 (verilog-regexp-opt
@@ -1794,6 +1992,145 @@ find the errors."
1794 "`static_dut_error" 1992 "`static_dut_error"
1795 "`static_message") nil ))) 1993 "`static_message") nil )))
1796 1994
1995(defconst verilog-uvm-statement-re
1996 (eval-when-compile
1997 (verilog-regexp-opt
1998 '(
1999 ;; Statements
2000 "`uvm_analysis_imp_decl"
2001 "`uvm_blocking_get_imp_decl"
2002 "`uvm_blocking_get_peek_imp_decl"
2003 "`uvm_blocking_master_imp_decl"
2004 "`uvm_blocking_peek_imp_decl"
2005 "`uvm_blocking_put_imp_decl"
2006 "`uvm_blocking_slave_imp_decl"
2007 "`uvm_blocking_transport_imp_decl"
2008 "`uvm_component_param_utils"
2009 "`uvm_component_registry"
2010 "`uvm_component_registry_param"
2011 "`uvm_component_utils"
2012 "`uvm_create"
2013 "`uvm_create_on"
2014 "`uvm_create_seq" ;; Undocumented in 1.1
2015 "`uvm_declare_p_sequencer"
2016 "`uvm_declare_sequence_lib" ;; Deprecated in 1.1
2017 "`uvm_do"
2018 "`uvm_do_callbacks"
2019 "`uvm_do_callbacks_exit_on"
2020 "`uvm_do_obj_callbacks"
2021 "`uvm_do_obj_callbacks_exit_on"
2022 "`uvm_do_on"
2023 "`uvm_do_on_pri"
2024 "`uvm_do_on_pri_with"
2025 "`uvm_do_on_with"
2026 "`uvm_do_pri"
2027 "`uvm_do_pri_with"
2028 "`uvm_do_seq" ;; Undocumented in 1.1
2029 "`uvm_do_seq_with" ;; Undocumented in 1.1
2030 "`uvm_do_with"
2031 "`uvm_error"
2032 "`uvm_error_context"
2033 "`uvm_fatal"
2034 "`uvm_fatal_context"
2035 "`uvm_field_aa_int_byte"
2036 "`uvm_field_aa_int_byte_unsigned"
2037 "`uvm_field_aa_int_enum"
2038 "`uvm_field_aa_int_int"
2039 "`uvm_field_aa_int_int_unsigned"
2040 "`uvm_field_aa_int_integer"
2041 "`uvm_field_aa_int_integer_unsigned"
2042 "`uvm_field_aa_int_key"
2043 "`uvm_field_aa_int_longint"
2044 "`uvm_field_aa_int_longint_unsigned"
2045 "`uvm_field_aa_int_shortint"
2046 "`uvm_field_aa_int_shortint_unsigned"
2047 "`uvm_field_aa_int_string"
2048 "`uvm_field_aa_object_int"
2049 "`uvm_field_aa_object_string"
2050 "`uvm_field_aa_string_int"
2051 "`uvm_field_aa_string_string"
2052 "`uvm_field_array_enum"
2053 "`uvm_field_array_int"
2054 "`uvm_field_array_object"
2055 "`uvm_field_array_string"
2056 "`uvm_field_enum"
2057 "`uvm_field_event"
2058 "`uvm_field_int"
2059 "`uvm_field_object"
2060 "`uvm_field_queue_enum"
2061 "`uvm_field_queue_int"
2062 "`uvm_field_queue_object"
2063 "`uvm_field_queue_string"
2064 "`uvm_field_real"
2065 "`uvm_field_sarray_enum"
2066 "`uvm_field_sarray_int"
2067 "`uvm_field_sarray_object"
2068 "`uvm_field_sarray_string"
2069 "`uvm_field_string"
2070 "`uvm_field_utils"
2071 "`uvm_file" ;; Undocumented in 1.1, use `__FILE__
2072 "`uvm_get_imp_decl"
2073 "`uvm_get_peek_imp_decl"
2074 "`uvm_info"
2075 "`uvm_info_context"
2076 "`uvm_line" ;; Undocumented in 1.1, use `__LINE__
2077 "`uvm_master_imp_decl"
2078 "`uvm_non_blocking_transport_imp_decl" ;; Deprecated in 1.1
2079 "`uvm_nonblocking_get_imp_decl"
2080 "`uvm_nonblocking_get_peek_imp_decl"
2081 "`uvm_nonblocking_master_imp_decl"
2082 "`uvm_nonblocking_peek_imp_decl"
2083 "`uvm_nonblocking_put_imp_decl"
2084 "`uvm_nonblocking_slave_imp_decl"
2085 "`uvm_nonblocking_transport_imp_decl"
2086 "`uvm_object_param_utils"
2087 "`uvm_object_registry"
2088 "`uvm_object_registry_param" ;; Undocumented in 1.1
2089 "`uvm_object_utils"
2090 "`uvm_pack_array"
2091 "`uvm_pack_arrayN"
2092 "`uvm_pack_enum"
2093 "`uvm_pack_enumN"
2094 "`uvm_pack_int"
2095 "`uvm_pack_intN"
2096 "`uvm_pack_queue"
2097 "`uvm_pack_queueN"
2098 "`uvm_pack_real"
2099 "`uvm_pack_sarray"
2100 "`uvm_pack_sarrayN"
2101 "`uvm_pack_string"
2102 "`uvm_peek_imp_decl"
2103 "`uvm_put_imp_decl"
2104 "`uvm_rand_send"
2105 "`uvm_rand_send_pri"
2106 "`uvm_rand_send_pri_with"
2107 "`uvm_rand_send_with"
2108 "`uvm_record_attribute"
2109 "`uvm_record_field"
2110 "`uvm_register_cb"
2111 "`uvm_send"
2112 "`uvm_send_pri"
2113 "`uvm_sequence_utils" ;; Deprecated in 1.1
2114 "`uvm_set_super_type"
2115 "`uvm_slave_imp_decl"
2116 "`uvm_transport_imp_decl"
2117 "`uvm_unpack_array"
2118 "`uvm_unpack_arrayN"
2119 "`uvm_unpack_enum"
2120 "`uvm_unpack_enumN"
2121 "`uvm_unpack_int"
2122 "`uvm_unpack_intN"
2123 "`uvm_unpack_queue"
2124 "`uvm_unpack_queueN"
2125 "`uvm_unpack_real"
2126 "`uvm_unpack_sarray"
2127 "`uvm_unpack_sarrayN"
2128 "`uvm_unpack_string"
2129 "`uvm_update_sequence_lib" ;; Deprecated in 1.1
2130 "`uvm_update_sequence_lib_and_item" ;; Deprecated in 1.1
2131 "`uvm_warning"
2132 "`uvm_warning_context") nil )))
2133
1797 2134
1798;; 2135;;
1799;; Regular expressions used to calculate indent, etc. 2136;; Regular expressions used to calculate indent, etc.
@@ -1805,6 +2142,29 @@ find the errors."
1805;; a[34:32] : 2142;; a[34:32] :
1806;; a, 2143;; a,
1807;; b : 2144;; b :
2145(defconst verilog-assignment-operator-re
2146 (eval-when-compile
2147 (verilog-regexp-opt
2148 `(
2149 ;; blocking assignment_operator
2150 "=" "+=" "-=" "*=" "/=" "%=" "&=" "|=" "^=" "<<=" ">>=" "<<<=" ">>>="
2151 ;; non blocking assignment operator
2152 "<="
2153 ;; comparison
2154 "==" "!=" "===" "!===" "<=" ">=" "==\?" "!=\?"
2155 ;; event_trigger
2156 "->" "->>"
2157 ;; property_expr
2158 "|->" "|=>"
2159 ;; Is this a legal verilog operator?
2160 ":="
2161 ) 't
2162 )))
2163(defconst verilog-assignment-operation-re
2164 (concat
2165; "\\(^\\s-*[A-Za-z0-9_]+\\(\\[\\([A-Za-z0-9_]+\\)\\]\\)*\\s-*\\)"
2166; "\\(^\\s-*[^=<>+-*/%&|^:\\s-]+[^=<>+-*/%&|^\n]*?\\)"
2167 "\\(^.*?\\)" "\\B" verilog-assignment-operator-re "\\B" ))
1808 2168
1809(defconst verilog-label-re (concat verilog-symbol-re "\\s-*:\\s-*")) 2169(defconst verilog-label-re (concat verilog-symbol-re "\\s-*:\\s-*"))
1810(defconst verilog-property-re 2170(defconst verilog-property-re
@@ -1843,7 +2203,12 @@ find the errors."
1843 "\\(\\<`ovm_object_utils_end\\>\\)\\|" 2203 "\\(\\<`ovm_object_utils_end\\>\\)\\|"
1844 "\\(\\<`ovm_sequence_utils_end\\>\\)\\|" 2204 "\\(\\<`ovm_sequence_utils_end\\>\\)\\|"
1845 "\\(\\<`ovm_sequencer_utils_end\\>\\)" 2205 "\\(\\<`ovm_sequencer_utils_end\\>\\)"
1846 2206 ;; UVM
2207 "\\(\\<`uvm_component_utils_end\\>\\)\\|"
2208 "\\(\\<`uvm_field_utils_end\\>\\)\\|"
2209 "\\(\\<`uvm_object_utils_end\\>\\)\\|"
2210 "\\(\\<`uvm_sequence_utils_end\\>\\)\\|"
2211 "\\(\\<`uvm_sequencer_utils_end\\>\\)"
1847 )) 2212 ))
1848 2213
1849(defconst verilog-auto-end-comment-lines-re 2214(defconst verilog-auto-end-comment-lines-re
@@ -1925,6 +2290,12 @@ find the errors."
1925 "`ovm_object_utils_end" 2290 "`ovm_object_utils_end"
1926 "`ovm_sequence_utils_end" 2291 "`ovm_sequence_utils_end"
1927 "`ovm_sequencer_utils_end" 2292 "`ovm_sequencer_utils_end"
2293 ;; UVM
2294 "`uvm_component_utils_end"
2295 "`uvm_field_utils_end"
2296 "`uvm_object_utils_end"
2297 "`uvm_sequence_utils_end"
2298 "`uvm_sequencer_utils_end"
1928 ;; VMM 2299 ;; VMM
1929 "`vmm_data_member_end" 2300 "`vmm_data_member_end"
1930 "`vmm_env_member_end" 2301 "`vmm_env_member_end"
@@ -1979,7 +2350,7 @@ find the errors."
1979 "specify" 2350 "specify"
1980 "table" 2351 "table"
1981 "task" 2352 "task"
1982 ;;; OVM 2353 ;; OVM
1983 "`ovm_component_utils_begin" 2354 "`ovm_component_utils_begin"
1984 "`ovm_component_param_utils_begin" 2355 "`ovm_component_param_utils_begin"
1985 "`ovm_field_utils_begin" 2356 "`ovm_field_utils_begin"
@@ -1987,6 +2358,14 @@ find the errors."
1987 "`ovm_object_param_utils_begin" 2358 "`ovm_object_param_utils_begin"
1988 "`ovm_sequence_utils_begin" 2359 "`ovm_sequence_utils_begin"
1989 "`ovm_sequencer_utils_begin" 2360 "`ovm_sequencer_utils_begin"
2361 ;; UVM
2362 "`uvm_component_utils_begin"
2363 "`uvm_component_param_utils_begin"
2364 "`uvm_field_utils_begin"
2365 "`uvm_object_utils_begin"
2366 "`uvm_object_param_utils_begin"
2367 "`uvm_sequence_utils_begin"
2368 "`uvm_sequencer_utils_begin"
1990 ;; VMM 2369 ;; VMM
1991 "`vmm_data_member_begin" 2370 "`vmm_data_member_begin"
1992 "`vmm_env_member_begin" 2371 "`vmm_env_member_begin"
@@ -2000,7 +2379,7 @@ find the errors."
2000(defconst verilog-beg-block-re-ordered 2379(defconst verilog-beg-block-re-ordered
2001 ( concat "\\(\\<begin\\>\\)" ;1 2380 ( concat "\\(\\<begin\\>\\)" ;1
2002 "\\|\\(\\<randcase\\>\\|\\(\\<unique\\s-+\\|priority\\s-+\\)?case[xz]?\\>\\)" ; 2,3 2381 "\\|\\(\\<randcase\\>\\|\\(\\<unique\\s-+\\|priority\\s-+\\)?case[xz]?\\>\\)" ; 2,3
2003 "\\|\\(\\(\\<disable\\>\\s-+\\)?fork\\>\\)" ;4,5 2382 "\\|\\(\\(\\<disable\\>\\s-+\\|\\<wait\\>\\s-+\\)?fork\\>\\)" ;4,5
2004 "\\|\\(\\<class\\>\\)" ;6 2383 "\\|\\(\\<class\\>\\)" ;6
2005 "\\|\\(\\<table\\>\\)" ;7 2384 "\\|\\(\\<table\\>\\)" ;7
2006 "\\|\\(\\<specify\\>\\)" ;8 2385 "\\|\\(\\<specify\\>\\)" ;8
@@ -2013,7 +2392,7 @@ find the errors."
2013 "\\|\\(\\(\\(\\<cover\\>\\s-+\\)\\|\\(\\<assert\\>\\s-+\\)\\)*\\<property\\>\\)" ;17 21 2392 "\\|\\(\\(\\(\\<cover\\>\\s-+\\)\\|\\(\\<assert\\>\\s-+\\)\\)*\\<property\\>\\)" ;17 21
2014 "\\|\\(\\<\\(rand\\)?sequence\\>\\)" ;21 25 2393 "\\|\\(\\<\\(rand\\)?sequence\\>\\)" ;21 25
2015 "\\|\\(\\<clocking\\>\\)" ;22 27 2394 "\\|\\(\\<clocking\\>\\)" ;22 27
2016 "\\|\\(\\<`ovm_[a-z_]+_begin\\>\\)" ;28 2395 "\\|\\(\\<`[ou]vm_[a-z_]+_begin\\>\\)" ;28
2017 "\\|\\(\\<`vmm_[a-z_]+_member_begin\\>\\)" 2396 "\\|\\(\\<`vmm_[a-z_]+_member_begin\\>\\)"
2018 ;; 2397 ;;
2019 2398
@@ -2125,6 +2504,8 @@ find the errors."
2125 (eval-when-compile (verilog-regexp-words `("endmodule" "endclass" "endprogram" "endinterface" "endpackage" "endprimitive" "endconfig")))) 2504 (eval-when-compile (verilog-regexp-words `("endmodule" "endclass" "endprogram" "endinterface" "endpackage" "endprimitive" "endconfig"))))
2126(defconst verilog-zero-indent-re 2505(defconst verilog-zero-indent-re
2127 (concat verilog-defun-re "\\|" verilog-end-defun-re)) 2506 (concat verilog-defun-re "\\|" verilog-end-defun-re))
2507(defconst verilog-inst-comment-re
2508 (eval-when-compile (verilog-regexp-words `("Outputs" "Inouts" "Inputs" "Interfaces" "Interfaced"))))
2128 2509
2129(defconst verilog-behavioral-block-beg-re 2510(defconst verilog-behavioral-block-beg-re
2130 (eval-when-compile (verilog-regexp-words `("initial" "final" "always" "always_comb" "always_latch" "always_ff" 2511 (eval-when-compile (verilog-regexp-words `("initial" "final" "always" "always_comb" "always_latch" "always_ff"
@@ -2186,6 +2567,20 @@ find the errors."
2186 "`ovm_object_utils_end" 2567 "`ovm_object_utils_end"
2187 "`ovm_sequence_utils_end" 2568 "`ovm_sequence_utils_end"
2188 "`ovm_sequencer_utils_end" 2569 "`ovm_sequencer_utils_end"
2570 ;; UVM Begin tokens
2571 "`uvm_component_utils_begin"
2572 "`uvm_component_param_utils_begin"
2573 "`uvm_field_utils_begin"
2574 "`uvm_object_utils_begin"
2575 "`uvm_object_param_utils_begin"
2576 "`uvm_sequence_utils_begin"
2577 "`uvm_sequencer_utils_begin"
2578 ;; UVM End tokens
2579 "`uvm_component_utils_end" ;; Typo in spec, it's not uvm_component_end
2580 "`uvm_field_utils_end"
2581 "`uvm_object_utils_end"
2582 "`uvm_sequence_utils_end"
2583 "`uvm_sequencer_utils_end"
2189 ;; VMM Begin tokens 2584 ;; VMM Begin tokens
2190 "`vmm_data_member_begin" 2585 "`vmm_data_member_begin"
2191 "`vmm_env_member_begin" 2586 "`vmm_env_member_begin"
@@ -2227,8 +2622,7 @@ find the errors."
2227 `( 2622 `(
2228 "endmodule" "endprimitive" "endinterface" "endpackage" "endprogram" "endclass" 2623 "endmodule" "endprimitive" "endinterface" "endpackage" "endprogram" "endclass"
2229 )))) 2624 ))))
2230(defconst verilog-disable-fork-re "disable\\s-+fork\\>") 2625(defconst verilog-disable-fork-re "\\(disable\\|wait\\)\\s-+fork\\>")
2231(defconst verilog-fork-wait-re "fork\\s-+wait\\>")
2232(defconst verilog-extended-case-re "\\(unique\\s-+\\|priority\\s-+\\)?case[xz]?") 2626(defconst verilog-extended-case-re "\\(unique\\s-+\\|priority\\s-+\\)?case[xz]?")
2233(defconst verilog-extended-complete-re 2627(defconst verilog-extended-complete-re
2234 (concat "\\(\\<extern\\s-+\\|\\<\\(\\<pure\\>\\s-+\\)?virtual\\s-+\\|\\<protected\\s-+\\)*\\(\\<function\\>\\|\\<task\\>\\)" 2628 (concat "\\(\\<extern\\s-+\\|\\<\\(\\<pure\\>\\s-+\\)?virtual\\s-+\\|\\<protected\\s-+\\)*\\(\\<function\\>\\|\\<task\\>\\)"
@@ -2609,6 +3003,7 @@ user-visible changes to the buffer must not be within a
2609 (buffer-undo-list t) 3003 (buffer-undo-list t)
2610 (inhibit-read-only t) 3004 (inhibit-read-only t)
2611 (inhibit-point-motion-hooks t) 3005 (inhibit-point-motion-hooks t)
3006 (verilog-no-change-functions t)
2612 before-change-functions 3007 before-change-functions
2613 after-change-functions 3008 after-change-functions
2614 deactivate-mark 3009 deactivate-mark
@@ -2624,6 +3019,7 @@ user-visible changes to the buffer must not be within a
2624 "Execute BODY forms, disabling all change hooks in BODY. 3019 "Execute BODY forms, disabling all change hooks in BODY.
2625For insignificant changes, see instead `verilog-save-buffer-state'." 3020For insignificant changes, see instead `verilog-save-buffer-state'."
2626 `(let* ((inhibit-point-motion-hooks t) 3021 `(let* ((inhibit-point-motion-hooks t)
3022 (verilog-no-change-functions t)
2627 before-change-functions 3023 before-change-functions
2628 after-change-functions) 3024 after-change-functions)
2629 (progn ,@body))) 3025 (progn ,@body)))
@@ -2633,13 +3029,17 @@ For insignificant changes, see instead `verilog-save-buffer-state'."
2633 3029
2634(defvar verilog-scan-cache-preserving nil 3030(defvar verilog-scan-cache-preserving nil
2635 "If set, the specified buffer's comment properties are static. 3031 "If set, the specified buffer's comment properties are static.
2636Buffer changes will be ignored. See `verilog-inside-comment-p' 3032Buffer changes will be ignored. See `verilog-inside-comment-or-string-p'
2637and `verilog-scan'.") 3033and `verilog-scan'.")
2638 3034
2639(defvar verilog-scan-cache-tick nil 3035(defvar verilog-scan-cache-tick nil
2640 "Modification tick at which `verilog-scan' was last completed.") 3036 "Modification tick at which `verilog-scan' was last completed.")
2641(make-variable-buffer-local 'verilog-scan-cache-tick) 3037(make-variable-buffer-local 'verilog-scan-cache-tick)
2642 3038
3039(defun verilog-scan-cache-flush ()
3040 "Flush the `verilog-scan' cache."
3041 (setq verilog-scan-cache-tick nil))
3042
2643(defun verilog-scan-cache-ok-p () 3043(defun verilog-scan-cache-ok-p ()
2644 "Return t iff the scan cache is up to date." 3044 "Return t iff the scan cache is up to date."
2645 (or (and verilog-scan-cache-preserving 3045 (or (and verilog-scan-cache-preserving
@@ -2660,8 +3060,8 @@ This requires that insertions must use `verilog-insert'."
2660 (progn ,@body)))) 3060 (progn ,@body))))
2661 3061
2662(defun verilog-scan-region (beg end) 3062(defun verilog-scan-region (beg end)
2663 "Parse comments between BEG and END for `verilog-inside-comment-p'. 3063 "Parse between BEG and END for `verilog-inside-comment-or-string-p'.
2664This creates v-cmt properties where comments are in force." 3064This creates v-cmts properties where comments are in force."
2665 ;; Why properties and not overlays? Overlays have much slower non O(1) 3065 ;; Why properties and not overlays? Overlays have much slower non O(1)
2666 ;; lookup times. 3066 ;; lookup times.
2667 ;; This function is warm - called on every verilog-insert 3067 ;; This function is warm - called on every verilog-insert
@@ -2678,8 +3078,9 @@ This creates v-cmt properties where comments are in force."
2678 ;; "1+": The leading // or /* itself isn't considered as 3078 ;; "1+": The leading // or /* itself isn't considered as
2679 ;; being "inside" the comment, so that a (search-backward) 3079 ;; being "inside" the comment, so that a (search-backward)
2680 ;; that lands at the start of the // won't mis-indicate 3080 ;; that lands at the start of the // won't mis-indicate
2681 ;; it's inside a comment 3081 ;; it's inside a comment. Also otherwise it would be
2682 (put-text-property (1+ pt) (point) 'v-cmt t)) 3082 ;; hard to find a commented out /*AS*/ vs one that isn't
3083 (put-text-property (1+ pt) (point) 'v-cmts t))
2683 ((looking-at "/\\*") 3084 ((looking-at "/\\*")
2684 (setq pt (point)) 3085 (setq pt (point))
2685 (or (search-forward "*/" end t) 3086 (or (search-forward "*/" end t)
@@ -2688,17 +3089,24 @@ This creates v-cmt properties where comments are in force."
2688 ;;(error "%s: Unmatched /* */, at char %d" 3089 ;;(error "%s: Unmatched /* */, at char %d"
2689 ;; (verilog-point-text) (point)) 3090 ;; (verilog-point-text) (point))
2690 (goto-char end)) 3091 (goto-char end))
2691 (put-text-property (1+ pt) (point) 'v-cmt t)) 3092 (put-text-property (1+ pt) (point) 'v-cmts t))
3093 ((looking-at "\"")
3094 (setq pt (point))
3095 (or (re-search-forward "[^\\]\"" end t) ;; don't forward-char first, since we look for a non backslash first
3096 ;; No error - let later code indicate it so we can
3097 (goto-char end))
3098 (put-text-property (1+ pt) (point) 'v-cmts t))
2692 (t 3099 (t
2693 (forward-char 1) 3100 (forward-char 1)
2694 (if (re-search-forward "/[/*]" end t) 3101 (if (re-search-forward "[/\"]" end t)
2695 (backward-char 2) 3102 (backward-char 1)
2696 (goto-char end)))))))))) 3103 (goto-char end))))))))))
2697 3104
2698(defun verilog-scan () 3105(defun verilog-scan ()
2699 "Parse the buffer, marking all comments with properties. 3106 "Parse the buffer, marking all comments with properties.
2700Also assumes any text inserted since `verilog-scan-cache-tick' 3107Also assumes any text inserted since `verilog-scan-cache-tick'
2701either is ok to parse as a non-comment, or `verilog-insert' was used." 3108either is ok to parse as a non-comment, or `verilog-insert' was used."
3109 ;; See also `verilog-scan-debug' and `verilog-scan-and-debug'
2702 (unless (verilog-scan-cache-ok-p) 3110 (unless (verilog-scan-cache-ok-p)
2703 (save-excursion 3111 (save-excursion
2704 (verilog-save-buffer-state 3112 (verilog-save-buffer-state
@@ -2706,21 +3114,47 @@ either is ok to parse as a non-comment, or `verilog-insert' was used."
2706 (message "Scanning %s cache=%s cachetick=%S tick=%S" (current-buffer) 3114 (message "Scanning %s cache=%s cachetick=%S tick=%S" (current-buffer)
2707 verilog-scan-cache-preserving verilog-scan-cache-tick 3115 verilog-scan-cache-preserving verilog-scan-cache-tick
2708 (buffer-chars-modified-tick))) 3116 (buffer-chars-modified-tick)))
2709 (remove-text-properties (point-min) (point-max) '(v-cmt nil)) 3117 (remove-text-properties (point-min) (point-max) '(v-cmts nil))
2710 (verilog-scan-region (point-min) (point-max)) 3118 (verilog-scan-region (point-min) (point-max))
2711 (setq verilog-scan-cache-tick (buffer-chars-modified-tick)) 3119 (setq verilog-scan-cache-tick (buffer-chars-modified-tick))
2712 (when verilog-debug (message "Scanning... done")))))) 3120 (when verilog-debug (message "Scanning... done"))))))
2713 3121
2714(defun verilog-inside-comment-p () 3122(defun verilog-scan-debug ()
2715 "Check if point inside a comment. 3123 "For debugging, show with display face results of `verilog-scan'."
3124 (font-lock-mode 0)
3125 ;;(if dbg (setq dbg (concat dbg (format "verilog-scan-debug\n"))))
3126 (save-excursion
3127 (goto-char (point-min))
3128 (remove-text-properties (point-min) (point-max) '(face nil))
3129 (while (not (eobp))
3130 (cond ((get-text-property (point) 'v-cmts)
3131 (put-text-property (point) (1+ (point)) `face 'underline)
3132 ;;(if dbg (setq dbg (concat dbg (format " v-cmts at %S\n" (point)))))
3133 (forward-char 1))
3134 (t
3135 (goto-char (or (next-property-change (point)) (point-max))))))))
3136
3137(defun verilog-scan-and-debug ()
3138 "For debugging, run `verilog-scan' and `verilog-scan-debug'."
3139 (let (verilog-scan-cache-preserving
3140 verilog-scan-cache-tick)
3141 (goto-char (point-min))
3142 (verilog-scan)
3143 (verilog-scan-debug)))
3144
3145(defun verilog-inside-comment-or-string-p (&optional pos)
3146 "Check if optional point POS is inside a comment.
2716This may require a slow pre-parse of the buffer with `verilog-scan' 3147This may require a slow pre-parse of the buffer with `verilog-scan'
2717to establish comment properties on all text." 3148to establish comment properties on all text."
2718 ;; This function is very hot 3149 ;; This function is very hot
2719 (verilog-scan) 3150 (verilog-scan)
2720 (get-text-property (point) 'v-cmt)) 3151 (if pos
3152 (and (>= pos (point-min))
3153 (get-text-property pos 'v-cmts))
3154 (get-text-property (point) 'v-cmts)))
2721 3155
2722(defun verilog-insert (&rest stuff) 3156(defun verilog-insert (&rest stuff)
2723 "Insert STUFF arguments, tracking comments for `verilog-inside-comment-p'. 3157 "Insert STUFF arguments, tracking for `verilog-inside-comment-or-string-p'.
2724Any insert that includes a comment must have the entire commente 3158Any insert that includes a comment must have the entire commente
2725inserted using a single call to `verilog-insert'." 3159inserted using a single call to `verilog-insert'."
2726 (let ((pt (point))) 3160 (let ((pt (point)))
@@ -2741,7 +3175,7 @@ Use filename, if current buffer being edited shorten to just buffer name."
2741 (buffer-name)) 3175 (buffer-name))
2742 buffer-file-name 3176 buffer-file-name
2743 (buffer-name)) 3177 (buffer-name))
2744 ":" (int-to-string (count-lines (point-min) (or pointnum (point)))))) 3178 ":" (int-to-string (1+ (count-lines (point-min) (or pointnum (point)))))))
2745 3179
2746(defun electric-verilog-backward-sexp () 3180(defun electric-verilog-backward-sexp ()
2747 "Move backward over one balanced expression." 3181 "Move backward over one balanced expression."
@@ -2835,28 +3269,24 @@ Use filename, if current buffer being edited shorten to just buffer name."
2835 (setq md 3) ;; ender is third item in regexp 3269 (setq md 3) ;; ender is third item in regexp
2836 ) 3270 )
2837 ((match-end 4) 3271 ((match-end 4)
2838 ;; might be "disable fork" or "fork wait" 3272 ;; might be "disable fork" or "wait fork"
2839 (let 3273 (let
2840 (here) 3274 (here)
2841 (if (looking-at verilog-fork-wait-re) 3275 (if (or
2842 (progn ;; it is a fork wait; ignore it 3276 (looking-at verilog-disable-fork-re)
3277 (and (looking-at "fork")
3278 (progn
3279 (setq here (point)) ;; sometimes a fork is just a fork
3280 (forward-word -1)
3281 (looking-at verilog-disable-fork-re))))
3282 (progn ;; it is a disable fork; ignore it
2843 (goto-char (match-end 0)) 3283 (goto-char (match-end 0))
3284 (forward-word 1)
2844 (setq reg nil)) 3285 (setq reg nil))
2845 (if (or 3286 (progn ;; it is a nice simple fork
2846 (looking-at verilog-disable-fork-re) 3287 (goto-char here) ;; return from looking for "disable fork"
2847 (and (looking-at "fork") 3288 ;; Search forward for matching join
2848 (progn 3289 (setq reg "\\(\\<fork\\>\\)\\|\\(\\<join\\(_any\\|_none\\)?\\>\\)" )))))
2849 (setq here (point)) ;; sometimes a fork is just a fork
2850 (forward-word -1)
2851 (looking-at verilog-disable-fork-re))))
2852 (progn ;; it is a disable fork; ignore it
2853 (goto-char (match-end 0))
2854 (forward-word 1)
2855 (setq reg nil))
2856 (progn ;; it is a nice simple fork
2857 (goto-char here) ;; return from looking for "disable fork"
2858 ;; Search forward for matching join
2859 (setq reg "\\(\\<fork\\>\\)\\|\\(\\<join\\(_any\\|_none\\)?\\>\\)" ))))))
2860 ((match-end 6) 3290 ((match-end 6)
2861 ;; Search forward for matching endclass 3291 ;; Search forward for matching endclass
2862 (setq reg "\\(\\<class\\>\\)\\|\\(\\<endclass\\>\\)" )) 3292 (setq reg "\\(\\<class\\>\\)\\|\\(\\<endclass\\>\\)" ))
@@ -2916,8 +3346,6 @@ Use filename, if current buffer being edited shorten to just buffer name."
2916 (setq here (point)) ; remember where we started 3346 (setq here (point)) ; remember where we started
2917 (goto-char (match-beginning 1)) 3347 (goto-char (match-beginning 1))
2918 (cond 3348 (cond
2919 ((looking-at verilog-fork-wait-re)
2920 (goto-char (match-end 0))) ; false alarm
2921 ((if (or 3349 ((if (or
2922 (looking-at verilog-disable-fork-re) 3350 (looking-at verilog-disable-fork-re)
2923 (and (looking-at "fork") 3351 (and (looking-at "fork")
@@ -3076,6 +3504,8 @@ Some other functions are:
3076 \\[verilog-sk-initial] Insert an initial begin .. end block. 3504 \\[verilog-sk-initial] Insert an initial begin .. end block.
3077 \\[verilog-sk-fork] Insert a fork begin .. end .. join block. 3505 \\[verilog-sk-fork] Insert a fork begin .. end .. join block.
3078 \\[verilog-sk-module] Insert a module .. (/*AUTOARG*/);.. endmodule block. 3506 \\[verilog-sk-module] Insert a module .. (/*AUTOARG*/);.. endmodule block.
3507 \\[verilog-sk-ovm-class] Insert an OVM Class block.
3508 \\[verilog-sk-uvm-class] Insert an UVM Class block.
3079 \\[verilog-sk-primitive] Insert a primitive .. (.. );.. endprimitive block. 3509 \\[verilog-sk-primitive] Insert a primitive .. (.. );.. endprimitive block.
3080 \\[verilog-sk-repeat] Insert a repeat (..) begin .. end block. 3510 \\[verilog-sk-repeat] Insert a repeat (..) begin .. end block.
3081 \\[verilog-sk-specify] Insert a specify .. endspecify block. 3511 \\[verilog-sk-specify] Insert a specify .. endspecify block.
@@ -3110,7 +3540,6 @@ Key bindings specific to `verilog-mode-map' are:
3110 #'verilog-indent-line-relative) 3540 #'verilog-indent-line-relative)
3111 (setq comment-indent-function 'verilog-comment-indent) 3541 (setq comment-indent-function 'verilog-comment-indent)
3112 (set (make-local-variable 'parse-sexp-ignore-comments) nil) 3542 (set (make-local-variable 'parse-sexp-ignore-comments) nil)
3113
3114 (set (make-local-variable 'comment-start) "// ") 3543 (set (make-local-variable 'comment-start) "// ")
3115 (set (make-local-variable 'comment-end) "") 3544 (set (make-local-variable 'comment-end) "")
3116 (set (make-local-variable 'comment-start-skip) "/\\*+ *\\|// *") 3545 (set (make-local-variable 'comment-start-skip) "/\\*+ *\\|// *")
@@ -3168,7 +3597,9 @@ Key bindings specific to `verilog-mode-map' are:
3168 hs-special-modes-alist)))) 3597 hs-special-modes-alist))))
3169 3598
3170 ;; Stuff for autos 3599 ;; Stuff for autos
3171 (add-hook 'write-contents-hooks 'verilog-auto-save-check nil 'local)) 3600 (add-hook 'write-contents-hooks 'verilog-auto-save-check nil 'local)
3601 ;; verilog-mode-hook call added by define-derived-mode
3602 )
3172 3603
3173 3604
3174;; 3605;;
@@ -3519,6 +3950,12 @@ area. See also `verilog-comment-region'."
3519 (interactive) 3950 (interactive)
3520 (verilog-re-search-backward verilog-defun-re nil 'move)) 3951 (verilog-re-search-backward verilog-defun-re nil 'move))
3521 3952
3953(defun verilog-beg-of-defun-quick ()
3954 "Move backward to the beginning of the current function or procedure.
3955Uses `verilog-scan' cache."
3956 (interactive)
3957 (verilog-re-search-backward-quick verilog-defun-re nil 'move))
3958
3522(defun verilog-end-of-defun () 3959(defun verilog-end-of-defun ()
3523 "Move forward to the end of the current function or procedure." 3960 "Move forward to the end of the current function or procedure."
3524 (interactive) 3961 (interactive)
@@ -3741,13 +4178,21 @@ More specifically, point @ in the line foo : @ begin"
3741 (t 4178 (t
3742 (throw 'found (= nest 0))))))) 4179 (throw 'found (= nest 0)))))))
3743 nil))) 4180 nil)))
4181
3744(defun verilog-backward-up-list (arg) 4182(defun verilog-backward-up-list (arg)
3745 "Like backward-up-list, but deal with comments." 4183 "Like `backward-up-list', but deal with comments."
3746 (let (saved-psic parse-sexp-ignore-comments) 4184 (let ((parse-sexp-ignore-comments t))
3747 (setq parse-sexp-ignore-comments 1) 4185 (backward-up-list arg)))
3748 (backward-up-list arg) 4186
3749 (setq parse-sexp-ignore-comments saved-psic) 4187(defun verilog-forward-sexp-cmt (arg)
3750 )) 4188 "Call `forward-sexp', inside comments."
4189 (let ((parse-sexp-ignore-comments nil))
4190 (forward-sexp arg)))
4191
4192(defun verilog-forward-sexp-ign-cmt (arg)
4193 "Call `forward-sexp', ignoring comments."
4194 (let ((parse-sexp-ignore-comments t))
4195 (forward-sexp arg)))
3751 4196
3752(defun verilog-in-struct-region-p () 4197(defun verilog-in-struct-region-p ()
3753 "Return true if in a struct region. 4198 "Return true if in a struct region.
@@ -4449,7 +4894,6 @@ becomes:
4449 next-error-last-buffer 4894 next-error-last-buffer
4450 compilation-last-buffer))) 4895 compilation-last-buffer)))
4451 (when (buffer-live-p buff) 4896 (when (buffer-live-p buff)
4452 ;; FIXME with-current-buffer?
4453 (save-excursion 4897 (save-excursion
4454 (switch-to-buffer buff) 4898 (switch-to-buffer buff)
4455 (beginning-of-line) 4899 (beginning-of-line)
@@ -4565,8 +5009,9 @@ This lets programs calling batch mode to easily extract error messages."
4565 (error "%%Error: %s%s" (error-message-string err) 5009 (error "%%Error: %s%s" (error-message-string err)
4566 (if (featurep 'xemacs) "\n" ""))))) ;; XEmacs forgets to add a newline 5010 (if (featurep 'xemacs) "\n" ""))))) ;; XEmacs forgets to add a newline
4567 5011
4568(defun verilog-batch-execute-func (funref) 5012(defun verilog-batch-execute-func (funref &optional no-save)
4569 "Internal processing of a batch command, running FUNREF on all command arguments." 5013 "Internal processing of a batch command, running FUNREF on all command arguments.
5014Save the result unless optional NO-SAVE is t."
4570 (verilog-batch-error-wrapper 5015 (verilog-batch-error-wrapper
4571 ;; Setting global variables like that is *VERY NASTY* !!! --Stef 5016 ;; Setting global variables like that is *VERY NASTY* !!! --Stef
4572 ;; However, this function is called only when Emacs is being used as 5017 ;; However, this function is called only when Emacs is being used as
@@ -4587,15 +5032,15 @@ This lets programs calling batch mode to easily extract error messages."
4587 (buffer-list)) 5032 (buffer-list))
4588 ;; Process the files 5033 ;; Process the files
4589 (mapcar (lambda (buf) 5034 (mapcar (lambda (buf)
4590 (when (buffer-file-name buf) 5035 (when (buffer-file-name buf)
4591 (save-excursion 5036 (save-excursion
4592 (if (not (file-exists-p (buffer-file-name buf))) 5037 (if (not (file-exists-p (buffer-file-name buf)))
4593 (error 5038 (error
4594 (concat "File not found: " (buffer-file-name buf)))) 5039 (concat "File not found: " (buffer-file-name buf))))
4595 (message (concat "Processing " (buffer-file-name buf))) 5040 (message (concat "Processing " (buffer-file-name buf)))
4596 (set-buffer buf) 5041 (set-buffer buf)
4597 (funcall funref) 5042 (funcall funref)
4598 (save-buffer)))) 5043 (unless no-save (save-buffer)))))
4599 (buffer-list)))) 5044 (buffer-list))))
4600 5045
4601(defun verilog-batch-auto () 5046(defun verilog-batch-auto ()
@@ -4616,6 +5061,16 @@ with \\[verilog-delete-auto] on all command-line files, and saves the buffers."
4616 (error "Use verilog-batch-delete-auto only with --batch")) ;; Otherwise we'd mess up buffer modes 5061 (error "Use verilog-batch-delete-auto only with --batch")) ;; Otherwise we'd mess up buffer modes
4617 (verilog-batch-execute-func `verilog-delete-auto)) 5062 (verilog-batch-execute-func `verilog-delete-auto))
4618 5063
5064(defun verilog-batch-diff-auto ()
5065 "For use with --batch, perform automatic differences as a stand-alone tool.
5066This sets up the appropriate Verilog mode environment, expand automatics
5067with \\[verilog-diff-auto] on all command-line files, and reports an error
5068if any differences are observed. This is appropriate for adding to regressions
5069to insure automatics are always properly maintained."
5070 (unless noninteractive
5071 (error "Use verilog-batch-diff-auto only with --batch")) ;; Otherwise we'd mess up buffer modes
5072 (verilog-batch-execute-func `verilog-diff-auto t))
5073
4619(defun verilog-batch-inject-auto () 5074(defun verilog-batch-inject-auto ()
4620 "For use with --batch, perform automatic injection as a stand-alone tool. 5075 "For use with --batch, perform automatic injection as a stand-alone tool.
4621This sets up the appropriate Verilog mode environment, injects new automatics 5076This sets up the appropriate Verilog mode environment, injects new automatics
@@ -4627,7 +5082,7 @@ line in bottom-up order."
4627 (verilog-batch-execute-func `verilog-inject-auto)) 5082 (verilog-batch-execute-func `verilog-inject-auto))
4628 5083
4629(defun verilog-batch-indent () 5084(defun verilog-batch-indent ()
4630 "For use with --batch, reindent an entire file as a stand-alone tool. 5085 "For use with --batch, reindent an a entire file as a stand-alone tool.
4631This sets up the appropriate Verilog mode environment, calls 5086This sets up the appropriate Verilog mode environment, calls
4632\\[verilog-indent-buffer] on all command-line files, and saves the buffers." 5087\\[verilog-indent-buffer] on all command-line files, and saves the buffers."
4633 (unless noninteractive 5088 (unless noninteractive
@@ -4692,123 +5147,123 @@ Return a list of two elements: (INDENT-TYPE INDENT-LEVEL)."
4692 ;; if we have a directive, done. 5147 ;; if we have a directive, done.
4693 (if (save-excursion (beginning-of-line) 5148 (if (save-excursion (beginning-of-line)
4694 (and (looking-at verilog-directive-re-1) 5149 (and (looking-at verilog-directive-re-1)
4695 (not (or (looking-at "[ \t]*`ovm_") 5150 (not (or (looking-at "[ \t]*`[ou]vm_")
4696 (looking-at "[ \t]*`vmm_"))))) 5151 (looking-at "[ \t]*`vmm_")))))
4697 (throw 'nesting 'directive)) 5152 (throw 'nesting 'directive))
4698 ;; indent structs as if there were module level 5153 ;; indent structs as if there were module level
4699 (if (verilog-in-struct-p) 5154 (if (verilog-in-struct-p)
4700 (throw 'nesting 'block)) 5155 (throw 'nesting 'block))
4701 5156
4702 ;; unless we are in the newfangled coverpoint or constraint blocks 5157 ;; if we are in a parenthesized list, and the user likes to indent these, return.
4703 ;; if we are in a parenthesized list, and the user likes to indent these, return. 5158 ;; unless we are in the newfangled coverpoint or constraint blocks
4704 (if (and 5159 (if (and
4705 verilog-indent-lists 5160 verilog-indent-lists
4706 (verilog-in-paren) 5161 (verilog-in-paren)
4707 (not (verilog-in-coverage-p)) 5162 (not (verilog-in-coverage-p))
4708 ) 5163 )
4709 (progn (setq par 1) 5164 (progn (setq par 1)
4710 (throw 'nesting 'block))) 5165 (throw 'nesting 'block)))
4711 5166
4712 ;; See if we are continuing a previous line 5167 ;; See if we are continuing a previous line
4713 (while t 5168 (while t
4714 ;; trap out if we crawl off the top of the buffer 5169 ;; trap out if we crawl off the top of the buffer
4715 (if (bobp) (throw 'nesting 'cpp)) 5170 (if (bobp) (throw 'nesting 'cpp))
4716 5171
4717 (if (verilog-continued-line-1 lim) 5172 (if (verilog-continued-line-1 lim)
4718 (let ((sp (point))) 5173 (let ((sp (point)))
4719 (if (and 5174 (if (and
4720 (not (looking-at verilog-complete-reg)) 5175 (not (looking-at verilog-complete-reg))
4721 (verilog-continued-line-1 lim)) 5176 (verilog-continued-line-1 lim))
4722 (progn (goto-char sp) 5177 (progn (goto-char sp)
4723 (throw 'nesting 'cexp)) 5178 (throw 'nesting 'cexp))
4724 5179
4725 (goto-char sp)) 5180 (goto-char sp))
4726 5181
4727 (if (and begin 5182 (if (and begin
4728 (not verilog-indent-begin-after-if) 5183 (not verilog-indent-begin-after-if)
4729 (looking-at verilog-no-indent-begin-re)) 5184 (looking-at verilog-no-indent-begin-re))
4730 (progn 5185 (progn
4731 (beginning-of-line) 5186 (beginning-of-line)
4732 (skip-chars-forward " \t") 5187 (skip-chars-forward " \t")
4733 (throw 'nesting 'statement)) 5188 (throw 'nesting 'statement))
4734 (progn 5189 (progn
4735 (throw 'nesting 'cexp)))) 5190 (throw 'nesting 'cexp))))
4736 ;; not a continued line 5191 ;; not a continued line
4737 (goto-char starting_position)) 5192 (goto-char starting_position))
4738 5193
4739 (if (looking-at "\\<else\\>") 5194 (if (looking-at "\\<else\\>")
4740 ;; search back for governing if, striding across begin..end pairs 5195 ;; search back for governing if, striding across begin..end pairs
4741 ;; appropriately 5196 ;; appropriately
4742 (let ((elsec 1)) 5197 (let ((elsec 1))
4743 (while (verilog-re-search-backward verilog-ends-re nil 'move) 5198 (while (verilog-re-search-backward verilog-ends-re nil 'move)
5199 (cond
5200 ((match-end 1) ; else, we're in deep
5201 (setq elsec (1+ elsec)))
5202 ((match-end 2) ; if
5203 (setq elsec (1- elsec))
5204 (if (= 0 elsec)
5205 (if verilog-align-ifelse
5206 (throw 'nesting 'statement)
5207 (progn ;; back up to first word on this line
5208 (beginning-of-line)
5209 (verilog-forward-syntactic-ws)
5210 (throw 'nesting 'statement)))))
5211 ((match-end 3) ; assert block
5212 (setq elsec (1- elsec))
5213 (verilog-beg-of-statement) ;; doesn't get to beginning
5214 (if (looking-at verilog-property-re)
5215 (throw 'nesting 'statement) ; We don't need an endproperty for these
5216 (throw 'nesting 'block) ;We still need a endproperty
5217 ))
5218 (t ; endblock
5219 ; try to leap back to matching outward block by striding across
5220 ; indent level changing tokens then immediately
5221 ; previous line governs indentation.
5222 (let (( reg) (nest 1))
5223 ;; verilog-ends => else|if|end|join(_any|_none|)|endcase|endclass|endtable|endspecify|endfunction|endtask|endgenerate|endgroup
5224 (cond
5225 ((match-end 4) ; end
5226 ;; Search back for matching begin
5227 (setq reg "\\(\\<begin\\>\\)\\|\\(\\<end\\>\\)" ))
5228 ((match-end 5) ; endcase
5229 ;; Search back for matching case
5230 (setq reg "\\(\\<randcase\\>\\|\\<case[xz]?\\>[^:]\\)\\|\\(\\<endcase\\>\\)" ))
5231 ((match-end 6) ; endfunction
5232 ;; Search back for matching function
5233 (setq reg "\\(\\<function\\>\\)\\|\\(\\<endfunction\\>\\)" ))
5234 ((match-end 7) ; endtask
5235 ;; Search back for matching task
5236 (setq reg "\\(\\<task\\>\\)\\|\\(\\<endtask\\>\\)" ))
5237 ((match-end 8) ; endspecify
5238 ;; Search back for matching specify
5239 (setq reg "\\(\\<specify\\>\\)\\|\\(\\<endspecify\\>\\)" ))
5240 ((match-end 9) ; endtable
5241 ;; Search back for matching table
5242 (setq reg "\\(\\<table\\>\\)\\|\\(\\<endtable\\>\\)" ))
5243 ((match-end 10) ; endgenerate
5244 ;; Search back for matching generate
5245 (setq reg "\\(\\<generate\\>\\)\\|\\(\\<endgenerate\\>\\)" ))
5246 ((match-end 11) ; joins
5247 ;; Search back for matching fork
5248 (setq reg "\\(\\<fork\\>\\)\\|\\(\\<join\\(_any\\|none\\)?\\>\\)" ))
5249 ((match-end 12) ; class
5250 ;; Search back for matching class
5251 (setq reg "\\(\\<class\\>\\)\\|\\(\\<endclass\\>\\)" ))
5252 ((match-end 13) ; covergroup
5253 ;; Search back for matching covergroup
5254 (setq reg "\\(\\<covergroup\\>\\)\\|\\(\\<endgroup\\>\\)" )))
5255 (catch 'skip
5256 (while (verilog-re-search-backward reg nil 'move)
4744 (cond 5257 (cond
4745 ((match-end 1) ; else, we're in deep 5258 ((match-end 1) ; begin
4746 (setq elsec (1+ elsec))) 5259 (setq nest (1- nest))
4747 ((match-end 2) ; if 5260 (if (= 0 nest)
4748 (setq elsec (1- elsec)) 5261 (throw 'skip 1)))
4749 (if (= 0 elsec) 5262 ((match-end 2) ; end
4750 (if verilog-align-ifelse 5263 (setq nest (1+ nest)))))
4751 (throw 'nesting 'statement) 5264 )))))))
4752 (progn ;; back up to first word on this line 5265 (throw 'nesting (verilog-calc-1)))
4753 (beginning-of-line) 5266 );; catch nesting
4754 (verilog-forward-syntactic-ws)
4755 (throw 'nesting 'statement)))))
4756 ((match-end 3) ; assert block
4757 (setq elsec (1- elsec))
4758 (verilog-beg-of-statement) ;; doesn't get to beginning
4759 (if (looking-at verilog-property-re)
4760 (throw 'nesting 'statement) ; We don't need an endproperty for these
4761 (throw 'nesting 'block) ;We still need a endproperty
4762 ))
4763 (t ; endblock
4764 ; try to leap back to matching outward block by striding across
4765 ; indent level changing tokens then immediately
4766 ; previous line governs indentation.
4767 (let (( reg) (nest 1))
4768;; verilog-ends => else|if|end|join(_any|_none|)|endcase|endclass|endtable|endspecify|endfunction|endtask|endgenerate|endgroup
4769 (cond
4770 ((match-end 4) ; end
4771 ;; Search back for matching begin
4772 (setq reg "\\(\\<begin\\>\\)\\|\\(\\<end\\>\\)" ))
4773 ((match-end 5) ; endcase
4774 ;; Search back for matching case
4775 (setq reg "\\(\\<randcase\\>\\|\\<case[xz]?\\>[^:]\\)\\|\\(\\<endcase\\>\\)" ))
4776 ((match-end 6) ; endfunction
4777 ;; Search back for matching function
4778 (setq reg "\\(\\<function\\>\\)\\|\\(\\<endfunction\\>\\)" ))
4779 ((match-end 7) ; endtask
4780 ;; Search back for matching task
4781 (setq reg "\\(\\<task\\>\\)\\|\\(\\<endtask\\>\\)" ))
4782 ((match-end 8) ; endspecify
4783 ;; Search back for matching specify
4784 (setq reg "\\(\\<specify\\>\\)\\|\\(\\<endspecify\\>\\)" ))
4785 ((match-end 9) ; endtable
4786 ;; Search back for matching table
4787 (setq reg "\\(\\<table\\>\\)\\|\\(\\<endtable\\>\\)" ))
4788 ((match-end 10) ; endgenerate
4789 ;; Search back for matching generate
4790 (setq reg "\\(\\<generate\\>\\)\\|\\(\\<endgenerate\\>\\)" ))
4791 ((match-end 11) ; joins
4792 ;; Search back for matching fork
4793 (setq reg "\\(\\<fork\\>\\)\\|\\(\\<join\\(_any\\|none\\)?\\>\\)" ))
4794 ((match-end 12) ; class
4795 ;; Search back for matching class
4796 (setq reg "\\(\\<class\\>\\)\\|\\(\\<endclass\\>\\)" ))
4797 ((match-end 13) ; covergroup
4798 ;; Search back for matching covergroup
4799 (setq reg "\\(\\<covergroup\\>\\)\\|\\(\\<endgroup\\>\\)" )))
4800 (catch 'skip
4801 (while (verilog-re-search-backward reg nil 'move)
4802 (cond
4803 ((match-end 1) ; begin
4804 (setq nest (1- nest))
4805 (if (= 0 nest)
4806 (throw 'skip 1)))
4807 ((match-end 2) ; end
4808 (setq nest (1+ nest)))))
4809 )))))))
4810 (throw 'nesting (verilog-calc-1)))
4811 );; catch nesting
4812 );; type 5267 );; type
4813 ) 5268 )
4814 ;; Return type of block and indent level. 5269 ;; Return type of block and indent level.
@@ -4883,8 +5338,7 @@ Return a list of two elements: (INDENT-TYPE INDENT-LEVEL)."
4883 ((match-end 4) ; *sigh* could be "disable fork" 5338 ((match-end 4) ; *sigh* could be "disable fork"
4884 (let ((here (point))) 5339 (let ((here (point)))
4885 (verilog-beg-of-statement) 5340 (verilog-beg-of-statement)
4886 (if (or (looking-at verilog-disable-fork-re) 5341 (if (looking-at verilog-disable-fork-re)
4887 (looking-at verilog-fork-wait-re))
4888 t ; this is a normal statement 5342 t ; this is a normal statement
4889 (progn ; or is fork, starts a new block 5343 (progn ; or is fork, starts a new block
4890 (goto-char here) 5344 (goto-char here)
@@ -5050,6 +5504,9 @@ Jump from end to matching begin, from endcase to matching case, and so on."
5050 ((looking-at "\\<endproperty\\>") 5504 ((looking-at "\\<endproperty\\>")
5051 ;; 11: Search back for matching property 5505 ;; 11: Search back for matching property
5052 (setq reg "\\(\\<property\\>\\)\\|\\(\\<endproperty\\>\\)" )) 5506 (setq reg "\\(\\<property\\>\\)\\|\\(\\<endproperty\\>\\)" ))
5507 ((looking-at verilog-uvm-end-re)
5508 ;; 12: Search back for matching sequence
5509 (setq reg (concat "\\(" verilog-uvm-begin-re "\\|" verilog-uvm-end-re "\\)")))
5053 ((looking-at verilog-ovm-end-re) 5510 ((looking-at verilog-ovm-end-re)
5054 ;; 12: Search back for matching sequence 5511 ;; 12: Search back for matching sequence
5055 (setq reg (concat "\\(" verilog-ovm-begin-re "\\|" verilog-ovm-end-re "\\)"))) 5512 (setq reg (concat "\\(" verilog-ovm-begin-re "\\|" verilog-ovm-end-re "\\)")))
@@ -5177,6 +5634,12 @@ Set point to where line starts."
5177 ;;XX 5634 ;;XX
5178 ((looking-at "\\<\\(always\\(_latch\\|_ff\\|_comb\\)?\\|case\\(\\|[xz]\\)\\|for\\(\\|each\\|ever\\)\\|i\\(f\\|nitial\\)\\|repeat\\|while\\)\\>") 5635 ((looking-at "\\<\\(always\\(_latch\\|_ff\\|_comb\\)?\\|case\\(\\|[xz]\\)\\|for\\(\\|each\\|ever\\)\\|i\\(f\\|nitial\\)\\|repeat\\|while\\)\\>")
5179 (not (looking-at "\\<randcase\\>\\|\\<case[xz]?\\>[^:]"))) 5636 (not (looking-at "\\<randcase\\>\\|\\<case[xz]?\\>[^:]")))
5637 ((looking-at verilog-uvm-statement-re)
5638 nil)
5639 ((looking-at verilog-uvm-begin-re)
5640 t)
5641 ((looking-at verilog-uvm-end-re)
5642 t)
5180 ((looking-at verilog-ovm-statement-re) 5643 ((looking-at verilog-ovm-statement-re)
5181 nil) 5644 nil)
5182 ((looking-at verilog-ovm-begin-re) 5645 ((looking-at verilog-ovm-begin-re)
@@ -5241,9 +5704,24 @@ Set point to where line starts."
5241 t)))))))) 5704 t))))))))
5242 5705
5243(defun verilog-backward-syntactic-ws () 5706(defun verilog-backward-syntactic-ws ()
5707 "Move backwards putting point after first non-whitespace non-comment."
5244 (verilog-skip-backward-comments) 5708 (verilog-skip-backward-comments)
5245 (forward-comment (- (buffer-size)))) 5709 (forward-comment (- (buffer-size))))
5246 5710
5711(defun verilog-backward-syntactic-ws-quick ()
5712 "As with `verilog-backward-syntactic-ws' but uses `verilog-scan' cache."
5713 (while (cond ((bobp)
5714 nil) ; Done
5715 ((> (skip-syntax-backward " ") 0)
5716 t)
5717 ((eq (preceding-char) ?\n) ;; \n's terminate // so aren't space syntax
5718 (forward-char -1)
5719 t)
5720 ((or (verilog-inside-comment-or-string-p (1- (point)))
5721 (verilog-inside-comment-or-string-p (point)))
5722 (re-search-backward "[/\"]" nil t) ;; Only way a comment or quote can begin
5723 t))))
5724
5247(defun verilog-forward-syntactic-ws () 5725(defun verilog-forward-syntactic-ws ()
5248 (verilog-skip-forward-comment-p) 5726 (verilog-skip-forward-comment-p)
5249 (forward-comment (buffer-size))) 5727 (forward-comment (buffer-size)))
@@ -5339,9 +5817,17 @@ Optional BOUND limits search."
5339 5817
5340(defun verilog-in-attribute-p () 5818(defun verilog-in-attribute-p ()
5341 "Return true if point is in an attribute (* [] attribute *)." 5819 "Return true if point is in an attribute (* [] attribute *)."
5342 (save-excursion 5820 (save-match-data
5343 (verilog-re-search-backward "\\((\\*\\)\\|\\(\\*)\\)" nil 'move) 5821 (save-excursion
5344 (numberp (match-beginning 1)))) 5822 (verilog-re-search-backward "\\((\\*\\)\\|\\(\\*)\\)" nil 'move)
5823 (numberp (match-beginning 1)))))
5824
5825(defun verilog-in-parameter-p ()
5826 "Return true if point is in a parameter assignment #( p1=1, p2=5)."
5827 (save-match-data
5828 (save-excursion
5829 (verilog-re-search-backward "\\(#(\\)\\|\\()\\)" nil 'move)
5830 (numberp (match-beginning 1)))))
5345 5831
5346(defun verilog-in-escaped-name-p () 5832(defun verilog-in-escaped-name-p ()
5347 "Return true if in an escaped name." 5833 "Return true if in an escaped name."
@@ -5357,11 +5843,27 @@ Optional BOUND limits search."
5357 (beginning-of-line) 5843 (beginning-of-line)
5358 (looking-at verilog-directive-re-1))) 5844 (looking-at verilog-directive-re-1)))
5359 5845
5846(defun verilog-in-parenthesis-p ()
5847 "Return true if in a ( ) expression (but not { } or [ ])."
5848 (save-match-data
5849 (save-excursion
5850 (verilog-re-search-backward "\\((\\)\\|\\()\\)" nil 'move)
5851 (numberp (match-beginning 1)))))
5852
5360(defun verilog-in-paren () 5853(defun verilog-in-paren ()
5361 "Return true if in a parenthetical expression." 5854 "Return true if in a parenthetical expression.
5855May cache result using `verilog-syntax-ppss'."
5362 (let ((state (save-excursion (verilog-syntax-ppss)))) 5856 (let ((state (save-excursion (verilog-syntax-ppss))))
5363 (> (nth 0 state) 0 ))) 5857 (> (nth 0 state) 0 )))
5364 5858
5859(defun verilog-in-paren-quick ()
5860 "Return true if in a parenthetical expression.
5861Always starts from point-min, to allow inserts with hooks disabled."
5862 ;; The -quick refers to its use alongside the other -quick functions,
5863 ;; not that it's likely to be faster than verilog-in-paren.
5864 (let ((state (save-excursion (parse-partial-sexp (point-min) (point)))))
5865 (> (nth 0 state) 0 )))
5866
5365(defun verilog-in-struct-p () 5867(defun verilog-in-struct-p ()
5366 "Return true if in a struct declaration." 5868 "Return true if in a struct declaration."
5367 (interactive) 5869 (interactive)
@@ -5607,7 +6109,11 @@ Only look at a few lines to determine indent level."
5607 (goto-char fst) 6109 (goto-char fst)
5608 (+ (current-column) verilog-cexp-indent)))))) 6110 (+ (current-column) verilog-cexp-indent))))))
5609 (goto-char here) 6111 (goto-char here)
5610 (indent-line-to val))) 6112 (indent-line-to val)
6113 (if (and (not verilog-indent-lists)
6114 (verilog-in-paren))
6115 (verilog-pretty-declarations))
6116 ))
5611 ((= (preceding-char) ?\) ) 6117 ((= (preceding-char) ?\) )
5612 (goto-char here) 6118 (goto-char here)
5613 (let ((val (eval (cdr (assoc type verilog-indent-alist))))) 6119 (let ((val (eval (cdr (assoc type verilog-indent-alist)))))
@@ -5915,102 +6421,104 @@ Be verbose about progress unless optional QUIET set."
5915 (unless quiet (message ""))))))) 6421 (unless quiet (message "")))))))
5916 6422
5917(defun verilog-pretty-expr (&optional quiet myre) 6423(defun verilog-pretty-expr (&optional quiet myre)
5918 "Line up expressions around point, optionally QUIET with regexp MYRE." 6424 "Line up expressions around point, optionally QUIET with regexp MYRE ignored."
5919 (interactive "i\nsRegular Expression: ((<|:)?=) ") 6425 (interactive)
5920 (save-excursion 6426 (if (not (verilog-in-comment-or-string-p))
5921 (if (or (eq myre nil) 6427 (save-excursion
5922 (string-equal myre "")) 6428 (let ((rexp (concat "^\\s-*" verilog-complete-reg)))
5923 (setq myre "\\(<\\|:\\)?=")) 6429 (beginning-of-line)
5924 ;; want to match the first <= | := | = 6430 (if (and (not (looking-at rexp ))
5925 (setq myre (concat "\\(^.*?\\)\\(" myre "\\)")) 6431 (looking-at verilog-assignment-operation-re)
5926 (let ((rexp(concat "^\\s-*" verilog-complete-reg))) 6432 (save-excursion
5927 (beginning-of-line) 6433 (goto-char (match-end 2))
5928 (if (and (not (looking-at rexp )) 6434 (and (not (verilog-in-attribute-p))
5929 (looking-at myre) 6435 (not (verilog-in-parameter-p))
5930 (save-excursion 6436 (not (verilog-in-comment-or-string-p)))))
5931 (goto-char (match-beginning 2)) 6437 (let* ((here (point))
5932 (not (verilog-in-comment-or-string-p)))) 6438 (e) (r)
5933 (let* ((here (point)) 6439 (start
5934 (e) (r) 6440 (progn
5935 (start 6441 (beginning-of-line)
5936 (progn 6442 (setq e (point))
5937 (beginning-of-line) 6443 (verilog-backward-syntactic-ws)
5938 (setq e (point)) 6444 (beginning-of-line)
5939 (verilog-backward-syntactic-ws) 6445 (while (and (not (looking-at rexp ))
5940 (beginning-of-line) 6446 (looking-at verilog-assignment-operation-re)
5941 (while (and (not (looking-at rexp )) 6447 (not (bobp))
5942 (looking-at myre) 6448 )
5943 (not (bobp)) 6449 (setq e (point))
5944 ) 6450 (verilog-backward-syntactic-ws)
5945 (setq e (point)) 6451 (beginning-of-line)
5946 (verilog-backward-syntactic-ws) 6452 ) ;Ack, need to grok `define
5947 (beginning-of-line) 6453 e))
5948 ) ;Ack, need to grok `define 6454 (end
5949 e)) 6455 (progn
5950 (end 6456 (goto-char here)
5951 (progn 6457 (end-of-line)
5952 (goto-char here) 6458 (setq e (point)) ;Might be on last line
5953 (end-of-line) 6459 (verilog-forward-syntactic-ws)
5954 (setq e (point)) ;Might be on last line 6460 (beginning-of-line)
5955 (verilog-forward-syntactic-ws) 6461 (while (and
5956 (beginning-of-line) 6462 (not (looking-at rexp ))
5957 (while (and 6463 (looking-at verilog-assignment-operation-re)
5958 (not (looking-at rexp )) 6464 (progn
5959 (looking-at myre) 6465 (end-of-line)
5960 (progn 6466 (not (eq e (point)))))
5961 (end-of-line) 6467 (setq e (point))
5962 (not (eq e (point))))) 6468 (verilog-forward-syntactic-ws)
5963 (setq e (point)) 6469 (beginning-of-line)
5964 (verilog-forward-syntactic-ws) 6470 )
5965 (beginning-of-line) 6471 e))
5966 ) 6472 (endpos (set-marker (make-marker) end))
5967 e)) 6473 (ind)
5968 (endpos (set-marker (make-marker) end)) 6474 )
5969 (ind) 6475 (goto-char start)
5970 ) 6476 (verilog-do-indent (verilog-calculate-indent))
5971 (goto-char start) 6477 (if (and (not quiet)
5972 (verilog-do-indent (verilog-calculate-indent)) 6478 (> (- end start) 100))
5973 (if (and (not quiet) 6479 (message "Lining up expressions..(please stand by)"))
5974 (> (- end start) 100)) 6480
5975 (message "Lining up expressions..(please stand by)")) 6481 ;; Set indent to minimum throughout region
5976 6482 (while (< (point) (marker-position endpos))
5977 ;; Set indent to minimum throughout region 6483 (beginning-of-line)
5978 (while (< (point) (marker-position endpos)) 6484 (verilog-just-one-space verilog-assignment-operation-re)
5979 (beginning-of-line) 6485 (beginning-of-line)
5980 (verilog-just-one-space myre) 6486 (verilog-do-indent (verilog-calculate-indent))
5981 (end-of-line) 6487 (end-of-line)
5982 (verilog-forward-syntactic-ws) 6488 (verilog-forward-syntactic-ws)
5983 ) 6489 )
5984 6490
5985 ;; Now find biggest prefix 6491 ;; Now find biggest prefix
5986 (setq ind (verilog-get-lineup-indent-2 myre start endpos)) 6492 (setq ind (verilog-get-lineup-indent-2 verilog-assignment-operation-re start endpos))
5987 6493
5988 ;; Now indent each line. 6494 ;; Now indent each line.
5989 (goto-char start) 6495 (goto-char start)
5990 (while (progn (setq e (marker-position endpos)) 6496 (while (progn (setq e (marker-position endpos))
5991 (setq r (- e (point))) 6497 (setq r (- e (point)))
5992 (> r 0)) 6498 (> r 0))
5993 (setq e (point)) 6499 (setq e (point))
5994 (if (not quiet) (message "%d" r)) 6500 (if (not quiet) (message "%d" r))
5995 (cond 6501 (cond
5996 ((looking-at myre) 6502 ((looking-at verilog-assignment-operation-re)
5997 (goto-char (match-beginning 2)) 6503 (goto-char (match-beginning 2))
5998 (if (not (verilog-parenthesis-depth)) ;; ignore parenthesized exprs 6504 (if (not (or (verilog-in-parenthesis-p) ;; leave attributes and comparisons alone
5999 (if (eq (char-after) ?=) 6505 (verilog-in-coverage-p)))
6000 (indent-to (1+ ind)) ; line up the = of the <= with surrounding = 6506 (if (eq (char-after) ?=)
6001 (indent-to ind) 6507 (indent-to (1+ ind)) ; line up the = of the <= with surrounding =
6002 ))) 6508 (indent-to ind)
6003 ((verilog-continued-line-1 start) 6509 ))
6004 (goto-char e) 6510 )
6005 (indent-line-to ind)) 6511 ((verilog-continued-line-1 start)
6006 (t ; Must be comment or white space 6512 (goto-char e)
6007 (goto-char e) 6513 (indent-line-to ind))
6008 (verilog-forward-ws&directives) 6514 (t ; Must be comment or white space
6009 (forward-line -1)) 6515 (goto-char e)
6010 ) 6516 (verilog-forward-ws&directives)
6011 (forward-line 1)) 6517 (forward-line -1))
6012 (unless quiet (message "")) 6518 )
6013 ))))) 6519 (forward-line 1))
6520 (unless quiet (message ""))
6521 ))))))
6014 6522
6015(defun verilog-just-one-space (myre) 6523(defun verilog-just-one-space (myre)
6016 "Remove extra spaces around regular expression MYRE." 6524 "Remove extra spaces around regular expression MYRE."
@@ -6021,11 +6529,9 @@ Be verbose about progress unless optional QUIET set."
6021 (p2 (match-end 2))) 6529 (p2 (match-end 2)))
6022 (progn 6530 (progn
6023 (goto-char p2) 6531 (goto-char p2)
6024 (if (looking-at "\\s-") (just-one-space)) 6532 (just-one-space)
6025 (goto-char p1) 6533 (goto-char p1)
6026 (forward-char -1) 6534 (just-one-space)))))
6027 (if (looking-at "\\s-") (just-one-space))
6028 ))))
6029 6535
6030(defun verilog-indent-declaration (baseind) 6536(defun verilog-indent-declaration (baseind)
6031 "Indent current lines as declaration. 6537 "Indent current lines as declaration.
@@ -6128,7 +6634,7 @@ Region is defined by B and EDPOS."
6128 (while (progn (setq e (marker-position edpos)) 6634 (while (progn (setq e (marker-position edpos))
6129 (< (point) e)) 6635 (< (point) e))
6130 (if (and (verilog-re-search-forward myre e 'move) 6636 (if (and (verilog-re-search-forward myre e 'move)
6131 (not (verilog-parenthesis-depth))) ;; skip parenthesized exprs 6637 (not (verilog-in-attribute-p))) ;; skip attribute exprs
6132 (progn 6638 (progn
6133 (goto-char (match-beginning 2)) 6639 (goto-char (match-beginning 2))
6134 (verilog-backward-syntactic-ws) 6640 (verilog-backward-syntactic-ws)
@@ -6374,10 +6880,10 @@ for matches of `str' and adding the occurrence tp `all' through point END."
6374(defun verilog-keyword-completion (keyword-list) 6880(defun verilog-keyword-completion (keyword-list)
6375 "Give list of all possible completions of keywords in KEYWORD-LIST." 6881 "Give list of all possible completions of keywords in KEYWORD-LIST."
6376 (mapcar (lambda (s) 6882 (mapcar (lambda (s)
6377 (if (string-match (concat "\\<" verilog-str) s) 6883 (if (string-match (concat "\\<" verilog-str) s)
6378 (if (or (null verilog-pred) 6884 (if (or (null verilog-pred)
6379 (funcall verilog-pred s)) 6885 (funcall verilog-pred s))
6380 (setq verilog-all (cons s verilog-all))))) 6886 (setq verilog-all (cons s verilog-all)))))
6381 keyword-list)) 6887 keyword-list))
6382 6888
6383 6889
@@ -6883,16 +7389,18 @@ See also `verilog-sk-header' for an alternative format."
6883(defsubst verilog-sig-width (sig) 7389(defsubst verilog-sig-width (sig)
6884 (verilog-make-width-expression (verilog-sig-bits sig))) 7390 (verilog-make-width-expression (verilog-sig-bits sig)))
6885 7391
6886(defsubst verilog-alw-new (outputs temps inputs delayed) 7392(defsubst verilog-alw-new (outputs-del outputs-imm temps inputs)
6887 (list outputs temps inputs delayed)) 7393 (list outputs-del outputs-imm temps inputs))
6888(defsubst verilog-alw-get-outputs (sigs) 7394(defsubst verilog-alw-get-outputs-delayed (sigs)
6889 (nth 0 sigs)) 7395 (nth 0 sigs))
6890(defsubst verilog-alw-get-temps (sigs) 7396(defsubst verilog-alw-get-outputs-immediate (sigs)
6891 (nth 1 sigs)) 7397 (nth 1 sigs))
6892(defsubst verilog-alw-get-inputs (sigs) 7398(defsubst verilog-alw-get-temps (sigs)
6893 (nth 2 sigs)) 7399 (nth 2 sigs))
6894(defsubst verilog-alw-get-uses-delayed (sigs) 7400(defsubst verilog-alw-get-inputs (sigs)
6895 (nth 3 sigs)) 7401 (nth 3 sigs))
7402(defsubst verilog-alw-get-uses-delayed (sigs)
7403 (nth 0 sigs))
6896 7404
6897(defsubst verilog-modi-new (name fob pt type) 7405(defsubst verilog-modi-new (name fob pt type)
6898 (vector name fob pt type)) 7406 (vector name fob pt type))
@@ -6911,18 +7419,18 @@ See also `verilog-sk-header' for an alternative format."
6911 7419
6912;; Signal reading for given module 7420;; Signal reading for given module
6913;; Note these all take modi's - as returned from verilog-modi-current 7421;; Note these all take modi's - as returned from verilog-modi-current
6914(defsubst verilog-decls-new (out inout in wires regs assigns consts gparams interfaces) 7422(defsubst verilog-decls-new (out inout in vars unuseds assigns consts gparams interfaces)
6915 (vector out inout in wires regs assigns consts gparams interfaces)) 7423 (vector out inout in vars unuseds assigns consts gparams interfaces))
6916(defsubst verilog-decls-get-outputs (decls) 7424(defsubst verilog-decls-get-outputs (decls)
6917 (aref decls 0)) 7425 (aref decls 0))
6918(defsubst verilog-decls-get-inouts (decls) 7426(defsubst verilog-decls-get-inouts (decls)
6919 (aref decls 1)) 7427 (aref decls 1))
6920(defsubst verilog-decls-get-inputs (decls) 7428(defsubst verilog-decls-get-inputs (decls)
6921 (aref decls 2)) 7429 (aref decls 2))
6922(defsubst verilog-decls-get-wires (decls) 7430(defsubst verilog-decls-get-vars (decls)
6923 (aref decls 3)) 7431 (aref decls 3))
6924(defsubst verilog-decls-get-regs (decls) 7432;;(defsubst verilog-decls-get-unused (decls)
6925 (aref decls 4)) 7433;; (aref decls 4))
6926(defsubst verilog-decls-get-assigns (decls) 7434(defsubst verilog-decls-get-assigns (decls)
6927 (aref decls 5)) 7435 (aref decls 5))
6928(defsubst verilog-decls-get-consts (decls) 7436(defsubst verilog-decls-get-consts (decls)
@@ -7026,6 +7534,7 @@ Duplicate signals are also removed. For example A[2] and A[1] become A[2:1]."
7026 buswarn "")) 7534 buswarn ""))
7027 ;; Extract bus details 7535 ;; Extract bus details
7028 (setq bus (verilog-sig-bits sig)) 7536 (setq bus (verilog-sig-bits sig))
7537 (setq bus (and bus (verilog-simplify-range-expression bus)))
7029 (cond ((and bus 7538 (cond ((and bus
7030 (or (and (string-match "\\[\\([0-9]+\\):\\([0-9]+\\)\\]" bus) 7539 (or (and (string-match "\\[\\([0-9]+\\):\\([0-9]+\\)\\]" bus)
7031 (setq highbit (string-to-number (match-string 1 bus)) 7540 (setq highbit (string-to-number (match-string 1 bus))
@@ -7145,9 +7654,10 @@ Ignore width if optional NO-WIDTH is set."
7145 "Return module name when after its ( or ;." 7654 "Return module name when after its ( or ;."
7146 (save-excursion 7655 (save-excursion
7147 (re-search-backward "[(;]") 7656 (re-search-backward "[(;]")
7148 (verilog-re-search-backward-quick "\\b[a-zA-Z0-9`_\$]" nil nil) 7657 ;; Due to "module x import y (" we must search for declaration begin
7149 (skip-chars-backward "a-zA-Z0-9`_$") 7658 (verilog-re-search-backward-quick verilog-defun-re nil nil)
7150 (looking-at "[a-zA-Z0-9`_\$]+") 7659 (goto-char (match-end 0))
7660 (verilog-re-search-forward-quick "\\b[a-zA-Z0-9`_\$]+" nil nil)
7151 ;; Important: don't use match string, this must work with Emacs 19 font-lock on 7661 ;; Important: don't use match string, this must work with Emacs 19 font-lock on
7152 (verilog-symbol-detick 7662 (verilog-symbol-detick
7153 (buffer-substring-no-properties (match-beginning 0) (match-end 0)) t))) 7663 (buffer-substring-no-properties (match-beginning 0) (match-end 0)) t)))
@@ -7203,13 +7713,13 @@ Optional NUM-PARAM and MAX-PARAM check for a specific number of parameters."
7203Return a array of [outputs inouts inputs wire reg assign const]." 7713Return a array of [outputs inouts inputs wire reg assign const]."
7204 (let ((end-mod-point (or (verilog-get-end-of-defun t) (point-max))) 7714 (let ((end-mod-point (or (verilog-get-end-of-defun t) (point-max)))
7205 (functask 0) (paren 0) (sig-paren 0) (v2kargs-ok t) 7715 (functask 0) (paren 0) (sig-paren 0) (v2kargs-ok t)
7206 in-modport 7716 in-modport ign-prop
7207 sigs-in sigs-out sigs-inout sigs-wire sigs-reg sigs-assign sigs-const 7717 sigs-in sigs-out sigs-inout sigs-var sigs-assign sigs-const
7208 sigs-gparam sigs-intf 7718 sigs-gparam sigs-intf
7209 vec expect-signal keywd newsig rvalue enum io signed typedefed multidim 7719 vec expect-signal keywd newsig rvalue enum io signed typedefed multidim
7210 modport) 7720 modport)
7211 (save-excursion 7721 (save-excursion
7212 (verilog-beg-of-defun) 7722 (verilog-beg-of-defun-quick)
7213 (setq sigs-const (verilog-read-auto-constants (point) end-mod-point)) 7723 (setq sigs-const (verilog-read-auto-constants (point) end-mod-point))
7214 (while (< (point) end-mod-point) 7724 (while (< (point) end-mod-point)
7215 ;;(if dbg (setq dbg (concat dbg (format "Pt %s Vec %s C%c Kwd'%s'\n" (point) vec (following-char) keywd)))) 7725 ;;(if dbg (setq dbg (concat dbg (format "Pt %s Vec %s C%c Kwd'%s'\n" (point) vec (following-char) keywd))))
@@ -7225,16 +7735,16 @@ Return a array of [outputs inouts inputs wire reg assign const]."
7225 (or (search-forward "*/") 7735 (or (search-forward "*/")
7226 (error "%s: Unmatched /* */, at char %d" (verilog-point-text) (point)))) 7736 (error "%s: Unmatched /* */, at char %d" (verilog-point-text) (point))))
7227 ((looking-at "(\\*") 7737 ((looking-at "(\\*")
7228 (forward-char 2) 7738 ;; To advance past either "(*)" or "(* ... *)" don't forward past first *
7229 (or (looking-at "\\s-*)") ; It's an "always @ (*)" 7739 (forward-char 1)
7230 (search-forward "*)") 7740 (or (search-forward "*)")
7231 (error "%s: Unmatched (* *), at char %d" (verilog-point-text) (point)))) 7741 (error "%s: Unmatched (* *), at char %d" (verilog-point-text) (point))))
7232 ((eq ?\" (following-char)) 7742 ((eq ?\" (following-char))
7233 (or (re-search-forward "[^\\]\"" nil t) ;; don't forward-char first, since we look for a non backslash first 7743 (or (re-search-forward "[^\\]\"" nil t) ;; don't forward-char first, since we look for a non backslash first
7234 (error "%s: Unmatched quotes, at char %d" (verilog-point-text) (point)))) 7744 (error "%s: Unmatched quotes, at char %d" (verilog-point-text) (point))))
7235 ((eq ?\; (following-char)) 7745 ((eq ?\; (following-char))
7236 (setq vec nil io nil expect-signal nil newsig nil paren 0 rvalue nil 7746 (setq vec nil io nil expect-signal nil newsig nil paren 0 rvalue nil
7237 v2kargs-ok nil in-modport nil) 7747 v2kargs-ok nil in-modport nil ign-prop nil)
7238 (forward-char 1)) 7748 (forward-char 1))
7239 ((eq ?= (following-char)) 7749 ((eq ?= (following-char))
7240 (setq rvalue t newsig nil) 7750 (setq rvalue t newsig nil)
@@ -7290,16 +7800,15 @@ Return a array of [outputs inouts inputs wire reg assign const]."
7290 ((equal keywd "parameter") 7800 ((equal keywd "parameter")
7291 (setq vec nil enum nil rvalue nil signed nil typedefed nil multidim nil sig-paren paren 7801 (setq vec nil enum nil rvalue nil signed nil typedefed nil multidim nil sig-paren paren
7292 expect-signal 'sigs-gparam io t modport nil)) 7802 expect-signal 'sigs-gparam io t modport nil))
7293 ((member keywd '("wire" "tri" "tri0" "tri1" "triand" "trior" "wand" "wor")) 7803 ((member keywd '("wire"
7294 (unless io (setq vec nil enum nil rvalue nil signed nil typedefed nil multidim nil sig-paren paren 7804 "tri" "tri0" "tri1" "triand" "trior" "wand" "wor"
7295 expect-signal 'sigs-wire modport nil))) 7805 "reg" "trireg"
7296 ((member keywd '("reg" "trireg"
7297 "byte" "shortint" "int" "longint" "integer" "time" 7806 "byte" "shortint" "int" "longint" "integer" "time"
7298 "bit" "logic" 7807 "bit" "logic"
7299 "shortreal" "real" "realtime" 7808 "shortreal" "real" "realtime"
7300 "string" "event" "chandle")) 7809 "string" "event" "chandle"))
7301 (unless io (setq vec nil enum nil rvalue nil signed nil typedefed nil multidim nil sig-paren paren 7810 (unless io (setq vec nil enum nil rvalue nil signed nil typedefed nil multidim nil sig-paren paren
7302 expect-signal 'sigs-reg modport nil))) 7811 expect-signal 'sigs-var modport nil)))
7303 ((equal keywd "assign") 7812 ((equal keywd "assign")
7304 (setq vec nil enum nil rvalue nil signed nil typedefed nil multidim nil sig-paren paren 7813 (setq vec nil enum nil rvalue nil signed nil typedefed nil multidim nil sig-paren paren
7305 expect-signal 'sigs-assign modport nil)) 7814 expect-signal 'sigs-assign modport nil))
@@ -7307,11 +7816,14 @@ Return a array of [outputs inouts inputs wire reg assign const]."
7307 "localparam" "genvar")) 7816 "localparam" "genvar"))
7308 (unless io (setq vec nil enum nil rvalue nil signed nil typedefed nil multidim nil sig-paren paren 7817 (unless io (setq vec nil enum nil rvalue nil signed nil typedefed nil multidim nil sig-paren paren
7309 expect-signal 'sigs-const modport nil))) 7818 expect-signal 'sigs-const modport nil)))
7310 ((equal keywd "signed") 7819 ((member keywd '("signed" "unsigned"))
7311 (setq signed "signed")) 7820 (setq signed keywd))
7821 ((member keywd '("assert" "assume" "cover" "expect" "restrict"))
7822 (setq ign-prop t))
7312 ((member keywd '("class" "clocking" "covergroup" "function" 7823 ((member keywd '("class" "clocking" "covergroup" "function"
7313 "property" "randsequence" "sequence" "task")) 7824 "property" "randsequence" "sequence" "task"))
7314 (setq functask (1+ functask))) 7825 (unless ign-prop
7826 (setq functask (1+ functask))))
7315 ((member keywd '("endclass" "endclocking" "endgroup" "endfunction" 7827 ((member keywd '("endclass" "endclocking" "endgroup" "endfunction"
7316 "endproperty" "endsequence" "endtask")) 7828 "endproperty" "endsequence" "endtask"))
7317 (setq functask (1- functask))) 7829 (setq functask (1- functask)))
@@ -7354,8 +7866,8 @@ Return a array of [outputs inouts inputs wire reg assign const]."
7354 (verilog-decls-new (nreverse sigs-out) 7866 (verilog-decls-new (nreverse sigs-out)
7355 (nreverse sigs-inout) 7867 (nreverse sigs-inout)
7356 (nreverse sigs-in) 7868 (nreverse sigs-in)
7357 (nreverse sigs-wire) 7869 (nreverse sigs-var)
7358 (nreverse sigs-reg) 7870 nil
7359 (nreverse sigs-assign) 7871 (nreverse sigs-assign)
7360 (nreverse sigs-const) 7872 (nreverse sigs-const)
7361 (nreverse sigs-gparam) 7873 (nreverse sigs-gparam)
@@ -7442,8 +7954,7 @@ Return a array of [outputs inouts inputs wire reg assign const]."
7442 multidim nil) 7954 multidim nil)
7443 sigs-intf))) 7955 sigs-intf)))
7444 ((setq portdata (and verilog-read-sub-decls-in-interfaced 7956 ((setq portdata (and verilog-read-sub-decls-in-interfaced
7445 (or (assoc port (verilog-decls-get-regs submoddecls)) 7957 (assoc port (verilog-decls-get-vars submoddecls))))
7446 (assoc port (verilog-decls-get-wires submoddecls)))))
7447 (setq sigs-intfd 7958 (setq sigs-intfd
7448 (cons (verilog-sig-new 7959 (cons (verilog-sig-new
7449 sig 7960 sig
@@ -7556,7 +8067,8 @@ Inserts the list of signals found, using submodi to look up each port."
7556 submoddecls comment port 8067 submoddecls comment port
7557 (buffer-substring 8068 (buffer-substring
7558 (point) (1- (progn (search-backward "(") ; start at ( 8069 (point) (1- (progn (search-backward "(") ; start at (
7559 (forward-sexp 1) (point)))))))) ; expr 8070 (verilog-forward-sexp-ign-cmt 1)
8071 (point)))))))) ; expr
7560 ;; 8072 ;;
7561 (forward-line 1))))) 8073 (forward-line 1)))))
7562 8074
@@ -7573,8 +8085,9 @@ Inserts the list of signals found."
7573 (or (search-forward "*/") 8085 (or (search-forward "*/")
7574 (error "%s: Unmatched /* */, at char %d" (verilog-point-text) (point)))) 8086 (error "%s: Unmatched /* */, at char %d" (verilog-point-text) (point))))
7575 ((looking-at "(\\*") 8087 ((looking-at "(\\*")
7576 (or (looking-at "(\\*\\s-*)") ; It's a "always @ (*)" 8088 ;; To advance past either "(*)" or "(* ... *)" don't forward past first *
7577 (search-forward "*)") 8089 (forward-char 1)
8090 (or (search-forward "*)")
7578 (error "%s: Unmatched (* *), at char %d" (verilog-point-text) (point)))) 8091 (error "%s: Unmatched (* *), at char %d" (verilog-point-text) (point))))
7579 ;; On pins, parse and advance to next pin 8092 ;; On pins, parse and advance to next pin
7580 ;; Looking at pin, but *not* an // Output comment, or ) to end the inst 8093 ;; Looking at pin, but *not* an // Output comment, or ) to end the inst
@@ -7612,11 +8125,11 @@ Outputs comments above subcell signals, for example:
7612 st-point end-inst-point 8125 st-point end-inst-point
7613 ;; below 3 modified by verilog-read-sub-decls-line 8126 ;; below 3 modified by verilog-read-sub-decls-line
7614 sigs-out sigs-inout sigs-in sigs-intf sigs-intfd) 8127 sigs-out sigs-inout sigs-in sigs-intf sigs-intfd)
7615 (verilog-beg-of-defun) 8128 (verilog-beg-of-defun-quick)
7616 (while (verilog-re-search-forward "\\(/\\*AUTOINST\\*/\\|\\.\\*\\)" end-mod-point t) 8129 (while (verilog-re-search-forward-quick "\\(/\\*AUTOINST\\*/\\|\\.\\*\\)" end-mod-point t)
7617 (save-excursion 8130 (save-excursion
7618 (goto-char (match-beginning 0)) 8131 (goto-char (match-beginning 0))
7619 (unless (verilog-inside-comment-p) 8132 (unless (verilog-inside-comment-or-string-p)
7620 ;; Attempt to snarf a comment 8133 ;; Attempt to snarf a comment
7621 (let* ((submod (verilog-read-inst-module)) 8134 (let* ((submod (verilog-read-inst-module))
7622 (inst (verilog-read-inst-name)) 8135 (inst (verilog-read-inst-name))
@@ -7629,7 +8142,8 @@ Outputs comments above subcell signals, for example:
7629 submoddecls (verilog-decls-new nil nil nil nil nil nil nil nil nil) 8142 submoddecls (verilog-decls-new nil nil nil nil nil nil nil nil nil)
7630 comment (concat inst " of " submod)) 8143 comment (concat inst " of " submod))
7631 (verilog-backward-open-paren) 8144 (verilog-backward-open-paren)
7632 (setq end-inst-point (save-excursion (forward-sexp 1) (point)) 8145 (setq end-inst-point (save-excursion (verilog-forward-sexp-ign-cmt 1)
8146 (point))
7633 st-point (point)) 8147 st-point (point))
7634 (forward-char 1) 8148 (forward-char 1)
7635 (verilog-read-sub-decls-gate submoddecls comment submod end-inst-point)) 8149 (verilog-read-sub-decls-gate submoddecls comment submod end-inst-point))
@@ -7639,7 +8153,8 @@ Outputs comments above subcell signals, for example:
7639 (setq submoddecls (verilog-modi-get-decls submodi) 8153 (setq submoddecls (verilog-modi-get-decls submodi)
7640 verilog-read-sub-decls-gate-ios nil) 8154 verilog-read-sub-decls-gate-ios nil)
7641 (verilog-backward-open-paren) 8155 (verilog-backward-open-paren)
7642 (setq end-inst-point (save-excursion (forward-sexp 1) (point)) 8156 (setq end-inst-point (save-excursion (verilog-forward-sexp-ign-cmt 1)
8157 (point))
7643 st-point (point)) 8158 st-point (point))
7644 ;; This could have used a list created by verilog-auto-inst 8159 ;; This could have used a list created by verilog-auto-inst
7645 ;; However I want it to be runnable even on user's manually added signals 8160 ;; However I want it to be runnable even on user's manually added signals
@@ -7677,10 +8192,10 @@ For example if declare A A (.B(SIG)) then B will be included in the list."
7677 (verilog-backward-open-paren) 8192 (verilog-backward-open-paren)
7678 (while (re-search-forward "\\.\\([^(,) \t\n\f]*\\)\\s-*" end-mod-point t) 8193 (while (re-search-forward "\\.\\([^(,) \t\n\f]*\\)\\s-*" end-mod-point t)
7679 (setq pin (match-string 1)) 8194 (setq pin (match-string 1))
7680 (unless (verilog-inside-comment-p) 8195 (unless (verilog-inside-comment-or-string-p)
7681 (setq pins (cons (list pin) pins)) 8196 (setq pins (cons (list pin) pins))
7682 (when (looking-at "(") 8197 (when (looking-at "(")
7683 (forward-sexp 1)))) 8198 (verilog-forward-sexp-ign-cmt 1))))
7684 (vector pins)))) 8199 (vector pins))))
7685 8200
7686(defun verilog-read-arg-pins () 8201(defun verilog-read-arg-pins ()
@@ -7691,7 +8206,7 @@ For example if declare A A (.B(SIG)) then B will be included in the list."
7691 (verilog-backward-open-paren) 8206 (verilog-backward-open-paren)
7692 (while (re-search-forward "\\([a-zA-Z0-9$_.%`]+\\)" end-mod-point t) 8207 (while (re-search-forward "\\([a-zA-Z0-9$_.%`]+\\)" end-mod-point t)
7693 (setq pin (match-string 1)) 8208 (setq pin (match-string 1))
7694 (unless (verilog-inside-comment-p) 8209 (unless (verilog-inside-comment-or-string-p)
7695 (setq pins (cons (list pin) pins)))) 8210 (setq pins (cons (list pin) pins))))
7696 (vector pins)))) 8211 (vector pins))))
7697 8212
@@ -7707,7 +8222,7 @@ For example if declare A A (.B(SIG)) then B will be included in the list."
7707 (search-forward "(" end-mod-point) 8222 (search-forward "(" end-mod-point)
7708 (setq tpl-end-pt (save-excursion 8223 (setq tpl-end-pt (save-excursion
7709 (backward-char 1) 8224 (backward-char 1)
7710 (forward-sexp 1) ;; Moves to paren that closes argdecl's 8225 (verilog-forward-sexp-cmt 1) ;; Moves to paren that closes argdecl's
7711 (backward-char 1) 8226 (backward-char 1)
7712 (point))) 8227 (point)))
7713 (while (re-search-forward "\\s-*\\([\"a-zA-Z0-9$_.%`]+\\)\\s-*,*" tpl-end-pt t) 8228 (while (re-search-forward "\\s-*\\([\"a-zA-Z0-9$_.%`]+\\)\\s-*,*" tpl-end-pt t)
@@ -7720,6 +8235,7 @@ For example if declare A A (.B(SIG)) then B will be included in the list."
7720(defun verilog-read-auto-lisp-present () 8235(defun verilog-read-auto-lisp-present ()
7721 "Set `verilog-cache-has-lisp' if any AUTO_LISP in this buffer." 8236 "Set `verilog-cache-has-lisp' if any AUTO_LISP in this buffer."
7722 (save-excursion 8237 (save-excursion
8238 (goto-char (point-min))
7723 (setq verilog-cache-has-lisp (re-search-forward "\\<AUTO_LISP(" nil t)))) 8239 (setq verilog-cache-has-lisp (re-search-forward "\\<AUTO_LISP(" nil t))))
7724 8240
7725(defun verilog-read-auto-lisp (start end) 8241(defun verilog-read-auto-lisp (start end)
@@ -7732,7 +8248,7 @@ Must call `verilog-read-auto-lisp-present' before this function."
7732 (while (re-search-forward "\\<AUTO_LISP(" end t) 8248 (while (re-search-forward "\\<AUTO_LISP(" end t)
7733 (backward-char) 8249 (backward-char)
7734 (let* ((beg-pt (prog1 (point) 8250 (let* ((beg-pt (prog1 (point)
7735 (forward-sexp 1))) ;; Closing paren 8251 (verilog-forward-sexp-cmt 1))) ;; Closing paren
7736 (end-pt (point))) 8252 (end-pt (point)))
7737 (eval-region beg-pt end-pt nil)))))) 8253 (eval-region beg-pt end-pt nil))))))
7738 8254
@@ -7741,9 +8257,10 @@ Must call `verilog-read-auto-lisp-present' before this function."
7741 ;; Do not remove the eval-when-compile 8257 ;; Do not remove the eval-when-compile
7742 ;; - we want a error when we are debugging this code if they are refed. 8258 ;; - we want a error when we are debugging this code if they are refed.
7743 (defvar sigs-in) 8259 (defvar sigs-in)
7744 (defvar sigs-out) 8260 (defvar sigs-out-d)
8261 (defvar sigs-out-i)
8262 (defvar sigs-out-unk)
7745 (defvar sigs-temp) 8263 (defvar sigs-temp)
7746 (defvar uses-delayed)
7747 (defvar vector-skip-list)) 8264 (defvar vector-skip-list))
7748 8265
7749(defun verilog-read-always-signals-recurse 8266(defun verilog-read-always-signals-recurse
@@ -7764,8 +8281,9 @@ IGNORE-NEXT is true to ignore next token, fake from inside case statement."
7764 (or (search-forward "*/") 8281 (or (search-forward "*/")
7765 (error "%s: Unmatched /* */, at char %d" (verilog-point-text) (point)))) 8282 (error "%s: Unmatched /* */, at char %d" (verilog-point-text) (point))))
7766 ((looking-at "(\\*") 8283 ((looking-at "(\\*")
7767 (or (looking-at "(\\*\\s-*)") ; It's a "always @ (*)" 8284 ;; To advance past either "(*)" or "(* ... *)" don't forward past first *
7768 (search-forward "*)") 8285 (forward-char 1)
8286 (or (search-forward "*)")
7769 (error "%s: Unmatched (* *), at char %d" (verilog-point-text) (point)))) 8287 (error "%s: Unmatched (* *), at char %d" (verilog-point-text) (point))))
7770 (t (setq keywd (buffer-substring-no-properties 8288 (t (setq keywd (buffer-substring-no-properties
7771 (point) 8289 (point)
@@ -7817,9 +8335,16 @@ IGNORE-NEXT is true to ignore next token, fake from inside case statement."
7817 (setq ignore-next t rvalue nil))) 8335 (setq ignore-next t rvalue nil)))
7818 (forward-char 1)) 8336 (forward-char 1))
7819 ((equal keywd "=") 8337 ((equal keywd "=")
7820 (if (and (eq (char-before) ?< ) 8338 (when got-sig
7821 (not rvalue)) 8339 ;;(if dbg (setq dbg (concat dbg (format "\t\tequal got-sig=%S got-list=%s\n" got-sig got-list))))
7822 (setq uses-delayed 1)) 8340 (set got-list (cons got-sig (symbol-value got-list)))
8341 (setq got-sig nil))
8342 (when (not rvalue)
8343 (if (eq (char-before) ?< )
8344 (setq sigs-out-d (append sigs-out-d sigs-out-unk)
8345 sigs-out-unk nil)
8346 (setq sigs-out-i (append sigs-out-i sigs-out-unk)
8347 sigs-out-unk nil)))
7823 (setq ignore-next nil rvalue t) 8348 (setq ignore-next nil rvalue t)
7824 (forward-char 1)) 8349 (forward-char 1))
7825 ((equal keywd "?") 8350 ((equal keywd "?")
@@ -7865,7 +8390,7 @@ IGNORE-NEXT is true to ignore next token, fake from inside case statement."
7865 ) 8390 )
7866 (setq got-list (cond (temp-next 'sigs-temp) 8391 (setq got-list (cond (temp-next 'sigs-temp)
7867 (rvalue 'sigs-in) 8392 (rvalue 'sigs-in)
7868 (t 'sigs-out)) 8393 (t 'sigs-out-unk))
7869 got-sig (if (or (not keywd) 8394 got-sig (if (or (not keywd)
7870 (assoc keywd (symbol-value got-list))) 8395 (assoc keywd (symbol-value got-list)))
7871 nil (list keywd nil nil)) 8396 nil (list keywd nil nil))
@@ -7889,17 +8414,18 @@ IGNORE-NEXT is true to ignore next token, fake from inside case statement."
7889 "Parse always block at point and return list of (outputs inout inputs)." 8414 "Parse always block at point and return list of (outputs inout inputs)."
7890 (save-excursion 8415 (save-excursion
7891 (let* (;;(dbg "") 8416 (let* (;;(dbg "")
7892 sigs-out sigs-temp sigs-in 8417 sigs-out-d sigs-out-i sigs-out-unk sigs-temp sigs-in)
7893 uses-delayed) ;; Found signal/rvalue; push if not function
7894 (search-forward ")") 8418 (search-forward ")")
7895 (verilog-read-always-signals-recurse nil nil nil) 8419 (verilog-read-always-signals-recurse nil nil nil)
8420 (setq sigs-out-i (append sigs-out-i sigs-out-unk)
8421 sigs-out-unk nil)
7896 ;;(if dbg (with-current-buffer (get-buffer-create "*vl-dbg*")) (delete-region (point-min) (point-max)) (insert dbg) (setq dbg "")) 8422 ;;(if dbg (with-current-buffer (get-buffer-create "*vl-dbg*")) (delete-region (point-min) (point-max)) (insert dbg) (setq dbg ""))
7897 ;; Return what was found 8423 ;; Return what was found
7898 (verilog-alw-new sigs-out sigs-temp sigs-in uses-delayed)))) 8424 (verilog-alw-new sigs-out-d sigs-out-i sigs-temp sigs-in))))
7899 8425
7900(defun verilog-read-instants () 8426(defun verilog-read-instants ()
7901 "Parse module at point and return list of ( ( file instance ) ... )." 8427 "Parse module at point and return list of ( ( file instance ) ... )."
7902 (verilog-beg-of-defun) 8428 (verilog-beg-of-defun-quick)
7903 (let* ((end-mod-point (verilog-get-end-of-defun t)) 8429 (let* ((end-mod-point (verilog-get-end-of-defun t))
7904 (state nil) 8430 (state nil)
7905 (instants-list nil)) 8431 (instants-list nil))
@@ -7930,7 +8456,7 @@ list of ( (signal_name connection_name)... )."
7930 (save-excursion 8456 (save-excursion
7931 ;; Find beginning 8457 ;; Find beginning
7932 (let ((tpl-regexp "\\([0-9]+\\)") 8458 (let ((tpl-regexp "\\([0-9]+\\)")
7933 (lineno 0) 8459 (lineno -1) ; -1 to offset for the AUTO_TEMPLATE's newline
7934 (templateno 0) 8460 (templateno 0)
7935 (pt (point)) 8461 (pt (point))
7936 tpl-sig-list tpl-wild-list tpl-end-pt rep) 8462 tpl-sig-list tpl-wild-list tpl-end-pt rep)
@@ -7962,22 +8488,27 @@ list of ( (signal_name connection_name)... )."
7962 ;; Parse lines in the template 8488 ;; Parse lines in the template
7963 (when verilog-auto-inst-template-numbers 8489 (when verilog-auto-inst-template-numbers
7964 (save-excursion 8490 (save-excursion
7965 (goto-char (point-min)) 8491 (let ((pre-pt (point)))
7966 (while (search-forward "AUTO_TEMPLATE" nil t) 8492 (goto-char (point-min))
7967 (setq templateno (1+ templateno))))) 8493 (while (search-forward "AUTO_TEMPLATE" pre-pt t)
8494 (setq templateno (1+ templateno)))
8495 (while (< (point) pre-pt)
8496 (forward-line 1)
8497 (setq lineno (1+ lineno))))))
7968 (setq tpl-end-pt (save-excursion 8498 (setq tpl-end-pt (save-excursion
7969 (backward-char 1) 8499 (backward-char 1)
7970 (forward-sexp 1) ;; Moves to paren that closes argdecl's 8500 (verilog-forward-sexp-cmt 1) ;; Moves to paren that closes argdecl's
7971 (backward-char 1) 8501 (backward-char 1)
7972 (point))) 8502 (point)))
7973 ;; 8503 ;;
7974 (while (< (point) tpl-end-pt) 8504 (while (< (point) tpl-end-pt)
7975 (cond ((looking-at "\\s-*\\.\\([a-zA-Z0-9`_$]+\\)\\s-*(\\(.*\\))\\s-*\\(,\\|)\\s-*;\\)") 8505 (cond ((looking-at "\\s-*\\.\\([a-zA-Z0-9`_$]+\\)\\s-*(\\(.*\\))\\s-*\\(,\\|)\\s-*;\\)")
7976 (setq tpl-sig-list (cons (list 8506 (setq tpl-sig-list
7977 (match-string-no-properties 1) 8507 (cons (list
7978 (match-string-no-properties 2) 8508 (match-string-no-properties 1)
7979 templateno lineno) 8509 (match-string-no-properties 2)
7980 tpl-sig-list)) 8510 templateno lineno)
8511 tpl-sig-list))
7981 (goto-char (match-end 0))) 8512 (goto-char (match-end 0)))
7982 ;; Regexp form?? 8513 ;; Regexp form??
7983 ((looking-at 8514 ((looking-at
@@ -8000,7 +8531,8 @@ list of ( (signal_name connection_name)... )."
8000 (setq lineno (1+ lineno)) 8531 (setq lineno (1+ lineno))
8001 (goto-char (match-end 0))) 8532 (goto-char (match-end 0)))
8002 ((looking-at "//") 8533 ((looking-at "//")
8003 (search-forward "\n")) 8534 (search-forward "\n")
8535 (setq lineno (1+ lineno)))
8004 ((looking-at "/\\*") 8536 ((looking-at "/\\*")
8005 (forward-char 2) 8537 (forward-char 2)
8006 (or (search-forward "*/") 8538 (or (search-forward "*/")
@@ -8086,7 +8618,7 @@ warning message, you need to add to your .emacs file:
8086 (while (re-search-forward "^\\s-*`include\\s-+\\([^ \t\n\f]+\\)" nil t) 8618 (while (re-search-forward "^\\s-*`include\\s-+\\([^ \t\n\f]+\\)" nil t)
8087 (let ((inc (verilog-string-replace-matches 8619 (let ((inc (verilog-string-replace-matches
8088 "\"" "" nil nil (match-string-no-properties 1)))) 8620 "\"" "" nil nil (match-string-no-properties 1))))
8089 (unless (verilog-inside-comment-p) 8621 (unless (verilog-inside-comment-or-string-p)
8090 (verilog-read-defines inc recurse t))))) 8622 (verilog-read-defines inc recurse t)))))
8091 ;; Read `defines 8623 ;; Read `defines
8092 ;; note we don't use verilog-re... it's faster this way, and that 8624 ;; note we don't use verilog-re... it's faster this way, and that
@@ -8100,14 +8632,15 @@ warning message, you need to add to your .emacs file:
8100 ;; Hack: Read parameters 8632 ;; Hack: Read parameters
8101 (goto-char (point-min)) 8633 (goto-char (point-min))
8102 (while (re-search-forward 8634 (while (re-search-forward
8103 "^\\s-*\\(parameter\\|localparam\\)\\(\\s-*\\[[^]]*\\]\\)?\\s-+" nil t) 8635 "^\\s-*\\(parameter\\|localparam\\)\\(\\s-*\\[[^]]*\\]\\)?\\s-*" nil t)
8104 (let (enumname) 8636 (let (enumname)
8105 ;; The primary way of getting defines is verilog-read-decls 8637 ;; The primary way of getting defines is verilog-read-decls
8106 ;; However, that isn't called yet for included files, so we'll add another scheme 8638 ;; However, that isn't called yet for included files, so we'll add another scheme
8107 (if (looking-at "[^\n]*synopsys\\s +enum\\s +\\([a-zA-Z0-9_]+\\)") 8639 (if (looking-at "[^\n]*synopsys\\s +enum\\s +\\([a-zA-Z0-9_]+\\)")
8108 (setq enumname (match-string-no-properties 1))) 8640 (setq enumname (match-string-no-properties 1)))
8109 (forward-comment 999) 8641 (forward-comment 999)
8110 (while (looking-at "\\s-*,?\\s-*\\([a-zA-Z0-9_$]+\\)\\s-*=\\s-*\\([^;,]*\\),?\\s-*") 8642 (while (looking-at (concat "\\s-*,?\\s-*\\(?:/[/*].*?$\\)?\\s-*\\([a-zA-Z0-9_$]+\\)"
8643 "\\s-*=\\s-*\\([^;,]*\\),?\\s-*\\(/[/*].*?$\\)?\\s-*"))
8111 (verilog-set-define (match-string-no-properties 1) 8644 (verilog-set-define (match-string-no-properties 1)
8112 (match-string-no-properties 2) origbuf enumname) 8645 (match-string-no-properties 2) origbuf enumname)
8113 (goto-char (match-end 0)) 8646 (goto-char (match-end 0))
@@ -8278,11 +8811,11 @@ Some macros and such are also found and included. For dinotrace.el."
8278 verilog-library-files 8811 verilog-library-files
8279 verilog-library-flags))) 8812 verilog-library-flags)))
8280 ;; Allow user to customize 8813 ;; Allow user to customize
8281 (run-hooks 'verilog-before-getopt-flags-hook) 8814 (verilog-run-hooks 'verilog-before-getopt-flags-hook)
8282 ;; Process arguments 8815 ;; Process arguments
8283 (verilog-getopt verilog-library-flags) 8816 (verilog-getopt verilog-library-flags)
8284 ;; Allow user to customize 8817 ;; Allow user to customize
8285 (run-hooks 'verilog-getopt-flags-hook)) 8818 (verilog-run-hooks 'verilog-getopt-flags-hook))
8286 8819
8287(defun verilog-add-list-unique (varref object) 8820(defun verilog-add-list-unique (varref object)
8288 "Append to VARREF list the given OBJECT, 8821 "Append to VARREF list the given OBJECT,
@@ -8387,7 +8920,7 @@ Allows version control to check out the file if need be."
8387 (while (and 8920 (while (and
8388 ;; It may be tempting to look for verilog-defun-re, 8921 ;; It may be tempting to look for verilog-defun-re,
8389 ;; don't, it slows things down a lot! 8922 ;; don't, it slows things down a lot!
8390 (verilog-re-search-forward-quick "\\<\\(module\\|interface\\)\\>" nil t) 8923 (verilog-re-search-forward-quick "\\<\\(module\\|interface\\|program\\)\\>" nil t)
8391 (setq type (match-string-no-properties 0)) 8924 (setq type (match-string-no-properties 0))
8392 (verilog-re-search-forward-quick "[(;]" nil t)) 8925 (verilog-re-search-forward-quick "[(;]" nil t))
8393 (if (equal module (verilog-read-module-name)) 8926 (if (equal module (verilog-read-module-name))
@@ -8804,13 +9337,12 @@ if non-nil."
8804 9337
8805;; Combined 9338;; Combined
8806(defun verilog-decls-get-signals (decls) 9339(defun verilog-decls-get-signals (decls)
9340 "Return all declared signals, excluding 'assign' statements."
8807 (append 9341 (append
8808 (verilog-decls-get-outputs decls) 9342 (verilog-decls-get-outputs decls)
8809 (verilog-decls-get-inouts decls) 9343 (verilog-decls-get-inouts decls)
8810 (verilog-decls-get-inputs decls) 9344 (verilog-decls-get-inputs decls)
8811 (verilog-decls-get-wires decls) 9345 (verilog-decls-get-vars decls)
8812 (verilog-decls-get-regs decls)
8813 (verilog-decls-get-assigns decls)
8814 (verilog-decls-get-consts decls) 9346 (verilog-decls-get-consts decls)
8815 (verilog-decls-get-gparams decls))) 9347 (verilog-decls-get-gparams decls)))
8816 9348
@@ -8826,10 +9358,8 @@ if non-nil."
8826 (verilog-modi-cache-add modi 'verilog-read-decls 1 sig-list)) 9358 (verilog-modi-cache-add modi 'verilog-read-decls 1 sig-list))
8827(defsubst verilog-modi-cache-add-inputs (modi sig-list) 9359(defsubst verilog-modi-cache-add-inputs (modi sig-list)
8828 (verilog-modi-cache-add modi 'verilog-read-decls 2 sig-list)) 9360 (verilog-modi-cache-add modi 'verilog-read-decls 2 sig-list))
8829(defsubst verilog-modi-cache-add-wires (modi sig-list) 9361(defsubst verilog-modi-cache-add-vars (modi sig-list)
8830 (verilog-modi-cache-add modi 'verilog-read-decls 3 sig-list)) 9362 (verilog-modi-cache-add modi 'verilog-read-decls 3 sig-list))
8831(defsubst verilog-modi-cache-add-regs (modi sig-list)
8832 (verilog-modi-cache-add modi 'verilog-read-decls 4 sig-list))
8833 9363
8834(defun verilog-signals-from-signame (signame-list) 9364(defun verilog-signals-from-signame (signame-list)
8835 "Return signals in standard form from SIGNAME-LIST, a simple list of signal names." 9365 "Return signals in standard form from SIGNAME-LIST, a simple list of signal names."
@@ -8843,7 +9373,7 @@ if non-nil."
8843(defun verilog-auto-re-search-do (search-for func) 9373(defun verilog-auto-re-search-do (search-for func)
8844 "Search for the given auto text regexp SEARCH-FOR, and perform FUNC where it occurs." 9374 "Search for the given auto text regexp SEARCH-FOR, and perform FUNC where it occurs."
8845 (goto-char (point-min)) 9375 (goto-char (point-min))
8846 (while (verilog-re-search-forward search-for nil t) 9376 (while (verilog-re-search-forward-quick search-for nil t)
8847 (funcall func))) 9377 (funcall func)))
8848 9378
8849(defun verilog-insert-one-definition (sig type indent-pt) 9379(defun verilog-insert-one-definition (sig type indent-pt)
@@ -8867,10 +9397,31 @@ with appropriate INDENT-PT indentation."
8867 (when (verilog-sig-memory sig) 9397 (when (verilog-sig-memory sig)
8868 (insert " " (verilog-sig-memory sig)))) 9398 (insert " " (verilog-sig-memory sig))))
8869 9399
8870(defun verilog-insert-definition (sigs direction indent-pt v2k &optional dont-sort) 9400(defun verilog-insert-definition (modi sigs direction indent-pt v2k &optional dont-sort)
8871 "Print out a definition for a list of SIGS of the given DIRECTION, 9401 "Print out a definition for MODI's list of SIGS of the given DIRECTION,
8872with appropriate INDENT-PT indentation. If V2K, use Verilog 2001 I/O 9402with appropriate INDENT-PT indentation. If V2K, use Verilog 2001 I/O
8873format. Sort unless DONT-SORT. DIRECTION is normally wire/reg/output." 9403format. Sort unless DONT-SORT. DIRECTION is normally wire/reg/output.
9404When MODI is non-null, also add to modi-cache, for tracking."
9405 (when modi
9406 (cond ((equal direction "wire")
9407 (verilog-modi-cache-add-vars modi sigs))
9408 ((equal direction "reg")
9409 (verilog-modi-cache-add-vars modi sigs))
9410 ((equal direction "output")
9411 (verilog-modi-cache-add-outputs modi sigs)
9412 (when verilog-auto-declare-nettype
9413 (verilog-modi-cache-add-vars modi sigs)))
9414 ((equal direction "input")
9415 (verilog-modi-cache-add-inputs modi sigs)
9416 (when verilog-auto-declare-nettype
9417 (verilog-modi-cache-add-vars modi sigs)))
9418 ((equal direction "inout")
9419 (verilog-modi-cache-add-inouts modi sigs)
9420 (when verilog-auto-declare-nettype
9421 (verilog-modi-cache-add-vars modi sigs)))
9422 ((equal direction "interface"))
9423 (t
9424 (error "Unsupported verilog-insert-definition direction: %s" direction))))
8874 (or dont-sort 9425 (or dont-sort
8875 (setq sigs (sort (copy-alist sigs) `verilog-signals-sort-compare))) 9426 (setq sigs (sort (copy-alist sigs) `verilog-signals-sort-compare)))
8876 (while sigs 9427 (while sigs
@@ -8878,12 +9429,18 @@ format. Sort unless DONT-SORT. DIRECTION is normally wire/reg/output."
8878 (verilog-insert-one-definition 9429 (verilog-insert-one-definition
8879 sig 9430 sig
8880 ;; Want "type x" or "output type x", not "wire type x" 9431 ;; Want "type x" or "output type x", not "wire type x"
8881 (cond ((verilog-sig-type sig) 9432 (cond ((or (verilog-sig-type sig)
9433 verilog-auto-wire-type)
8882 (concat 9434 (concat
8883 (if (not (member direction '("wire" "interface"))) 9435 (when (member direction '("input" "output" "inout"))
8884 (concat direction " ")) 9436 (concat direction " "))
8885 (verilog-sig-type sig))) 9437 (or (verilog-sig-type sig)
8886 (t direction)) 9438 verilog-auto-wire-type)))
9439 ((and verilog-auto-declare-nettype
9440 (member direction '("input" "output" "inout")))
9441 (concat direction " " verilog-auto-declare-nettype))
9442 (t
9443 direction))
8887 indent-pt) 9444 indent-pt)
8888 (insert (if v2k "," ";")) 9445 (insert (if v2k "," ";"))
8889 (if (or (not (verilog-sig-comment sig)) 9446 (if (or (not (verilog-sig-comment sig))
@@ -8914,7 +9471,7 @@ Presumes that any newlines end a list element."
8914 ;; We can't just search backward for ) as it might be inside another expression. 9471 ;; We can't just search backward for ) as it might be inside another expression.
8915 ;; Also want "`ifdef X input foo `endif" to just leave things to the human to deal with 9472 ;; Also want "`ifdef X input foo `endif" to just leave things to the human to deal with
8916 (save-excursion 9473 (save-excursion
8917 (verilog-backward-syntactic-ws) 9474 (verilog-backward-syntactic-ws-quick)
8918 (when (and (not (save-excursion ;; Not beginning (, or existing , 9475 (when (and (not (save-excursion ;; Not beginning (, or existing ,
8919 (backward-char 1) 9476 (backward-char 1)
8920 (looking-at "[(,]"))) 9477 (looking-at "[(,]")))
@@ -8931,7 +9488,7 @@ This repairs those mis-inserted by a AUTOARG."
8931 (save-excursion 9488 (save-excursion
8932 (verilog-forward-close-paren) 9489 (verilog-forward-close-paren)
8933 (backward-char 1) 9490 (backward-char 1)
8934 (verilog-backward-syntactic-ws) 9491 (verilog-backward-syntactic-ws-quick)
8935 (backward-char 1) 9492 (backward-char 1)
8936 (when (looking-at ",") 9493 (when (looking-at ",")
8937 (delete-char 1)))) 9494 (delete-char 1))))
@@ -8978,27 +9535,68 @@ This repairs those mis-inserted by a AUTOARG."
8978 (t nil))))) 9535 (t nil)))))
8979;;(verilog-make-width-expression "`A:`B") 9536;;(verilog-make-width-expression "`A:`B")
8980 9537
8981(defun verilog-simplify-range-expression (range-exp) 9538(defun verilog-simplify-range-expression (expr)
8982 "Return a simplified range expression with constants eliminated from RANGE-EXP." 9539 "Return a simplified range expression with constants eliminated from EXPR."
8983 (let ((out range-exp) 9540 ;; Note this is always called with brackets; ie [z] or [z:z]
8984 (last-pass "")) 9541 (if (not (string-match "[---+*()]" expr))
8985 (while (not (equal last-pass out)) 9542 expr ;; short-circuit
8986 (setq last-pass out) 9543 (let ((out expr)
8987 (while (string-match "(\\<\\([0-9A-Z-az_]+\\)\\>)" out) 9544 (last-pass ""))
8988 (setq out (replace-match "\\1" nil nil out))) 9545 (while (not (equal last-pass out))
8989 (while (string-match "\\<\\([0-9]+\\)\\>\\s *\\+\\s *\\<\\([0-9]+\\)\\>" out) 9546 (setq last-pass out)
8990 (setq out (replace-match 9547 ;; Prefix regexp needs beginning of match, or some symbol of
8991 (int-to-string (+ (string-to-number (match-string 1 out)) 9548 ;; lesser or equal precedence. We assume the [:]'s exist in expr.
8992 (string-to-number (match-string 2 out)))) 9549 ;; Ditto the end.
8993 nil nil out))) 9550 (while (string-match
8994 (while (string-match "\\<\\([0-9]+\\)\\>\\s *\\-\\s *\\<\\([0-9]+\\)\\>" out) 9551 (concat "\\([[({:*+-]\\)" ; - must be last
8995 (setq out (replace-match 9552 "(\\<\\([0-9A-Za-z_]+\\))"
8996 (int-to-string (- (string-to-number (match-string 1 out)) 9553 "\\([])}:*+-]\\)")
8997 (string-to-number (match-string 2 out)))) 9554 out)
8998 nil nil out)))) 9555 (setq out (replace-match "\\1\\2\\3" nil nil out)))
8999 out)) 9556 ;; For precedence do * before +/-
9000;;(verilog-simplify-range-expression "1") 9557 (while (string-match
9001;;(verilog-simplify-range-expression "(((16)+1)-3)") 9558 (concat "\\([[({:*+-]\\)"
9559 "\\([0-9]+\\)\\s *\\([*]\\)\\s *\\([0-9]+\\)"
9560 "\\([])}:*+-]\\)")
9561 out)
9562 (setq out (replace-match
9563 (concat (match-string 1 out)
9564 (int-to-string (* (string-to-number (match-string 2 out))
9565 (string-to-number (match-string 4 out))))
9566 (match-string 5 out))
9567 nil nil out)))
9568 (while (string-match
9569 (concat "\\([[({:+-]\\)" ; No * here as higher prec
9570 "\\([0-9]+\\)\\s *\\([---+]\\)\\s *\\([0-9]+\\)"
9571 "\\([])}:+-]\\)")
9572 out)
9573 (let ((pre (match-string 1 out))
9574 (lhs (string-to-number (match-string 2 out)))
9575 (rhs (string-to-number (match-string 4 out)))
9576 (post (match-string 5 out))
9577 val)
9578 (when (equal pre "-")
9579 (setq lhs (- lhs)))
9580 (setq val (if (equal (match-string 3 out) "-")
9581 (- lhs rhs)
9582 (+ lhs rhs))
9583 out (replace-match
9584 (concat (if (and (equal pre "-")
9585 (< val 0))
9586 "" ;; Not "--20" but just "-20"
9587 pre)
9588 (int-to-string val)
9589 post)
9590 nil nil out)) )))
9591 out)))
9592;;(verilog-simplify-range-expression "[1:3]") ;; 1
9593;;(verilog-simplify-range-expression "[(1):3]") ;; 1
9594;;(verilog-simplify-range-expression "[(((16)+1)+1+(1+1))]") ;;20
9595;;(verilog-simplify-range-expression "[(2*3+6*7)]") ;; 48
9596;;(verilog-simplify-range-expression "[(FOO*4-1*2)]") ;; FOO*4-2
9597;;(verilog-simplify-range-expression "[(FOO*4+1-1)]") ;; FOO*4+0
9598;;(verilog-simplify-range-expression "[(func(BAR))]") ;; func(BAR)
9599;;(verilog-simplify-range-expression "[FOO-1+1-1+1]") ;; FOO-0
9002 9600
9003(defun verilog-typedef-name-p (variable-name) 9601(defun verilog-typedef-name-p (variable-name)
9004 "Return true if the VARIABLE-NAME is a type definition." 9602 "Return true if the VARIABLE-NAME is a type definition."
@@ -9011,15 +9609,17 @@ This repairs those mis-inserted by a AUTOARG."
9011 9609
9012(defun verilog-delete-autos-lined () 9610(defun verilog-delete-autos-lined ()
9013 "Delete autos that occupy multiple lines, between begin and end comments." 9611 "Delete autos that occupy multiple lines, between begin and end comments."
9612 ;; The newline must not have a comment property, so we must
9613 ;; delete the end auto's newline, not the first newline
9614 (forward-line 1)
9014 (let ((pt (point))) 9615 (let ((pt (point)))
9015 (forward-line 1)
9016 (when (and 9616 (when (and
9017 (looking-at "\\s-*// Beginning") 9617 (looking-at "\\s-*// Beginning")
9018 (search-forward "// End of automatic" nil t)) 9618 (search-forward "// End of automatic" nil t))
9019 ;; End exists 9619 ;; End exists
9020 (end-of-line) 9620 (end-of-line)
9021 (delete-region pt (point)) 9621 (forward-line 1)
9022 (forward-line 1)))) 9622 (delete-region pt (point)))))
9023 9623
9024(defun verilog-delete-empty-auto-pair () 9624(defun verilog-delete-empty-auto-pair ()
9025 "Delete begin/end auto pair at point, if empty." 9625 "Delete begin/end auto pair at point, if empty."
@@ -9066,11 +9666,11 @@ Ignore other open bracket with matching close bracket."
9066 9666
9067(defun verilog-delete-to-paren () 9667(defun verilog-delete-to-paren ()
9068 "Delete the automatic inst/sense/arg created by autos. 9668 "Delete the automatic inst/sense/arg created by autos.
9069Deletion stops at the matching end parenthesis." 9669Deletion stops at the matching end parenthesis, outside comments."
9070 (delete-region (point) 9670 (delete-region (point)
9071 (save-excursion 9671 (save-excursion
9072 (verilog-backward-open-paren) 9672 (verilog-backward-open-paren)
9073 (forward-sexp 1) ;; Moves to paren that closes argdecl's 9673 (verilog-forward-sexp-ign-cmt 1) ;; Moves to paren that closes argdecl's
9074 (backward-char 1) 9674 (backward-char 1)
9075 (point)))) 9675 (point))))
9076 9676
@@ -9078,7 +9678,8 @@ Deletion stops at the matching end parenthesis."
9078 "Return if a .* AUTOINST is safe to delete or expand. 9678 "Return if a .* AUTOINST is safe to delete or expand.
9079It was created by the AUTOS themselves, or by the user." 9679It was created by the AUTOS themselves, or by the user."
9080 (and verilog-auto-star-expand 9680 (and verilog-auto-star-expand
9081 (looking-at "[ \t\n\f,]*\\([)]\\|// \\(Outputs\\|Inouts\\|Inputs\\|Interfaces\\)\\)"))) 9681 (looking-at
9682 (concat "[ \t\n\f,]*\\([)]\\|// " verilog-inst-comment-re "\\)"))))
9082 9683
9083(defun verilog-delete-auto-star-all () 9684(defun verilog-delete-auto-star-all ()
9084 "Delete a .* AUTOINST, if it is safe." 9685 "Delete a .* AUTOINST, if it is safe."
@@ -9110,7 +9711,7 @@ removed."
9110 (save-excursion 9711 (save-excursion
9111 (while (progn 9712 (while (progn
9112 (forward-line -1) 9713 (forward-line -1)
9113 (looking-at "\\s *//\\s *\\(Outputs\\|Inouts\\|Inputs\\|Interfaces\\)\n")) 9714 (looking-at (concat "\\s *//\\s *" verilog-inst-comment-re "\n")))
9114 (delete-region (match-beginning 0) (match-end 0)))) 9715 (delete-region (match-beginning 0) (match-end 0))))
9115 ;; If it is simple, we can put the ); on the same line as the last text 9716 ;; If it is simple, we can put the ); on the same line as the last text
9116 (let ((rtn-pt (point))) 9717 (let ((rtn-pt (point)))
@@ -9139,18 +9740,13 @@ called before and after this function, respectively."
9139 (verilog-save-no-change-functions 9740 (verilog-save-no-change-functions
9140 (verilog-save-scan-cache 9741 (verilog-save-scan-cache
9141 ;; Allow user to customize 9742 ;; Allow user to customize
9142 (run-hooks 'verilog-before-delete-auto-hook) 9743 (verilog-run-hooks 'verilog-before-delete-auto-hook)
9143 9744
9144 ;; Remove those that have multi-line insertions, possibly with parameters 9745 ;; Remove those that have multi-line insertions, possibly with parameters
9746 ;; We allow anything beginning with AUTO, so that users can add their own
9747 ;; patterns
9145 (verilog-auto-re-search-do 9748 (verilog-auto-re-search-do
9146 (concat "/\\*" 9749 (concat "/\\*AUTO[A-Za-z0-9_]+"
9147 (eval-when-compile
9148 (verilog-regexp-words
9149 `("AUTOASCIIENUM" "AUTOCONCATCOMMENT" "AUTODEFINEVALUE"
9150 "AUTOINOUT" "AUTOINOUTCOMP" "AUTOINOUTMODULE"
9151 "AUTOINPUT" "AUTOINSERTLISP" "AUTOOUTPUT" "AUTOOUTPUTEVERY"
9152 "AUTOREG" "AUTOREGINPUT" "AUTORESET" "AUTOTIEOFF"
9153 "AUTOUNUSED" "AUTOWIRE")))
9154 ;; Optional parens or quoted parameter or .* for (((...))) 9750 ;; Optional parens or quoted parameter or .* for (((...)))
9155 "\\(\\|([^)]*)\\|(\"[^\"]*\")\\).*?" 9751 "\\(\\|([^)]*)\\|(\"[^\"]*\")\\).*?"
9156 "\\*/") 9752 "\\*/")
@@ -9169,11 +9765,11 @@ called before and after this function, respectively."
9169 'verilog-delete-auto-star-all) 9765 'verilog-delete-auto-star-all)
9170 ;; Remove template comments ... anywhere in case was pasted after AUTOINST removed 9766 ;; Remove template comments ... anywhere in case was pasted after AUTOINST removed
9171 (goto-char (point-min)) 9767 (goto-char (point-min))
9172 (while (re-search-forward "\\s-*// \\(Templated\\|Implicit \\.\\*\\)[ \tLT0-9]*$" nil t) 9768 (while (re-search-forward "\\s-*// \\(Templated\\|Implicit \\.\\*\\)\\([ \tLT0-9]*\\| LHS: .*\\)?$" nil t)
9173 (replace-match "")) 9769 (replace-match ""))
9174 9770
9175 ;; Final customize 9771 ;; Final customize
9176 (run-hooks 'verilog-delete-auto-hook))))) 9772 (verilog-run-hooks 'verilog-delete-auto-hook)))))
9177 9773
9178;; 9774;;
9179;; Auto inject 9775;; Auto inject
@@ -9235,7 +9831,7 @@ Typing \\[verilog-inject-auto] will make this into:
9235 (when (not (re-search-forward "/\\*AUTOARG\\*/" endmodp t)) 9831 (when (not (re-search-forward "/\\*AUTOARG\\*/" endmodp t))
9236 (verilog-re-search-forward-quick ";" nil t) 9832 (verilog-re-search-forward-quick ";" nil t)
9237 (backward-char 1) 9833 (backward-char 1)
9238 (verilog-backward-syntactic-ws) 9834 (verilog-backward-syntactic-ws-quick)
9239 (backward-char 1) ; Moves to paren that closes argdecl's 9835 (backward-char 1) ; Moves to paren that closes argdecl's
9240 (when (looking-at ")") 9836 (when (looking-at ")")
9241 (verilog-insert "/*AUTOARG*/"))))))) 9837 (verilog-insert "/*AUTOARG*/")))))))
@@ -9251,9 +9847,9 @@ Typing \\[verilog-inject-auto] will make this into:
9251 pre-sigs 9847 pre-sigs
9252 got-sigs) 9848 got-sigs)
9253 (backward-char 1) 9849 (backward-char 1)
9254 (forward-sexp 1) 9850 (verilog-forward-sexp-ign-cmt 1)
9255 (backward-char 1) ;; End ) 9851 (backward-char 1) ;; End )
9256 (when (not (verilog-re-search-backward "/\\*\\(AUTOSENSE\\|AS\\)\\*/" start-pt t)) 9852 (when (not (verilog-re-search-backward-quick "/\\*\\(AUTOSENSE\\|AS\\)\\*/" start-pt t))
9257 (setq pre-sigs (verilog-signals-from-signame 9853 (setq pre-sigs (verilog-signals-from-signame
9258 (verilog-read-signals start-pt (point))) 9854 (verilog-read-signals start-pt (point)))
9259 got-sigs (verilog-auto-sense-sigs moddecls nil)) 9855 got-sigs (verilog-auto-sense-sigs moddecls nil))
@@ -9277,12 +9873,12 @@ Typing \\[verilog-inject-auto] will make this into:
9277 (forward-char 1) 9873 (forward-char 1)
9278 (let ((indent-pt (+ (current-column))) 9874 (let ((indent-pt (+ (current-column)))
9279 (end-pt (save-excursion (verilog-forward-close-paren) (point)))) 9875 (end-pt (save-excursion (verilog-forward-close-paren) (point))))
9280 (cond ((verilog-re-search-forward "\\(/\\*AUTOINST\\*/\\|\\.\\*\\)" end-pt t) 9876 (cond ((verilog-re-search-forward-quick "\\(/\\*AUTOINST\\*/\\|\\.\\*\\)" end-pt t)
9281 (goto-char end-pt)) ;; Already there, continue search with next instance 9877 (goto-char end-pt)) ;; Already there, continue search with next instance
9282 (t 9878 (t
9283 ;; Delete identical interconnect 9879 ;; Delete identical interconnect
9284 (let ((case-fold-search nil)) ;; So we don't convert upper-to-lower, etc 9880 (let ((case-fold-search nil)) ;; So we don't convert upper-to-lower, etc
9285 (while (verilog-re-search-forward "\\.\\s *\\([a-zA-Z0-9`_\$]+\\)*\\s *(\\s *\\1\\s *)\\s *" end-pt t) 9881 (while (verilog-re-search-forward-quick "\\.\\s *\\([a-zA-Z0-9`_\$]+\\)*\\s *(\\s *\\1\\s *)\\s *" end-pt t)
9286 (delete-region (match-beginning 0) (match-end 0)) 9882 (delete-region (match-beginning 0) (match-end 0))
9287 (setq end-pt (- end-pt (- (match-end 0) (match-beginning 0)))) ;; Keep it correct 9883 (setq end-pt (- end-pt (- (match-end 0) (match-beginning 0)))) ;; Keep it correct
9288 (while (or (looking-at "[ \t\n\f,]+") 9884 (while (or (looking-at "[ \t\n\f,]+")
@@ -9298,6 +9894,131 @@ Typing \\[verilog-inject-auto] will make this into:
9298 (verilog-insert-indent "/*AUTOINST*/"))))))))) 9894 (verilog-insert-indent "/*AUTOINST*/")))))))))
9299 9895
9300;; 9896;;
9897;; Auto diff
9898;;
9899
9900(defun verilog-diff-buffers-p (b1 b2 &optional whitespace)
9901 "Return nil if buffers B1 and B2 have same contents.
9902Else, return point in B1 that first mismatches.
9903If optional WHITESPACE true, ignore whitespace."
9904 (save-excursion
9905 (let* ((case-fold-search nil) ;; compare-buffer-substrings cares
9906 (p1 (with-current-buffer b1 (goto-char (point-min))))
9907 (p2 (with-current-buffer b2 (goto-char (point-min))))
9908 (maxp1 (with-current-buffer b1 (point-max)))
9909 (maxp2 (with-current-buffer b2 (point-max)))
9910 (op1 -1) (op2 -1)
9911 progress size)
9912 (while (not (and (eq p1 op1) (eq p2 op2)))
9913 ;; If both windows have whitespace optionally skip over it.
9914 (when whitespace
9915 ;; skip-syntax-* doesn't count \n
9916 (with-current-buffer b1
9917 (goto-char p1)
9918 (skip-chars-forward " \t\n\r\f\v")
9919 (setq p1 (point)))
9920 (with-current-buffer b2
9921 (goto-char p2)
9922 (skip-chars-forward " \t\n\r\f\v")
9923 (setq p2 (point))))
9924 (setq size (min (- maxp1 p1) (- maxp2 p2)))
9925 (setq progress (compare-buffer-substrings b2 p2 (+ size p2)
9926 b1 p1 (+ size p1)))
9927 (setq progress (if (zerop progress) size (1- (abs progress))))
9928 (setq op1 p1 op2 p2
9929 p1 (+ p1 progress)
9930 p2 (+ p2 progress)))
9931 ;; Return value
9932 (if (and (eq p1 maxp1) (eq p2 maxp2))
9933 nil p1))))
9934
9935(defun verilog-diff-file-with-buffer (f1 b2 &optional whitespace show)
9936 "View the differences between file F1 and buffer B2.
9937This requires the external program `diff-command' to be in your `exec-path',
9938and uses `diff-switches' in which you may want to have \"-u\" flag.
9939Ignores WHITESPACE if t, and writes output to stdout if SHOW."
9940 ;; Similar to `diff-buffer-with-file' but works on XEmacs, and doesn't
9941 ;; call `diff' as `diff' has different calling semantics on different
9942 ;; versions of Emacs.
9943 (if (not (file-exists-p f1))
9944 (message "Buffer %s has no associated file on disc" (buffer-name b2))
9945 (with-temp-buffer "*Verilog-Diff*"
9946 (let ((outbuf (current-buffer))
9947 (f2 (make-temp-file "vm-diff-auto-")))
9948 (unwind-protect
9949 (progn
9950 (with-current-buffer b2
9951 (save-restriction
9952 (widen)
9953 (write-region (point-min) (point-max) f2 nil 'nomessage)))
9954 (call-process diff-command nil outbuf t
9955 diff-switches ;; User may want -u in diff-switches
9956 (if whitespace "-b" "")
9957 f1 f2)
9958 ;; Print out results. Alternatively we could have call-processed
9959 ;; ourself, but this way we can reuse diff switches
9960 (when show
9961 (with-current-buffer outbuf (message "%s" (buffer-string))))))
9962 (sit-for 0)
9963 (when (file-exists-p f2)
9964 (delete-file f2))))))
9965
9966(defun verilog-diff-report (b1 b2 diffpt)
9967 "Report differences detected with `verilog-diff-auto'.
9968Differences are between buffers B1 and B2, starting at point
9969DIFFPT. This function is called via `verilog-diff-function'."
9970 (let ((name1 (with-current-buffer b1 (buffer-file-name))))
9971 (message "%%Warning: %s:%d: Difference in AUTO expansion found"
9972 name1 (with-current-buffer b1 (1+ (count-lines (point-min) (point)))))
9973 (cond (noninteractive
9974 (verilog-diff-file-with-buffer name1 b2 t t))
9975 (t
9976 (ediff-buffers b1 b2)))))
9977
9978(defun verilog-diff-auto ()
9979 "Expand AUTOs in a temporary buffer and indicate any changes.
9980Whitespace differences are ignored to determine identicalness, but
9981once a difference is detected, whitespace differences may be shown.
9982
9983To call this from the command line, see \\[verilog-batch-diff-auto].
9984
9985The action on differences is selected with
9986`verilog-diff-function'. The default is `verilog-diff-report'
9987which will report an error and run `ediff' in interactive mode,
9988or `diff' in batch mode."
9989 (interactive)
9990 (let ((b1 (current-buffer)) b2 diffpt
9991 (name1 (buffer-file-name))
9992 (newname "*Verilog-Diff*"))
9993 (save-excursion
9994 (when (get-buffer newname)
9995 (kill-buffer newname))
9996 (setq b2 (let (buffer-file-name) ;; Else clone is upset
9997 (clone-buffer newname)))
9998 (with-current-buffer b2
9999 ;; auto requires the filename, but can't have same filename in two
10000 ;; buffers; so override both b1 and b2's names
10001 (let ((buffer-file-name name1))
10002 (unwind-protect
10003 (progn
10004 (with-current-buffer b1 (setq buffer-file-name nil))
10005 (verilog-auto)
10006 (when (not verilog-auto-star-save)
10007 (verilog-delete-auto-star-implicit)))
10008 ;; Restore name if unwind
10009 (with-current-buffer b1 (setq buffer-file-name name1)))))
10010 ;;
10011 (setq diffpt (verilog-diff-buffers-p b1 b2 t))
10012 (cond ((not diffpt)
10013 (unless noninteractive (message "AUTO expansion identical"))
10014 (kill-buffer newname)) ;; Nice to cleanup after oneself
10015 (t
10016 (funcall verilog-diff-function b1 b2 diffpt)))
10017 ;; Return result of compare
10018 diffpt)))
10019
10020
10021;;
9301;; Auto save 10022;; Auto save
9302;; 10023;;
9303 10024
@@ -9483,14 +10204,19 @@ If PAR-VALUES replace final strings with these parameter values."
9483 (concat "\\<" (nth 0 (car check-values)) "\\>") 10204 (concat "\\<" (nth 0 (car check-values)) "\\>")
9484 (concat "(" (nth 1 (car check-values)) ")") 10205 (concat "(" (nth 1 (car check-values)) ")")
9485 t t vl-bits) 10206 t t vl-bits)
10207 vl-mbits (verilog-string-replace-matches
10208 (concat "\\<" (nth 0 (car check-values)) "\\>")
10209 (concat "(" (nth 1 (car check-values)) ")")
10210 t t vl-mbits)
9486 check-values (cdr check-values))) 10211 check-values (cdr check-values)))
9487 (setq vl-bits (verilog-simplify-range-expression vl-bits))) ; Not in the loop for speed 10212 (setq vl-bits (verilog-simplify-range-expression vl-bits)
10213 vl-mbits (verilog-simplify-range-expression vl-mbits)
10214 vl-width (verilog-make-width-expression vl-bits))) ; Not in the loop for speed
9488 ;; Default net value if not found 10215 ;; Default net value if not found
9489 (setq tpl-net (concat port 10216 (setq tpl-net (concat port
9490 (if vl-modport (concat "." vl-modport) "") 10217 (if vl-modport (concat "." vl-modport) "")
9491 (if (verilog-sig-multidim port-st) 10218 (if (verilog-sig-multidim port-st)
9492 (concat "/*" (verilog-sig-multidim-string port-st) 10219 (concat "/*" vl-mbits vl-bits "*/")
9493 vl-bits "*/")
9494 (concat vl-bits)))) 10220 (concat vl-bits))))
9495 ;; Find template 10221 ;; Find template
9496 (cond (tpl-ass ; Template of exact port name 10222 (cond (tpl-ass ; Template of exact port name
@@ -9536,20 +10262,37 @@ If PAR-VALUES replace final strings with these parameter values."
9536 (cond (tpl-ass 10262 (cond (tpl-ass
9537 (indent-to (+ (if (< verilog-auto-inst-column 48) 24 16) 10263 (indent-to (+ (if (< verilog-auto-inst-column 48) 24 16)
9538 verilog-auto-inst-column)) 10264 verilog-auto-inst-column))
9539 (if verilog-auto-inst-template-numbers 10265 ;; verilog-insert requires the complete comment in one call - including the newline
9540 (verilog-insert " // Templated" 10266 (cond ((equal verilog-auto-inst-template-numbers `lhs)
9541 " T" (int-to-string (nth 2 tpl-ass)) 10267 (verilog-insert " // Templated"
9542 " L" (int-to-string (nth 3 tpl-ass))) 10268 " LHS: " (nth 0 tpl-ass)
9543 (verilog-insert " // Templated"))) 10269 "\n"))
10270 (verilog-auto-inst-template-numbers
10271 (verilog-insert " // Templated"
10272 " T" (int-to-string (nth 2 tpl-ass))
10273 " L" (int-to-string (nth 3 tpl-ass))
10274 "\n"))
10275 (t
10276 (verilog-insert " // Templated\n"))))
9544 (for-star 10277 (for-star
9545 (indent-to (+ (if (< verilog-auto-inst-column 48) 24 16) 10278 (indent-to (+ (if (< verilog-auto-inst-column 48) 24 16)
9546 verilog-auto-inst-column)) 10279 verilog-auto-inst-column))
9547 (verilog-insert " // Implicit .\*"))) ;For some reason the . or * must be escaped... 10280 (verilog-insert " // Implicit .\*\n")) ;For some reason the . or * must be escaped...
9548 (insert "\n"))) 10281 (t
10282 (insert "\n")))))
9549;;(verilog-auto-inst-port (list "foo" "[5:0]") 10 (list (list "foo" "a@\"(% (+ @ 1) 4)\"a")) "3") 10283;;(verilog-auto-inst-port (list "foo" "[5:0]") 10 (list (list "foo" "a@\"(% (+ @ 1) 4)\"a")) "3")
9550;;(x "incom[@\"(+ (* 8 @) 7)\":@\"(* 8 @)\"]") 10284;;(x "incom[@\"(+ (* 8 @) 7)\":@\"(* 8 @)\"]")
9551;;(x ".out (outgo[@\"(concat (+ (* 8 @) 7) \\\":\\\" ( * 8 @))\"]));") 10285;;(x ".out (outgo[@\"(concat (+ (* 8 @) 7) \\\":\\\" ( * 8 @))\"]));")
9552 10286
10287(defun verilog-auto-inst-port-list (sig-list indent-pt tpl-list tpl-num for-star par-values)
10288 "For `verilog-auto-inst' print a list of ports using `verilog-auto-inst-port'."
10289 (when verilog-auto-inst-sort
10290 (setq sig-list (sort (copy-alist sig-list) `verilog-signals-sort-compare)))
10291 (mapc (lambda (port)
10292 (verilog-auto-inst-port port indent-pt
10293 tpl-list tpl-num for-star par-values))
10294 sig-list))
10295
9553(defun verilog-auto-inst-first () 10296(defun verilog-auto-inst-first ()
9554 "Insert , etc before first ever port in this instant, as part of \\[verilog-auto-inst]." 10297 "Insert , etc before first ever port in this instant, as part of \\[verilog-auto-inst]."
9555 ;; Do we need a trailing comma? 10298 ;; Do we need a trailing comma?
@@ -9558,7 +10301,7 @@ If PAR-VALUES replace final strings with these parameter values."
9558 ;; Insert first port on new line 10301 ;; Insert first port on new line
9559 (insert "\n") ;; Must insert before search, so point will move forward if insert comma 10302 (insert "\n") ;; Must insert before search, so point will move forward if insert comma
9560 (save-excursion 10303 (save-excursion
9561 (verilog-re-search-backward "[^ \t\n\f]" nil nil) 10304 (verilog-re-search-backward-quick "[^ \t\n\f]" nil nil)
9562 (when (looking-at ")\\|\\*") ;; Generally don't insert, unless we are fairly sure 10305 (when (looking-at ")\\|\\*") ;; Generally don't insert, unless we are fairly sure
9563 (forward-char 1) 10306 (forward-char 1)
9564 (insert ",")))) 10307 (insert ","))))
@@ -9592,6 +10335,9 @@ If `verilog-auto-star-expand' is set, also expand SystemVerilog .* ports,
9592and delete them before saving unless `verilog-auto-star-save' is set. 10335and delete them before saving unless `verilog-auto-star-save' is set.
9593See `verilog-auto-star' for more information. 10336See `verilog-auto-star' for more information.
9594 10337
10338The pins are printed in declaration order or alphabetically,
10339based on the `verilog-auto-inst-sort' variable.
10340
9595Limitations: 10341Limitations:
9596 Module names must be resolvable to filenames by adding a 10342 Module names must be resolvable to filenames by adding a
9597 `verilog-library-extensions', and being found in the same directory, or 10343 `verilog-library-extensions', and being found in the same directory, or
@@ -9719,6 +10465,22 @@ Templates:
9719 .NotInTemplate (NotInTemplate), 10465 .NotInTemplate (NotInTemplate),
9720 .ptl_bus (ptl_busnew[3:0]), // Templated 10466 .ptl_bus (ptl_busnew[3:0]), // Templated
9721 .... 10467 ....
10468
10469
10470Multiple Module Templates:
10471
10472 The same template lines can be applied to multiple modules with
10473 the syntax as follows:
10474
10475 /* InstModuleA AUTO_TEMPLATE
10476 InstModuleB AUTO_TEMPLATE
10477 InstModuleC AUTO_TEMPLATE
10478 InstModuleD AUTO_TEMPLATE (
10479 .ptl_bus (ptl_busnew[]),
10480 );
10481 */
10482
10483 Note there is only one AUTO_TEMPLATE opening parenthesis.
9722 10484
9723@ Templates: 10485@ Templates:
9724 10486
@@ -9899,18 +10661,15 @@ For more information see the \\[verilog-faq] and forums at URL
9899 ;; Find submodule's signals and dump 10661 ;; Find submodule's signals and dump
9900 (let ((sig-list (and (equal (verilog-modi-get-type submodi) "interface") 10662 (let ((sig-list (and (equal (verilog-modi-get-type submodi) "interface")
9901 (verilog-signals-not-in 10663 (verilog-signals-not-in
9902 (append (verilog-decls-get-wires submoddecls) 10664 (verilog-decls-get-vars submoddecls)
9903 (verilog-decls-get-regs submoddecls))
9904 skip-pins))) 10665 skip-pins)))
9905 (vl-dir "interfaced")) 10666 (vl-dir "interfaced"))
9906 (when sig-list 10667 (when sig-list
9907 (when (not did-first) (verilog-auto-inst-first) (setq did-first t)) 10668 (when (not did-first) (verilog-auto-inst-first) (setq did-first t))
9908 ;; Note these are searched for in verilog-read-sub-decls. 10669 ;; Note these are searched for in verilog-read-sub-decls.
9909 (verilog-insert-indent "// Interfaced\n") 10670 (verilog-insert-indent "// Interfaced\n")
9910 (mapc (lambda (port) 10671 (verilog-auto-inst-port-list sig-list indent-pt
9911 (verilog-auto-inst-port port indent-pt 10672 tpl-list tpl-num for-star par-values)))
9912 tpl-list tpl-num for-star par-values))
9913 sig-list)))
9914 (let ((sig-list (verilog-signals-not-in 10673 (let ((sig-list (verilog-signals-not-in
9915 (verilog-decls-get-interfaces submoddecls) 10674 (verilog-decls-get-interfaces submoddecls)
9916 skip-pins)) 10675 skip-pins))
@@ -9919,10 +10678,8 @@ For more information see the \\[verilog-faq] and forums at URL
9919 (when (not did-first) (verilog-auto-inst-first) (setq did-first t)) 10678 (when (not did-first) (verilog-auto-inst-first) (setq did-first t))
9920 ;; Note these are searched for in verilog-read-sub-decls. 10679 ;; Note these are searched for in verilog-read-sub-decls.
9921 (verilog-insert-indent "// Interfaces\n") 10680 (verilog-insert-indent "// Interfaces\n")
9922 (mapc (lambda (port) 10681 (verilog-auto-inst-port-list sig-list indent-pt
9923 (verilog-auto-inst-port port indent-pt 10682 tpl-list tpl-num for-star par-values)))
9924 tpl-list tpl-num for-star par-values))
9925 sig-list)))
9926 (let ((sig-list (verilog-signals-not-in 10683 (let ((sig-list (verilog-signals-not-in
9927 (verilog-decls-get-outputs submoddecls) 10684 (verilog-decls-get-outputs submoddecls)
9928 skip-pins)) 10685 skip-pins))
@@ -9930,10 +10687,8 @@ For more information see the \\[verilog-faq] and forums at URL
9930 (when sig-list 10687 (when sig-list
9931 (when (not did-first) (verilog-auto-inst-first) (setq did-first t)) 10688 (when (not did-first) (verilog-auto-inst-first) (setq did-first t))
9932 (verilog-insert-indent "// Outputs\n") 10689 (verilog-insert-indent "// Outputs\n")
9933 (mapc (lambda (port) 10690 (verilog-auto-inst-port-list sig-list indent-pt
9934 (verilog-auto-inst-port port indent-pt 10691 tpl-list tpl-num for-star par-values)))
9935 tpl-list tpl-num for-star par-values))
9936 sig-list)))
9937 (let ((sig-list (verilog-signals-not-in 10692 (let ((sig-list (verilog-signals-not-in
9938 (verilog-decls-get-inouts submoddecls) 10693 (verilog-decls-get-inouts submoddecls)
9939 skip-pins)) 10694 skip-pins))
@@ -9941,10 +10696,8 @@ For more information see the \\[verilog-faq] and forums at URL
9941 (when sig-list 10696 (when sig-list
9942 (when (not did-first) (verilog-auto-inst-first) (setq did-first t)) 10697 (when (not did-first) (verilog-auto-inst-first) (setq did-first t))
9943 (verilog-insert-indent "// Inouts\n") 10698 (verilog-insert-indent "// Inouts\n")
9944 (mapc (lambda (port) 10699 (verilog-auto-inst-port-list sig-list indent-pt
9945 (verilog-auto-inst-port port indent-pt 10700 tpl-list tpl-num for-star par-values)))
9946 tpl-list tpl-num for-star par-values))
9947 sig-list)))
9948 (let ((sig-list (verilog-signals-not-in 10701 (let ((sig-list (verilog-signals-not-in
9949 (verilog-decls-get-inputs submoddecls) 10702 (verilog-decls-get-inputs submoddecls)
9950 skip-pins)) 10703 skip-pins))
@@ -9952,10 +10705,8 @@ For more information see the \\[verilog-faq] and forums at URL
9952 (when sig-list 10705 (when sig-list
9953 (when (not did-first) (verilog-auto-inst-first) (setq did-first t)) 10706 (when (not did-first) (verilog-auto-inst-first) (setq did-first t))
9954 (verilog-insert-indent "// Inputs\n") 10707 (verilog-insert-indent "// Inputs\n")
9955 (mapc (lambda (port) 10708 (verilog-auto-inst-port-list sig-list indent-pt
9956 (verilog-auto-inst-port port indent-pt 10709 tpl-list tpl-num for-star par-values)))
9957 tpl-list tpl-num for-star par-values))
9958 sig-list)))
9959 ;; Kill extra semi 10710 ;; Kill extra semi
9960 (save-excursion 10711 (save-excursion
9961 (cond (did-first 10712 (cond (did-first
@@ -10058,10 +10809,8 @@ Templates:
10058 (when (not did-first) (verilog-auto-inst-first) (setq did-first t)) 10809 (when (not did-first) (verilog-auto-inst-first) (setq did-first t))
10059 ;; Note these are searched for in verilog-read-sub-decls. 10810 ;; Note these are searched for in verilog-read-sub-decls.
10060 (verilog-insert-indent "// Parameters\n") 10811 (verilog-insert-indent "// Parameters\n")
10061 (mapc (lambda (port) 10812 (verilog-auto-inst-port-list sig-list indent-pt
10062 (verilog-auto-inst-port port indent-pt 10813 tpl-list tpl-num nil nil)))
10063 tpl-list tpl-num nil nil))
10064 sig-list)))
10065 ;; Kill extra semi 10814 ;; Kill extra semi
10066 (save-excursion 10815 (save-excursion
10067 (cond (did-first 10816 (cond (did-first
@@ -10076,7 +10825,8 @@ Templates:
10076(defun verilog-auto-reg () 10825(defun verilog-auto-reg ()
10077 "Expand AUTOREG statements, as part of \\[verilog-auto]. 10826 "Expand AUTOREG statements, as part of \\[verilog-auto].
10078Make reg statements for any output that isn't already declared, 10827Make reg statements for any output that isn't already declared,
10079and isn't a wire output from a block. 10828and isn't a wire output from a block. `verilog-auto-wire-type'
10829may be used to change the datatype of the declarations.
10080 10830
10081Limitations: 10831Limitations:
10082 This ONLY detects outputs of AUTOINSTants (see `verilog-read-sub-decls'). 10832 This ONLY detects outputs of AUTOINSTants (see `verilog-read-sub-decls').
@@ -10111,8 +10861,7 @@ Typing \\[verilog-auto] will make this into:
10111 (modsubdecls (verilog-modi-get-sub-decls modi)) 10861 (modsubdecls (verilog-modi-get-sub-decls modi))
10112 (sig-list (verilog-signals-not-in 10862 (sig-list (verilog-signals-not-in
10113 (verilog-decls-get-outputs moddecls) 10863 (verilog-decls-get-outputs moddecls)
10114 (append (verilog-decls-get-wires moddecls) 10864 (append (verilog-decls-get-vars moddecls)
10115 (verilog-decls-get-regs moddecls)
10116 (verilog-decls-get-assigns moddecls) 10865 (verilog-decls-get-assigns moddecls)
10117 (verilog-decls-get-consts moddecls) 10866 (verilog-decls-get-consts moddecls)
10118 (verilog-decls-get-gparams moddecls) 10867 (verilog-decls-get-gparams moddecls)
@@ -10122,8 +10871,7 @@ Typing \\[verilog-auto] will make this into:
10122 (forward-line 1) 10871 (forward-line 1)
10123 (when sig-list 10872 (when sig-list
10124 (verilog-insert-indent "// Beginning of automatic regs (for this module's undeclared outputs)\n") 10873 (verilog-insert-indent "// Beginning of automatic regs (for this module's undeclared outputs)\n")
10125 (verilog-insert-definition sig-list "reg" indent-pt nil) 10874 (verilog-insert-definition modi sig-list "reg" indent-pt nil)
10126 (verilog-modi-cache-add-regs modi sig-list)
10127 (verilog-insert-indent "// End of automatics\n"))))) 10875 (verilog-insert-indent "// End of automatics\n")))))
10128 10876
10129(defun verilog-auto-reg-input () 10877(defun verilog-auto-reg-input ()
@@ -10173,18 +10921,40 @@ Typing \\[verilog-auto] will make this into:
10173 (verilog-signals-not-in 10921 (verilog-signals-not-in
10174 (append (verilog-subdecls-get-inputs modsubdecls) 10922 (append (verilog-subdecls-get-inputs modsubdecls)
10175 (verilog-subdecls-get-inouts modsubdecls)) 10923 (verilog-subdecls-get-inouts modsubdecls))
10176 (verilog-decls-get-signals moddecls))))) 10924 (append (verilog-decls-get-signals moddecls)
10925 (verilog-decls-get-assigns moddecls))))))
10177 (forward-line 1) 10926 (forward-line 1)
10178 (when sig-list 10927 (when sig-list
10179 (verilog-insert-indent "// Beginning of automatic reg inputs (for undeclared instantiated-module inputs)\n") 10928 (verilog-insert-indent "// Beginning of automatic reg inputs (for undeclared instantiated-module inputs)\n")
10180 (verilog-insert-definition sig-list "reg" indent-pt nil) 10929 (verilog-insert-definition modi sig-list "reg" indent-pt nil)
10181 (verilog-modi-cache-add-regs modi sig-list)
10182 (verilog-insert-indent "// End of automatics\n"))))) 10930 (verilog-insert-indent "// End of automatics\n")))))
10183 10931
10932(defun verilog-auto-logic ()
10933 "Expand AUTOLOGIC statements, as part of \\[verilog-auto].
10934Make wire statements using the SystemVerilog logic keyword.
10935This is currently equivelent to:
10936
10937 /*AUTOWIRE*/
10938
10939with the below at the bottom of the file
10940
10941 // Local Variables:
10942 // verilog-auto-logic-type:\"logic\"
10943 // End:
10944
10945In the future AUTOLOGIC may declare additional identifiers,
10946while AUTOWIRE will not."
10947 (save-excursion
10948 (unless verilog-auto-wire-type
10949 (set (make-local-variable 'verilog-auto-wire-type)
10950 "logic"))
10951 (verilog-auto-wire)))
10952
10184(defun verilog-auto-wire () 10953(defun verilog-auto-wire ()
10185 "Expand AUTOWIRE statements, as part of \\[verilog-auto]. 10954 "Expand AUTOWIRE statements, as part of \\[verilog-auto].
10186Make wire statements for instantiations outputs that aren't 10955Make wire statements for instantiations outputs that aren't
10187already declared. 10956already declared. `verilog-auto-wire-type' may be used to change
10957the datatype of the declarations.
10188 10958
10189Limitations: 10959Limitations:
10190 This ONLY detects outputs of AUTOINSTants (see `verilog-read-sub-decls'), 10960 This ONLY detects outputs of AUTOINSTants (see `verilog-read-sub-decls'),
@@ -10240,15 +11010,13 @@ Typing \\[verilog-auto] will make this into:
10240 (forward-line 1) 11010 (forward-line 1)
10241 (when sig-list 11011 (when sig-list
10242 (verilog-insert-indent "// Beginning of automatic wires (for undeclared instantiated-module outputs)\n") 11012 (verilog-insert-indent "// Beginning of automatic wires (for undeclared instantiated-module outputs)\n")
10243 (verilog-insert-definition sig-list "wire" indent-pt nil) 11013 (verilog-insert-definition modi sig-list "wire" indent-pt nil)
10244 (verilog-modi-cache-add-wires modi sig-list)
10245 (verilog-insert-indent "// End of automatics\n") 11014 (verilog-insert-indent "// End of automatics\n")
10246 (when nil ;; Too slow on huge modules, plus makes everyone's module change 11015 ;; We used to optionally call verilog-pretty-declarations and
10247 (beginning-of-line) 11016 ;; verilog-pretty-expr here, but it's too slow on huge modules,
10248 (setq pnt (point)) 11017 ;; plus makes everyone's module change. Finally those call
10249 (verilog-pretty-declarations quiet) 11018 ;; syntax-ppss which is broken when change hooks are disabled.
10250 (goto-char pnt) 11019 ))))
10251 (verilog-pretty-expr t "//"))))))
10252 11020
10253(defun verilog-auto-output (&optional with-params) 11021(defun verilog-auto-output (&optional with-params)
10254 "Expand AUTOOUTPUT statements, as part of \\[verilog-auto]. 11022 "Expand AUTOOUTPUT statements, as part of \\[verilog-auto].
@@ -10304,7 +11072,7 @@ same expansion will result from only extracting outputs starting with ov:
10304 (let* ((indent-pt (current-indentation)) 11072 (let* ((indent-pt (current-indentation))
10305 (regexp (and with-params 11073 (regexp (and with-params
10306 (nth 0 (verilog-read-auto-params 1)))) 11074 (nth 0 (verilog-read-auto-params 1))))
10307 (v2k (verilog-in-paren)) 11075 (v2k (verilog-in-paren-quick))
10308 (modi (verilog-modi-current)) 11076 (modi (verilog-modi-current))
10309 (moddecls (verilog-modi-get-decls modi)) 11077 (moddecls (verilog-modi-get-decls modi))
10310 (modsubdecls (verilog-modi-get-sub-decls modi)) 11078 (modsubdecls (verilog-modi-get-sub-decls modi))
@@ -10323,8 +11091,7 @@ same expansion will result from only extracting outputs starting with ov:
10323 (when v2k (verilog-repair-open-comma)) 11091 (when v2k (verilog-repair-open-comma))
10324 (when sig-list 11092 (when sig-list
10325 (verilog-insert-indent "// Beginning of automatic outputs (from unused autoinst outputs)\n") 11093 (verilog-insert-indent "// Beginning of automatic outputs (from unused autoinst outputs)\n")
10326 (verilog-insert-definition sig-list "output" indent-pt v2k) 11094 (verilog-insert-definition modi sig-list "output" indent-pt v2k)
10327 (verilog-modi-cache-add-outputs modi sig-list)
10328 (verilog-insert-indent "// End of automatics\n")) 11095 (verilog-insert-indent "// End of automatics\n"))
10329 (when v2k (verilog-repair-close-comma))))) 11096 (when v2k (verilog-repair-close-comma)))))
10330 11097
@@ -10363,7 +11130,7 @@ Typing \\[verilog-auto] will make this into:
10363 (save-excursion 11130 (save-excursion
10364 ;;Point must be at insertion point 11131 ;;Point must be at insertion point
10365 (let* ((indent-pt (current-indentation)) 11132 (let* ((indent-pt (current-indentation))
10366 (v2k (verilog-in-paren)) 11133 (v2k (verilog-in-paren-quick))
10367 (modi (verilog-modi-current)) 11134 (modi (verilog-modi-current))
10368 (moddecls (verilog-modi-get-decls modi)) 11135 (moddecls (verilog-modi-get-decls modi))
10369 (sig-list (verilog-signals-combine-bus 11136 (sig-list (verilog-signals-combine-bus
@@ -10374,8 +11141,7 @@ Typing \\[verilog-auto] will make this into:
10374 (when v2k (verilog-repair-open-comma)) 11141 (when v2k (verilog-repair-open-comma))
10375 (when sig-list 11142 (when sig-list
10376 (verilog-insert-indent "// Beginning of automatic outputs (every signal)\n") 11143 (verilog-insert-indent "// Beginning of automatic outputs (every signal)\n")
10377 (verilog-insert-definition sig-list "output" indent-pt v2k) 11144 (verilog-insert-definition modi sig-list "output" indent-pt v2k)
10378 (verilog-modi-cache-add-outputs modi sig-list)
10379 (verilog-insert-indent "// End of automatics\n")) 11145 (verilog-insert-indent "// End of automatics\n"))
10380 (when v2k (verilog-repair-close-comma))))) 11146 (when v2k (verilog-repair-close-comma)))))
10381 11147
@@ -10432,7 +11198,7 @@ same expansion will result from only extracting inputs starting with i:
10432 (let* ((indent-pt (current-indentation)) 11198 (let* ((indent-pt (current-indentation))
10433 (regexp (and with-params 11199 (regexp (and with-params
10434 (nth 0 (verilog-read-auto-params 1)))) 11200 (nth 0 (verilog-read-auto-params 1))))
10435 (v2k (verilog-in-paren)) 11201 (v2k (verilog-in-paren-quick))
10436 (modi (verilog-modi-current)) 11202 (modi (verilog-modi-current))
10437 (moddecls (verilog-modi-get-decls modi)) 11203 (moddecls (verilog-modi-get-decls modi))
10438 (modsubdecls (verilog-modi-get-sub-decls modi)) 11204 (modsubdecls (verilog-modi-get-sub-decls modi))
@@ -10440,8 +11206,7 @@ same expansion will result from only extracting inputs starting with i:
10440 (verilog-subdecls-get-inputs modsubdecls) 11206 (verilog-subdecls-get-inputs modsubdecls)
10441 (append (verilog-decls-get-inputs moddecls) 11207 (append (verilog-decls-get-inputs moddecls)
10442 (verilog-decls-get-inouts moddecls) 11208 (verilog-decls-get-inouts moddecls)
10443 (verilog-decls-get-wires moddecls) 11209 (verilog-decls-get-vars moddecls)
10444 (verilog-decls-get-regs moddecls)
10445 (verilog-decls-get-consts moddecls) 11210 (verilog-decls-get-consts moddecls)
10446 (verilog-decls-get-gparams moddecls) 11211 (verilog-decls-get-gparams moddecls)
10447 (verilog-subdecls-get-interfaced modsubdecls) 11212 (verilog-subdecls-get-interfaced modsubdecls)
@@ -10456,8 +11221,7 @@ same expansion will result from only extracting inputs starting with i:
10456 (when v2k (verilog-repair-open-comma)) 11221 (when v2k (verilog-repair-open-comma))
10457 (when sig-list 11222 (when sig-list
10458 (verilog-insert-indent "// Beginning of automatic inputs (from unused autoinst inputs)\n") 11223 (verilog-insert-indent "// Beginning of automatic inputs (from unused autoinst inputs)\n")
10459 (verilog-insert-definition sig-list "input" indent-pt v2k) 11224 (verilog-insert-definition modi sig-list "input" indent-pt v2k)
10460 (verilog-modi-cache-add-inputs modi sig-list)
10461 (verilog-insert-indent "// End of automatics\n")) 11225 (verilog-insert-indent "// End of automatics\n"))
10462 (when v2k (verilog-repair-close-comma))))) 11226 (when v2k (verilog-repair-close-comma)))))
10463 11227
@@ -10514,7 +11278,7 @@ same expansion will result from only extracting inouts starting with i:
10514 (let* ((indent-pt (current-indentation)) 11278 (let* ((indent-pt (current-indentation))
10515 (regexp (and with-params 11279 (regexp (and with-params
10516 (nth 0 (verilog-read-auto-params 1)))) 11280 (nth 0 (verilog-read-auto-params 1))))
10517 (v2k (verilog-in-paren)) 11281 (v2k (verilog-in-paren-quick))
10518 (modi (verilog-modi-current)) 11282 (modi (verilog-modi-current))
10519 (moddecls (verilog-modi-get-decls modi)) 11283 (moddecls (verilog-modi-get-decls modi))
10520 (modsubdecls (verilog-modi-get-sub-decls modi)) 11284 (modsubdecls (verilog-modi-get-sub-decls modi))
@@ -10534,18 +11298,18 @@ same expansion will result from only extracting inouts starting with i:
10534 (when v2k (verilog-repair-open-comma)) 11298 (when v2k (verilog-repair-open-comma))
10535 (when sig-list 11299 (when sig-list
10536 (verilog-insert-indent "// Beginning of automatic inouts (from unused autoinst inouts)\n") 11300 (verilog-insert-indent "// Beginning of automatic inouts (from unused autoinst inouts)\n")
10537 (verilog-insert-definition sig-list "inout" indent-pt v2k) 11301 (verilog-insert-definition modi sig-list "inout" indent-pt v2k)
10538 (verilog-modi-cache-add-inouts modi sig-list)
10539 (verilog-insert-indent "// End of automatics\n")) 11302 (verilog-insert-indent "// End of automatics\n"))
10540 (when v2k (verilog-repair-close-comma))))) 11303 (when v2k (verilog-repair-close-comma)))))
10541 11304
10542(defun verilog-auto-inout-module (&optional complement) 11305(defun verilog-auto-inout-module (&optional complement all-in)
10543 "Expand AUTOINOUTMODULE statements, as part of \\[verilog-auto]. 11306 "Expand AUTOINOUTMODULE statements, as part of \\[verilog-auto].
10544Take input/output/inout statements from the specified module and insert 11307Take input/output/inout statements from the specified module and insert
10545into the current module. This is useful for making null templates and 11308into the current module. This is useful for making null templates and
10546shell modules which need to have identical I/O with another module. 11309shell modules which need to have identical I/O with another module.
10547Any I/O which are already defined in this module will not be redefined. 11310Any I/O which are already defined in this module will not be redefined.
10548For the complement of this function, see `verilog-auto-inout-comp'. 11311For the complement of this function, see `verilog-auto-inout-comp',
11312and to make monitors with all inputs, see `verilog-auto-inout-in'.
10549 11313
10550Limitations: 11314Limitations:
10551 If placed inside the parenthesis of a module declaration, it creates 11315 If placed inside the parenthesis of a module declaration, it creates
@@ -10610,22 +11374,29 @@ against the previous example's module:
10610 ;; Note this may raise an error 11374 ;; Note this may raise an error
10611 (when (setq submodi (verilog-modi-lookup submod t)) 11375 (when (setq submodi (verilog-modi-lookup submod t))
10612 (let* ((indent-pt (current-indentation)) 11376 (let* ((indent-pt (current-indentation))
10613 (v2k (verilog-in-paren)) 11377 (v2k (verilog-in-paren-quick))
10614 (modi (verilog-modi-current)) 11378 (modi (verilog-modi-current))
10615 (moddecls (verilog-modi-get-decls modi)) 11379 (moddecls (verilog-modi-get-decls modi))
10616 (submoddecls (verilog-modi-get-decls submodi)) 11380 (submoddecls (verilog-modi-get-decls submodi))
10617 (sig-list-i (verilog-signals-not-in 11381 (sig-list-i (verilog-signals-not-in
10618 (if complement 11382 (cond (all-in
10619 (verilog-decls-get-outputs submoddecls) 11383 (append
10620 (verilog-decls-get-inputs submoddecls)) 11384 (verilog-decls-get-inputs submoddecls)
11385 (verilog-decls-get-inouts submoddecls)
11386 (verilog-decls-get-outputs submoddecls)))
11387 (complement
11388 (verilog-decls-get-outputs submoddecls))
11389 (t (verilog-decls-get-inputs submoddecls)))
10621 (append (verilog-decls-get-inputs moddecls)))) 11390 (append (verilog-decls-get-inputs moddecls))))
10622 (sig-list-o (verilog-signals-not-in 11391 (sig-list-o (verilog-signals-not-in
10623 (if complement 11392 (cond (all-in nil)
10624 (verilog-decls-get-inputs submoddecls) 11393 (complement
10625 (verilog-decls-get-outputs submoddecls)) 11394 (verilog-decls-get-inputs submoddecls))
11395 (t (verilog-decls-get-outputs submoddecls)))
10626 (append (verilog-decls-get-outputs moddecls)))) 11396 (append (verilog-decls-get-outputs moddecls))))
10627 (sig-list-io (verilog-signals-not-in 11397 (sig-list-io (verilog-signals-not-in
10628 (verilog-decls-get-inouts submoddecls) 11398 (cond (all-in nil)
11399 (t (verilog-decls-get-inouts submoddecls)))
10629 (append (verilog-decls-get-inouts moddecls)))) 11400 (append (verilog-decls-get-inouts moddecls))))
10630 (sig-list-if (verilog-signals-not-in 11401 (sig-list-if (verilog-signals-not-in
10631 (verilog-decls-get-interfaces submoddecls) 11402 (verilog-decls-get-interfaces submoddecls)
@@ -10647,13 +11418,10 @@ against the previous example's module:
10647 (when (or sig-list-i sig-list-o sig-list-io) 11418 (when (or sig-list-i sig-list-o sig-list-io)
10648 (verilog-insert-indent "// Beginning of automatic in/out/inouts (from specific module)\n") 11419 (verilog-insert-indent "// Beginning of automatic in/out/inouts (from specific module)\n")
10649 ;; Don't sort them so a upper AUTOINST will match the main module 11420 ;; Don't sort them so a upper AUTOINST will match the main module
10650 (verilog-insert-definition sig-list-o "output" indent-pt v2k t) 11421 (verilog-insert-definition modi sig-list-o "output" indent-pt v2k t)
10651 (verilog-insert-definition sig-list-io "inout" indent-pt v2k t) 11422 (verilog-insert-definition modi sig-list-io "inout" indent-pt v2k t)
10652 (verilog-insert-definition sig-list-i "input" indent-pt v2k t) 11423 (verilog-insert-definition modi sig-list-i "input" indent-pt v2k t)
10653 (verilog-insert-definition sig-list-if "interface" indent-pt v2k t) 11424 (verilog-insert-definition modi sig-list-if "interface" indent-pt v2k t)
10654 (verilog-modi-cache-add-inputs modi sig-list-i)
10655 (verilog-modi-cache-add-outputs modi sig-list-o)
10656 (verilog-modi-cache-add-inouts modi sig-list-io)
10657 (verilog-insert-indent "// End of automatics\n")) 11425 (verilog-insert-indent "// End of automatics\n"))
10658 (when v2k (verilog-repair-close-comma))))))) 11426 (when v2k (verilog-repair-close-comma)))))))
10659 11427
@@ -10707,7 +11475,58 @@ signals matching the regular expression will be included. For example the
10707same expansion will result from only extracting signals starting with i: 11475same expansion will result from only extracting signals starting with i:
10708 11476
10709 /*AUTOINOUTCOMP(\"ExampMain\",\"^i\")*/" 11477 /*AUTOINOUTCOMP(\"ExampMain\",\"^i\")*/"
10710 (verilog-auto-inout-module t)) 11478 (verilog-auto-inout-module t nil))
11479
11480(defun verilog-auto-inout-in ()
11481 "Expand AUTOINOUTIN statements, as part of \\[verilog-auto].
11482Take input/output/inout statements from the specified module and
11483insert them as all inputs into the current module. This is
11484useful for making monitor modules which need to see all signals
11485as inputs based on another module. Any I/O which are already
11486defined in this module will not be redefined. See also
11487`verilog-auto-inout-module'.
11488
11489Limitations:
11490 If placed inside the parenthesis of a module declaration, it creates
11491 Verilog 2001 style, else uses Verilog 1995 style.
11492
11493 Concatenation and outputting partial busses is not supported.
11494
11495 Module names must be resolvable to filenames. See `verilog-auto-inst'.
11496
11497 Signals are not inserted in the same order as in the original module,
11498 though they will appear to be in the same order to a AUTOINST
11499 instantiating either module.
11500
11501An example:
11502
11503 module ExampShell (/*AUTOARG*/);
11504 /*AUTOINOUTIN(\"ExampMain\")*/
11505 endmodule
11506
11507 module ExampMain (i,o,io);
11508 input i;
11509 output o;
11510 inout io;
11511 endmodule
11512
11513Typing \\[verilog-auto] will make this into:
11514
11515 module ExampShell (/*AUTOARG*/i,o,io);
11516 /*AUTOINOUTIN(\"ExampMain\")*/
11517 // Beginning of automatic in/out/inouts (from specific module)
11518 input i;
11519 input io;
11520 input o;
11521 // End of automatics
11522 endmodule
11523
11524You may also provide an optional regular expression, in which case only
11525signals matching the regular expression will be included. For example the
11526same expansion will result from only extracting signals starting with i:
11527
11528 /*AUTOINOUTCOMP(\"ExampMain\",\"^i\")*/"
11529 (verilog-auto-inout-module nil t))
10711 11530
10712(defun verilog-auto-insert-lisp () 11531(defun verilog-auto-insert-lisp ()
10713 "Expand AUTOINSERTLISP statements, as part of \\[verilog-auto]. 11532 "Expand AUTOINSERTLISP statements, as part of \\[verilog-auto].
@@ -10756,7 +11575,7 @@ text:
10756 (forward-char) 11575 (forward-char)
10757 (point))) ;; Closing paren 11576 (point))) ;; Closing paren
10758 (cmd-beg-pt (save-excursion (goto-char cmd-end-pt) 11577 (cmd-beg-pt (save-excursion (goto-char cmd-end-pt)
10759 (backward-sexp 1) 11578 (backward-sexp 1) ;; Inside comment
10760 (point))) ;; Beginning paren 11579 (point))) ;; Beginning paren
10761 (cmd (buffer-substring-no-properties cmd-beg-pt cmd-end-pt))) 11580 (cmd (buffer-substring-no-properties cmd-beg-pt cmd-end-pt)))
10762 (forward-line 1) 11581 (forward-line 1)
@@ -10776,7 +11595,9 @@ text:
10776 (sig-list (verilog-signals-not-params 11595 (sig-list (verilog-signals-not-params
10777 (verilog-signals-not-in (verilog-alw-get-inputs sigss) 11596 (verilog-signals-not-in (verilog-alw-get-inputs sigss)
10778 (append (and (not verilog-auto-sense-include-inputs) 11597 (append (and (not verilog-auto-sense-include-inputs)
10779 (verilog-alw-get-outputs sigss)) 11598 (verilog-alw-get-outputs-delayed sigss))
11599 (and (not verilog-auto-sense-include-inputs)
11600 (verilog-alw-get-outputs-immediate sigss))
10780 (verilog-alw-get-temps sigss) 11601 (verilog-alw-get-temps sigss)
10781 (verilog-decls-get-consts moddecls) 11602 (verilog-decls-get-consts moddecls)
10782 (verilog-decls-get-gparams moddecls) 11603 (verilog-decls-get-gparams moddecls)
@@ -10840,7 +11661,7 @@ operator. (This was added to the language in part due to AUTOSENSE!)
10840 (save-excursion 11661 (save-excursion
10841 ;; Find beginning 11662 ;; Find beginning
10842 (let* ((start-pt (save-excursion 11663 (let* ((start-pt (save-excursion
10843 (verilog-re-search-backward "(" nil t) 11664 (verilog-re-search-backward-quick "(" nil t)
10844 (point))) 11665 (point)))
10845 (indent-pt (save-excursion 11666 (indent-pt (save-excursion
10846 (or (and (goto-char start-pt) (1+ (current-column))) 11667 (or (and (goto-char start-pt) (1+ (current-column)))
@@ -10848,9 +11669,7 @@ operator. (This was added to the language in part due to AUTOSENSE!)
10848 (modi (verilog-modi-current)) 11669 (modi (verilog-modi-current))
10849 (moddecls (verilog-modi-get-decls modi)) 11670 (moddecls (verilog-modi-get-decls modi))
10850 (sig-memories (verilog-signals-memory 11671 (sig-memories (verilog-signals-memory
10851 (append 11672 (verilog-decls-get-vars moddecls)))
10852 (verilog-decls-get-regs moddecls)
10853 (verilog-decls-get-wires moddecls))))
10854 sig-list not-first presense-sigs) 11673 sig-list not-first presense-sigs)
10855 ;; Read signals in always, eliminate outputs from sense list 11674 ;; Read signals in always, eliminate outputs from sense list
10856 (setq presense-sigs (verilog-signals-from-signame 11675 (setq presense-sigs (verilog-signals-from-signame
@@ -10863,11 +11682,11 @@ operator. (This was added to the language in part due to AUTOSENSE!)
10863 (if (not (eq tlen (length sig-list))) (verilog-insert " /*memory or*/ ")))) 11682 (if (not (eq tlen (length sig-list))) (verilog-insert " /*memory or*/ "))))
10864 (if (and presense-sigs ;; Add a "or" if not "(.... or /*AUTOSENSE*/" 11683 (if (and presense-sigs ;; Add a "or" if not "(.... or /*AUTOSENSE*/"
10865 (save-excursion (goto-char (point)) 11684 (save-excursion (goto-char (point))
10866 (verilog-re-search-backward "[a-zA-Z0-9$_.%`]+" start-pt t) 11685 (verilog-re-search-backward-quick "[a-zA-Z0-9$_.%`]+" start-pt t)
10867 (verilog-re-search-backward "\\s-" start-pt t) 11686 (verilog-re-search-backward-quick "\\s-" start-pt t)
10868 (while (looking-at "\\s-`endif") 11687 (while (looking-at "\\s-`endif")
10869 (verilog-re-search-backward "[a-zA-Z0-9$_.%`]+" start-pt t) 11688 (verilog-re-search-backward-quick "[a-zA-Z0-9$_.%`]+" start-pt t)
10870 (verilog-re-search-backward "\\s-" start-pt t)) 11689 (verilog-re-search-backward-quick "\\s-" start-pt t))
10871 (not (looking-at "\\s-or\\b")))) 11690 (not (looking-at "\\s-or\\b"))))
10872 (setq not-first t)) 11691 (setq not-first t))
10873 (setq sig-list (sort sig-list `verilog-signals-sort-compare)) 11692 (setq sig-list (sort sig-list `verilog-signals-sort-compare))
@@ -10889,9 +11708,13 @@ registers set elsewhere in the always block.
10889Limitations: 11708Limitations:
10890 AUTORESET will not clear memories. 11709 AUTORESET will not clear memories.
10891 11710
10892 AUTORESET uses <= if there are any <= assignments in the block, 11711 AUTORESET uses <= if the signal has a <= assignment in the block,
10893 else it uses =. 11712 else it uses =.
10894 11713
11714 If <= is used, all = assigned variables are ignored if
11715 `verilog-auto-reset-blocking-in-non' is nil; they are presumed
11716 to be temporaries.
11717
10895/*AUTORESET*/ presumes that any signals mentioned between the previous 11718/*AUTORESET*/ presumes that any signals mentioned between the previous
10896begin/case/if statement and the AUTORESET comment are being reset manually 11719begin/case/if statement and the AUTORESET comment are being reset manually
10897and should not be automatically reset. This includes omitting any signals 11720and should not be automatically reset. This includes omitting any signals
@@ -10927,12 +11750,12 @@ Typing \\[verilog-auto] will make this into:
10927 /*AUTORESET*/ 11750 /*AUTORESET*/
10928 // Beginning of autoreset for uninitialized flops 11751 // Beginning of autoreset for uninitialized flops
10929 a <= 0; 11752 a <= 0;
10930 b <= 0; 11753 b = 0; // if `verilog-auto-reset-blocking-in-non' true
10931 // End of automatics 11754 // End of automatics
10932 end 11755 end
10933 else begin 11756 else begin
10934 a <= in_a; 11757 a <= in_a;
10935 b <= in_b; 11758 b = in_b;
10936 c <= in_c; 11759 c <= in_c;
10937 end 11760 end
10938 end" 11761 end"
@@ -10944,22 +11767,24 @@ Typing \\[verilog-auto] will make this into:
10944 (modi (verilog-modi-current)) 11767 (modi (verilog-modi-current))
10945 (moddecls (verilog-modi-get-decls modi)) 11768 (moddecls (verilog-modi-get-decls modi))
10946 (all-list (verilog-decls-get-signals moddecls)) 11769 (all-list (verilog-decls-get-signals moddecls))
10947 sigss sig-list prereset-sigs assignment-str) 11770 sigss sig-list dly-list prereset-sigs)
10948 ;; Read signals in always, eliminate outputs from reset list 11771 ;; Read signals in always, eliminate outputs from reset list
10949 (setq prereset-sigs (verilog-signals-from-signame 11772 (setq prereset-sigs (verilog-signals-from-signame
10950 (save-excursion 11773 (save-excursion
10951 (verilog-read-signals 11774 (verilog-read-signals
10952 (save-excursion 11775 (save-excursion
10953 (verilog-re-search-backward "\\(@\\|\\<begin\\>\\|\\<if\\>\\|\\<case\\>\\)" nil t) 11776 (verilog-re-search-backward-quick "\\(@\\|\\<begin\\>\\|\\<if\\>\\|\\<case\\>\\)" nil t)
10954 (point)) 11777 (point))
10955 (point))))) 11778 (point)))))
10956 (save-excursion 11779 (save-excursion
10957 (verilog-re-search-backward "@" nil t) 11780 (verilog-re-search-backward-quick "@" nil t)
10958 (setq sigss (verilog-read-always-signals))) 11781 (setq sigss (verilog-read-always-signals)))
10959 (setq assignment-str (if (verilog-alw-get-uses-delayed sigss) 11782 (setq dly-list (verilog-alw-get-outputs-delayed sigss))
10960 (concat " <= " verilog-assignment-delay) 11783 (setq sig-list (verilog-signals-not-in (append
10961 " = ")) 11784 (verilog-alw-get-outputs-delayed sigss)
10962 (setq sig-list (verilog-signals-not-in (verilog-alw-get-outputs sigss) 11785 (when (or (not (verilog-alw-get-uses-delayed sigss))
11786 verilog-auto-reset-blocking-in-non)
11787 (verilog-alw-get-outputs-immediate sigss)))
10963 (append 11788 (append
10964 (verilog-alw-get-temps sigss) 11789 (verilog-alw-get-temps sigss)
10965 prereset-sigs))) 11790 prereset-sigs)))
@@ -10967,17 +11792,18 @@ Typing \\[verilog-auto] will make this into:
10967 (when sig-list 11792 (when sig-list
10968 (insert "\n"); 11793 (insert "\n");
10969 (verilog-insert-indent "// Beginning of autoreset for uninitialized flops\n"); 11794 (verilog-insert-indent "// Beginning of autoreset for uninitialized flops\n");
10970 (indent-to indent-pt)
10971 (while sig-list 11795 (while sig-list
10972 (let ((sig (or (assoc (verilog-sig-name (car sig-list)) all-list) ;; As sig-list has no widths 11796 (let ((sig (or (assoc (verilog-sig-name (car sig-list)) all-list) ;; As sig-list has no widths
10973 (car sig-list)))) 11797 (car sig-list))))
11798 (indent-to indent-pt)
10974 (insert (verilog-sig-name sig) 11799 (insert (verilog-sig-name sig)
10975 assignment-str 11800 (if (assoc (verilog-sig-name sig) dly-list)
11801 (concat " <= " verilog-assignment-delay)
11802 " = ")
10976 (verilog-sig-tieoff sig (not verilog-auto-reset-widths)) 11803 (verilog-sig-tieoff sig (not verilog-auto-reset-widths))
10977 ";\n") 11804 ";\n")
10978 (indent-to indent-pt)
10979 (setq sig-list (cdr sig-list)))) 11805 (setq sig-list (cdr sig-list))))
10980 (verilog-insert "// End of automatics"))))) 11806 (verilog-insert-indent "// End of automatics")))))
10981 11807
10982(defun verilog-auto-tieoff () 11808(defun verilog-auto-tieoff ()
10983 "Expand AUTOTIEOFF statements, as part of \\[verilog-auto]. 11809 "Expand AUTOTIEOFF statements, as part of \\[verilog-auto].
@@ -10996,6 +11822,9 @@ them to a one.
10996You can add signals you do not want included in AUTOTIEOFF with 11822You can add signals you do not want included in AUTOTIEOFF with
10997`verilog-auto-tieoff-ignore-regexp'. 11823`verilog-auto-tieoff-ignore-regexp'.
10998 11824
11825`verilog-auto-wire-type' may be used to change the datatype of
11826the declarations.
11827
10999An example of making a stub for another module: 11828An example of making a stub for another module:
11000 11829
11001 module ExampStub (/*AUTOINST*/); 11830 module ExampStub (/*AUTOINST*/);
@@ -11031,8 +11860,7 @@ Typing \\[verilog-auto] will make this into:
11031 (modsubdecls (verilog-modi-get-sub-decls modi)) 11860 (modsubdecls (verilog-modi-get-sub-decls modi))
11032 (sig-list (verilog-signals-not-in 11861 (sig-list (verilog-signals-not-in
11033 (verilog-decls-get-outputs moddecls) 11862 (verilog-decls-get-outputs moddecls)
11034 (append (verilog-decls-get-wires moddecls) 11863 (append (verilog-decls-get-vars moddecls)
11035 (verilog-decls-get-regs moddecls)
11036 (verilog-decls-get-assigns moddecls) 11864 (verilog-decls-get-assigns moddecls)
11037 (verilog-decls-get-consts moddecls) 11865 (verilog-decls-get-consts moddecls)
11038 (verilog-decls-get-gparams moddecls) 11866 (verilog-decls-get-gparams moddecls)
@@ -11045,10 +11873,14 @@ Typing \\[verilog-auto] will make this into:
11045 (forward-line 1) 11873 (forward-line 1)
11046 (verilog-insert-indent "// Beginning of automatic tieoffs (for this module's unterminated outputs)\n") 11874 (verilog-insert-indent "// Beginning of automatic tieoffs (for this module's unterminated outputs)\n")
11047 (setq sig-list (sort (copy-alist sig-list) `verilog-signals-sort-compare)) 11875 (setq sig-list (sort (copy-alist sig-list) `verilog-signals-sort-compare))
11048 (verilog-modi-cache-add-wires modi sig-list) ; Before we trash list 11876 (verilog-modi-cache-add-vars modi sig-list) ; Before we trash list
11049 (while sig-list 11877 (while sig-list
11050 (let ((sig (car sig-list))) 11878 (let ((sig (car sig-list)))
11051 (verilog-insert-one-definition sig "wire" indent-pt) 11879 (cond ((equal verilog-auto-tieoff-declaration "assign")
11880 (indent-to indent-pt)
11881 (insert "assign " (verilog-sig-name sig)))
11882 (t
11883 (verilog-insert-one-definition sig verilog-auto-tieoff-declaration indent-pt)))
11052 (indent-to (max 48 (+ indent-pt 40))) 11884 (indent-to (max 48 (+ indent-pt 40)))
11053 (insert "= " (verilog-sig-tieoff sig) 11885 (insert "= " (verilog-sig-tieoff sig)
11054 ";\n") 11886 ";\n")
@@ -11151,24 +11983,28 @@ comment. The comment must be between the keyword and the symbol.
11151\(Annoying, but that's what Synopsys's dc_shell FSM reader requires.) 11983\(Annoying, but that's what Synopsys's dc_shell FSM reader requires.)
11152 11984
11153Next, registers which that enum applies to are also tagged with the same 11985Next, registers which that enum applies to are also tagged with the same
11154enum. Synopsys also suggests labeling state vectors, but `verilog-mode' 11986enum.
11155doesn't care.
11156 11987
11157Finally, a AUTOASCIIENUM command is used. 11988Finally, a AUTOASCIIENUM command is used.
11158 11989
11159 The first parameter is the name of the signal to be decoded. 11990 The first parameter is the name of the signal to be decoded.
11160 If and only if the first parameter width is 2^(number of states
11161 in enum) and does NOT match the width of the enum, the signal
11162 is assumed to be a one hot decode. Otherwise, it's a normal
11163 encoded state vector.
11164 11991
11165 The second parameter is the name to store the ASCII code into. For the 11992 The second parameter is the name to store the ASCII code into. For the
11166 signal foo, I suggest the name _foo__ascii, where the leading _ indicates 11993 signal foo, I suggest the name _foo__ascii, where the leading _ indicates
11167 a signal that is just for simulation, and the magic characters _ascii 11994 a signal that is just for simulation, and the magic characters _ascii
11168 tell viewers like Dinotrace to display in ASCII format. 11995 tell viewers like Dinotrace to display in ASCII format.
11169 11996
11170 The final optional parameter is a string which will be removed from the 11997 The third optional parameter is a string which will be removed
11171 state names. 11998 from the state names. It defaults to "" which removes nothing.
11999
12000 The fourth optional parameter is \"onehot\" to force one-hot
12001 decoding. If unspecified, if and only if the first parameter
12002 width is 2^(number of states in enum) and does NOT match the
12003 width of the enum, the signal is assumed to be a one hot
12004 decode. Otherwise, it's a normal encoded state vector.
12005
12006 `verilog-auto-wire-type' may be used to change the datatype of
12007 the declarations.
11172 12008
11173An example: 12009An example:
11174 12010
@@ -11202,10 +12038,13 @@ Typing \\[verilog-auto] will make this into:
11202 end 12038 end
11203 // End of automatics" 12039 // End of automatics"
11204 (save-excursion 12040 (save-excursion
11205 (let* ((params (verilog-read-auto-params 2 3)) 12041 (let* ((params (verilog-read-auto-params 2 4))
11206 (undecode-name (nth 0 params)) 12042 (undecode-name (nth 0 params))
11207 (ascii-name (nth 1 params)) 12043 (ascii-name (nth 1 params))
11208 (elim-regexp (nth 2 params)) 12044 (elim-regexp (and (nth 2 params)
12045 (not (equal (nth 2 params) ""))
12046 (nth 2 params)))
12047 (one-hot-flag (nth 3 params))
11209 ;; 12048 ;;
11210 (indent-pt (current-indentation)) 12049 (indent-pt (current-indentation))
11211 (modi (verilog-modi-current)) 12050 (modi (verilog-modi-current))
@@ -11213,11 +12052,10 @@ Typing \\[verilog-auto] will make this into:
11213 ;; 12052 ;;
11214 (sig-list-consts (append (verilog-decls-get-consts moddecls) 12053 (sig-list-consts (append (verilog-decls-get-consts moddecls)
11215 (verilog-decls-get-gparams moddecls))) 12054 (verilog-decls-get-gparams moddecls)))
11216 (sig-list-all (append (verilog-decls-get-regs moddecls) 12055 (sig-list-all (append (verilog-decls-get-vars moddecls)
11217 (verilog-decls-get-outputs moddecls) 12056 (verilog-decls-get-outputs moddecls)
11218 (verilog-decls-get-inouts moddecls) 12057 (verilog-decls-get-inouts moddecls)
11219 (verilog-decls-get-inputs moddecls) 12058 (verilog-decls-get-inputs moddecls)))
11220 (verilog-decls-get-wires moddecls)))
11221 ;; 12059 ;;
11222 (undecode-sig (or (assoc undecode-name sig-list-all) 12060 (undecode-sig (or (assoc undecode-name sig-list-all)
11223 (error "%s: Signal %s not found in design" (verilog-point-text) undecode-name))) 12061 (error "%s: Signal %s not found in design" (verilog-point-text) undecode-name)))
@@ -11229,13 +12067,15 @@ Typing \\[verilog-auto] will make this into:
11229 (error "%s: No state definitions for %s" (verilog-point-text) undecode-enum)) 12067 (error "%s: No state definitions for %s" (verilog-point-text) undecode-enum))
11230 nil)) 12068 nil))
11231 ;; 12069 ;;
11232 (one-hot (and ;; width(enum) != width(sig) 12070 (one-hot (or
11233 (or (not (verilog-sig-bits (car enum-sigs))) 12071 (string-match "onehot" (or one-hot-flag ""))
11234 (not (equal (verilog-sig-width (car enum-sigs)) 12072 (and ;; width(enum) != width(sig)
11235 (verilog-sig-width undecode-sig)))) 12073 (or (not (verilog-sig-bits (car enum-sigs)))
11236 ;; count(enums) == width(sig) 12074 (not (equal (verilog-sig-width (car enum-sigs))
11237 (equal (number-to-string (length enum-sigs)) 12075 (verilog-sig-width undecode-sig))))
11238 (verilog-sig-width undecode-sig)))) 12076 ;; count(enums) == width(sig)
12077 (equal (number-to-string (length enum-sigs))
12078 (verilog-sig-width undecode-sig)))))
11239 (enum-chars 0) 12079 (enum-chars 0)
11240 (ascii-chars 0)) 12080 (ascii-chars 0))
11241 ;; 12081 ;;
@@ -11252,13 +12092,11 @@ Typing \\[verilog-auto] will make this into:
11252 (verilog-insert-indent "// Beginning of automatic ASCII enum decoding\n") 12092 (verilog-insert-indent "// Beginning of automatic ASCII enum decoding\n")
11253 (let ((decode-sig-list (list (list ascii-name (format "[%d:0]" (- (* ascii-chars 8) 1)) 12093 (let ((decode-sig-list (list (list ascii-name (format "[%d:0]" (- (* ascii-chars 8) 1))
11254 (concat "Decode of " undecode-name) nil nil)))) 12094 (concat "Decode of " undecode-name) nil nil))))
11255 (verilog-insert-definition decode-sig-list "reg" indent-pt nil) 12095 (verilog-insert-definition modi decode-sig-list "reg" indent-pt nil))
11256 (verilog-modi-cache-add-regs modi decode-sig-list))
11257 ;; 12096 ;;
11258 (verilog-insert-indent "always @(" undecode-name ") begin\n") 12097 (verilog-insert-indent "always @(" undecode-name ") begin\n")
11259 (setq indent-pt (+ indent-pt verilog-indent-level)) 12098 (setq indent-pt (+ indent-pt verilog-indent-level))
11260 (indent-to indent-pt) 12099 (verilog-insert-indent "case ({" undecode-name "})\n")
11261 (insert "case ({" undecode-name "})\n")
11262 (setq indent-pt (+ indent-pt verilog-case-indent)) 12100 (setq indent-pt (+ indent-pt verilog-case-indent))
11263 ;; 12101 ;;
11264 (let ((tmp-sigs enum-sigs) 12102 (let ((tmp-sigs enum-sigs)
@@ -11271,7 +12109,9 @@ Typing \\[verilog-auto] will make this into:
11271 (concat 12109 (concat
11272 (format chrfmt 12110 (format chrfmt
11273 (concat (if one-hot "(") 12111 (concat (if one-hot "(")
11274 (if one-hot (verilog-sig-width undecode-sig)) 12112 ;; Use enum-sigs length as that's numeric
12113 ;; verilog-sig-width undecode-sig might not be.
12114 (if one-hot (number-to-string (length enum-sigs)))
11275 ;; We use a shift instead of var[index] 12115 ;; We use a shift instead of var[index]
11276 ;; so that a non-one hot value will show as error. 12116 ;; so that a non-one hot value will show as error.
11277 (if one-hot "'b1<<") 12117 (if one-hot "'b1<<")
@@ -11326,6 +12166,8 @@ following the /*AUTO...*/ command.
11326 12166
11327Use \\[verilog-delete-auto] to remove the AUTOs. 12167Use \\[verilog-delete-auto] to remove the AUTOs.
11328 12168
12169Use \\[verilog-diff-auto] to see differences in AUTO expansion.
12170
11329Use \\[verilog-inject-auto] to insert AUTOs for the first time. 12171Use \\[verilog-inject-auto] to insert AUTOs for the first time.
11330 12172
11331Use \\[verilog-faq] for a pointer to frequently asked questions. 12173Use \\[verilog-faq] for a pointer to frequently asked questions.
@@ -11348,11 +12190,14 @@ Or fix indentation with:
11348Likewise, you can delete or inject AUTOs with: 12190Likewise, you can delete or inject AUTOs with:
11349 emacs --batch <filenames.v> -f verilog-batch-delete-auto 12191 emacs --batch <filenames.v> -f verilog-batch-delete-auto
11350 emacs --batch <filenames.v> -f verilog-batch-inject-auto 12192 emacs --batch <filenames.v> -f verilog-batch-inject-auto
12193Or check if AUTOs have the same expansion
12194 emacs --batch <filenames.v> -f verilog-batch-diff-auto
11351 12195
11352Using \\[describe-function], see also: 12196Using \\[describe-function], see also:
11353 `verilog-auto-arg' for AUTOARG module instantiations 12197 `verilog-auto-arg' for AUTOARG module instantiations
11354 `verilog-auto-ascii-enum' for AUTOASCIIENUM enumeration decoding 12198 `verilog-auto-ascii-enum' for AUTOASCIIENUM enumeration decoding
11355 `verilog-auto-inout-comp' for AUTOINOUTCOMP copy complemented i/o 12199 `verilog-auto-inout-comp' for AUTOINOUTCOMP copy complemented i/o
12200 `verilog-auto-inout-in' for AUTOINOUTIN inputs for all i/o
11356 `verilog-auto-inout-module' for AUTOINOUTMODULE copying i/o from elsewhere 12201 `verilog-auto-inout-module' for AUTOINOUTMODULE copying i/o from elsewhere
11357 `verilog-auto-inout' for AUTOINOUT making hierarchy inouts 12202 `verilog-auto-inout' for AUTOINOUT making hierarchy inouts
11358 `verilog-auto-input' for AUTOINPUT making hierarchy inputs 12203 `verilog-auto-input' for AUTOINPUT making hierarchy inputs
@@ -11360,6 +12205,7 @@ Using \\[describe-function], see also:
11360 `verilog-auto-inst' for AUTOINST instantiation pins 12205 `verilog-auto-inst' for AUTOINST instantiation pins
11361 `verilog-auto-star' for AUTOINST .* SystemVerilog pins 12206 `verilog-auto-star' for AUTOINST .* SystemVerilog pins
11362 `verilog-auto-inst-param' for AUTOINSTPARAM instantiation params 12207 `verilog-auto-inst-param' for AUTOINSTPARAM instantiation params
12208 `verilog-auto-logic' for AUTOLOGIC declaring logic signals
11363 `verilog-auto-output' for AUTOOUTPUT making hierarchy outputs 12209 `verilog-auto-output' for AUTOOUTPUT making hierarchy outputs
11364 `verilog-auto-output-every' for AUTOOUTPUTEVERY making all outputs 12210 `verilog-auto-output-every' for AUTOOUTPUTEVERY making all outputs
11365 `verilog-auto-reg' for AUTOREG registers 12211 `verilog-auto-reg' for AUTOREG registers
@@ -11402,10 +12248,13 @@ Wilson Snyder (wsnyder@wsnyder.org)."
11402 (verilog-save-no-change-functions 12248 (verilog-save-no-change-functions
11403 (verilog-save-scan-cache 12249 (verilog-save-scan-cache
11404 (save-excursion 12250 (save-excursion
12251 ;; Wipe cache; otherwise if we AUTOed a block above this one,
12252 ;; we'll misremember we have generated IOs, confusing AUTOOUTPUT
12253 (setq verilog-modi-cache-list nil)
11405 ;; If we're not in verilog-mode, change syntax table so parsing works right 12254 ;; If we're not in verilog-mode, change syntax table so parsing works right
11406 (unless (eq major-mode `verilog-mode) (verilog-mode)) 12255 (unless (eq major-mode `verilog-mode) (verilog-mode))
11407 ;; Allow user to customize 12256 ;; Allow user to customize
11408 (run-hooks 'verilog-before-auto-hook) 12257 (verilog-run-hooks 'verilog-before-auto-hook)
11409 ;; Try to save the user from needing to revert-file to reread file local-variables 12258 ;; Try to save the user from needing to revert-file to reread file local-variables
11410 (verilog-auto-reeval-locals) 12259 (verilog-auto-reeval-locals)
11411 (verilog-read-auto-lisp-present) 12260 (verilog-read-auto-lisp-present)
@@ -11445,6 +12294,7 @@ Wilson Snyder (wsnyder@wsnyder.org)."
11445 ;; first in/outs from other files 12294 ;; first in/outs from other files
11446 (verilog-auto-re-search-do "/\\*AUTOINOUTMODULE([^)]*)\\*/" 'verilog-auto-inout-module) 12295 (verilog-auto-re-search-do "/\\*AUTOINOUTMODULE([^)]*)\\*/" 'verilog-auto-inout-module)
11447 (verilog-auto-re-search-do "/\\*AUTOINOUTCOMP([^)]*)\\*/" 'verilog-auto-inout-comp) 12296 (verilog-auto-re-search-do "/\\*AUTOINOUTCOMP([^)]*)\\*/" 'verilog-auto-inout-comp)
12297 (verilog-auto-re-search-do "/\\*AUTOINOUTIN([^)]*)\\*/" 'verilog-auto-inout-in)
11448 ;; next in/outs which need previous sucked inputs first 12298 ;; next in/outs which need previous sucked inputs first
11449 (verilog-auto-re-search-do "/\\*AUTOOUTPUT\\((\"[^\"]*\")\\)\\*/" 12299 (verilog-auto-re-search-do "/\\*AUTOOUTPUT\\((\"[^\"]*\")\\)\\*/"
11450 (lambda () (verilog-auto-output t))) 12300 (lambda () (verilog-auto-output t)))
@@ -11458,6 +12308,7 @@ Wilson Snyder (wsnyder@wsnyder.org)."
11458 ;; Then tie off those in/outs 12308 ;; Then tie off those in/outs
11459 (verilog-auto-re-search-do "/\\*AUTOTIEOFF\\*/" 'verilog-auto-tieoff) 12309 (verilog-auto-re-search-do "/\\*AUTOTIEOFF\\*/" 'verilog-auto-tieoff)
11460 ;; Wires/regs must be after inputs/outputs 12310 ;; Wires/regs must be after inputs/outputs
12311 (verilog-auto-re-search-do "/\\*AUTOLOGIC\\*/" 'verilog-auto-logic)
11461 (verilog-auto-re-search-do "/\\*AUTOWIRE\\*/" 'verilog-auto-wire) 12312 (verilog-auto-re-search-do "/\\*AUTOWIRE\\*/" 'verilog-auto-wire)
11462 (verilog-auto-re-search-do "/\\*AUTOREG\\*/" 'verilog-auto-reg) 12313 (verilog-auto-re-search-do "/\\*AUTOREG\\*/" 'verilog-auto-reg)
11463 (verilog-auto-re-search-do "/\\*AUTOREGINPUT\\*/" 'verilog-auto-reg-input) 12314 (verilog-auto-re-search-do "/\\*AUTOREGINPUT\\*/" 'verilog-auto-reg-input)
@@ -11471,7 +12322,10 @@ Wilson Snyder (wsnyder@wsnyder.org)."
11471 (when verilog-auto-inst-template-numbers 12322 (when verilog-auto-inst-template-numbers
11472 (verilog-auto-templated-rel)))) 12323 (verilog-auto-templated-rel))))
11473 ;; 12324 ;;
11474 (run-hooks 'verilog-auto-hook) 12325 (verilog-run-hooks 'verilog-auto-hook)
12326 ;;
12327 (when verilog-auto-delete-trailing-whitespace
12328 (verilog-delete-trailing-whitespace))
11475 ;; 12329 ;;
11476 (set (make-local-variable 'verilog-auto-update-tick) (buffer-chars-modified-tick)) 12330 (set (make-local-variable 'verilog-auto-update-tick) (buffer-chars-modified-tick))
11477 ;; 12331 ;;
@@ -11502,10 +12356,12 @@ Wilson Snyder (wsnyder@wsnyder.org)."
11502 (define-key map "i" 'verilog-sk-initial) 12356 (define-key map "i" 'verilog-sk-initial)
11503 (define-key map "j" 'verilog-sk-fork) 12357 (define-key map "j" 'verilog-sk-fork)
11504 (define-key map "m" 'verilog-sk-module) 12358 (define-key map "m" 'verilog-sk-module)
12359 (define-key map "o" 'verilog-sk-ovm-class)
11505 (define-key map "p" 'verilog-sk-primitive) 12360 (define-key map "p" 'verilog-sk-primitive)
11506 (define-key map "r" 'verilog-sk-repeat) 12361 (define-key map "r" 'verilog-sk-repeat)
11507 (define-key map "s" 'verilog-sk-specify) 12362 (define-key map "s" 'verilog-sk-specify)
11508 (define-key map "t" 'verilog-sk-task) 12363 (define-key map "t" 'verilog-sk-task)
12364 (define-key map "u" 'verilog-sk-uvm-class)
11509 (define-key map "w" 'verilog-sk-while) 12365 (define-key map "w" 'verilog-sk-while)
11510 (define-key map "x" 'verilog-sk-casex) 12366 (define-key map "x" 'verilog-sk-casex)
11511 (define-key map "z" 'verilog-sk-casez) 12367 (define-key map "z" 'verilog-sk-casez)
@@ -11531,7 +12387,7 @@ Wilson Snyder (wsnyder@wsnyder.org)."
11531;; may want to consider moving the binding to another key in your .emacs 12387;; may want to consider moving the binding to another key in your .emacs
11532;; file. 12388;; file.
11533;; 12389;;
11534;(define-key verilog-mode-map "\C-ct" verilog-template-map) 12390;; Note \C-c and letter are reserved for users
11535(define-key verilog-mode-map "\C-c\C-t" verilog-template-map) 12391(define-key verilog-mode-map "\C-c\C-t" verilog-template-map)
11536 12392
11537;;; ---- statement skeletons ------------------------------------------ 12393;;; ---- statement skeletons ------------------------------------------
@@ -11571,7 +12427,7 @@ Wilson Snyder (wsnyder@wsnyder.org)."
11571 "output: " str) 12427 "output: " str)
11572 12428
11573(define-skeleton verilog-sk-prompt-msb 12429(define-skeleton verilog-sk-prompt-msb
11574 "Prompt for least significant bit specification." 12430 "Prompt for most significant bit specification."
11575 "msb:" str & ?: & '(verilog-sk-prompt-lsb) | -1 ) 12431 "msb:" str & ?: & '(verilog-sk-prompt-lsb) | -1 )
11576 12432
11577(define-skeleton verilog-sk-prompt-lsb 12433(define-skeleton verilog-sk-prompt-lsb
@@ -11616,6 +12472,38 @@ See also `verilog-header' for an alternative format."
11616 > _ \n 12472 > _ \n
11617 > (- verilog-indent-level-behavioral) "endmodule" (progn (electric-verilog-terminate-line) nil)) 12473 > (- verilog-indent-level-behavioral) "endmodule" (progn (electric-verilog-terminate-line) nil))
11618 12474
12475;;; ------------------------------------------------------------------------
12476;;; Define a default OVM class, with macros and new()
12477;;; ------------------------------------------------------------------------
12478
12479(define-skeleton verilog-sk-ovm-class
12480 "Insert a class definition"
12481 ()
12482 > "class " (setq name (skeleton-read "Name: ")) " extends " (skeleton-read "Extends: ") ";" \n
12483 > _ \n
12484 > "`ovm_object_utils_begin(" name ")" \n
12485 > (- verilog-indent-level) " `ovm_object_utils_end" \n
12486 > _ \n
12487 > "function new(name=\"" name "\");" \n
12488 > "super.new(name);" \n
12489 > (- verilog-indent-level) "endfunction" \n
12490 > _ \n
12491 > "endclass" (progn (electric-verilog-terminate-line) nil))
12492
12493(define-skeleton verilog-sk-uvm-class
12494 "Insert a class definition"
12495 ()
12496 > "class " (setq name (skeleton-read "Name: ")) " extends " (skeleton-read "Extends: ") ";" \n
12497 > _ \n
12498 > "`uvm_object_utils_begin(" name ")" \n
12499 > (- verilog-indent-level) " `uvm_object_utils_end" \n
12500 > _ \n
12501 > "function new(name=\"" name "\");" \n
12502 > "super.new(name);" \n
12503 > (- verilog-indent-level) "endfunction" \n
12504 > _ \n
12505 > "endclass" (progn (electric-verilog-terminate-line) nil))
12506
11619(define-skeleton verilog-sk-primitive 12507(define-skeleton verilog-sk-primitive
11620 "Insert a task definition." 12508 "Insert a task definition."
11621 () 12509 ()
@@ -11918,10 +12806,10 @@ Clicking on the middle-mouse button loads them in a buffer (as in dired)."
11918 ;; This scanner is syntax-fragile, so don't get bent 12806 ;; This scanner is syntax-fragile, so don't get bent
11919 (when verilog-highlight-modules 12807 (when verilog-highlight-modules
11920 (condition-case nil 12808 (condition-case nil
11921 (while (verilog-re-search-forward "\\(/\\*AUTOINST\\*/\\|\\.\\*\\)" end-point t) 12809 (while (verilog-re-search-forward-quick "\\(/\\*AUTOINST\\*/\\|\\.\\*\\)" end-point t)
11922 (save-excursion 12810 (save-excursion
11923 (goto-char (match-beginning 0)) 12811 (goto-char (match-beginning 0))
11924 (unless (verilog-inside-comment-p) 12812 (unless (verilog-inside-comment-or-string-p)
11925 (verilog-read-inst-module-matcher) ;; sets match 0 12813 (verilog-read-inst-module-matcher) ;; sets match 0
11926 (let* ((ov (make-overlay (match-beginning 0) (match-end 0)))) 12814 (let* ((ov (make-overlay (match-beginning 0) (match-end 0))))
11927 (overlay-put ov 'start-closed 't) 12815 (overlay-put ov 'start-closed 't)
diff --git a/lisp/progmodes/vhdl-mode.el b/lisp/progmodes/vhdl-mode.el
index 3a94601768d..0cf01b1228f 100644
--- a/lisp/progmodes/vhdl-mode.el
+++ b/lisp/progmodes/vhdl-mode.el
@@ -1714,7 +1714,7 @@ an absolute path (i.e. all caches can be stored in one global directory)."
1714 1714
1715 1715
1716(defgroup vhdl-menu nil 1716(defgroup vhdl-menu nil
1717 "Customizations for menues." 1717 "Customizations for menus."
1718 :group 'vhdl) 1718 :group 'vhdl)
1719 1719
1720(defcustom vhdl-index-menu nil 1720(defcustom vhdl-index-menu nil
@@ -1844,7 +1844,7 @@ NOTE: Activate the new setting in a VHDL buffer by using the menu entry
1844;; Internal variables 1844;; Internal variables
1845 1845
1846(defvar vhdl-menu-max-size 20 1846(defvar vhdl-menu-max-size 20
1847 "*Specifies the maximum size of a menu before splitting it into submenues.") 1847 "*Specifies the maximum size of a menu before splitting it into submenus.")
1848 1848
1849(defvar vhdl-progress-interval 1 1849(defvar vhdl-progress-interval 1
1850 "*Interval used to update progress status during long operations. 1850 "*Interval used to update progress status during long operations.
@@ -2468,7 +2468,7 @@ conversion."
2468 (goto-char marker)) 2468 (goto-char marker))
2469 2469
2470(defun vhdl-menu-split (list title) 2470(defun vhdl-menu-split (list title)
2471 "Split menu LIST into several submenues, if number of 2471 "Split menu LIST into several submenus, if number of
2472elements > `vhdl-menu-max-size'." 2472elements > `vhdl-menu-max-size'."
2473 (if (> (length list) vhdl-menu-max-size) 2473 (if (> (length list) vhdl-menu-max-size)
2474 (let ((remain list) 2474 (let ((remain list)
diff --git a/lisp/server.el b/lisp/server.el
index e02f63a8268..edd8f2afa93 100644
--- a/lisp/server.el
+++ b/lisp/server.el
@@ -307,11 +307,13 @@ Updates `server-clients'."
307 307
308 (setq server-clients (delq proc server-clients)) 308 (setq server-clients (delq proc server-clients))
309 309
310 ;; Delete the client's tty. 310 ;; Delete the client's tty, except on Windows (both GUI and console),
311 (let ((terminal (process-get proc 'terminal))) 311 ;; where there's only one terminal and does not make sense to delete it.
312 ;; Only delete the terminal if it is non-nil. 312 (unless (eq system-type 'windows-nt)
313 (when (and terminal (eq (terminal-live-p terminal) t)) 313 (let ((terminal (process-get proc 'terminal)))
314 (delete-terminal terminal))) 314 ;; Only delete the terminal if it is non-nil.
315 (when (and terminal (eq (terminal-live-p terminal) t))
316 (delete-terminal terminal))))
315 317
316 ;; Delete the client's process. 318 ;; Delete the client's process.
317 (if (eq (process-status proc) 'open) 319 (if (eq (process-status proc) 'open)
@@ -1035,7 +1037,11 @@ The following commands are accepted by the client:
1035 (setq tty-name (pop args-left) 1037 (setq tty-name (pop args-left)
1036 tty-type (pop args-left) 1038 tty-type (pop args-left)
1037 dontkill (or dontkill 1039 dontkill (or dontkill
1038 (not use-current-frame)))) 1040 (not use-current-frame)))
1041 ;; On Windows, emacsclient always asks for a tty frame.
1042 ;; If running a GUI server, force the frame type to GUI.
1043 (when (eq window-system 'w32)
1044 (push "-window-system" args-left)))
1039 1045
1040 ;; -position LINE[:COLUMN]: Set point to the given 1046 ;; -position LINE[:COLUMN]: Set point to the given
1041 ;; position in the next file. 1047 ;; position in the next file.
diff --git a/lisp/ses.el b/lisp/ses.el
index 6c9d0a7a50d..cceccde3346 100644
--- a/lisp/ses.el
+++ b/lisp/ses.el
@@ -2273,7 +2273,7 @@ cells."
2273 2273
2274(defun ses-read-printer (prompt default) 2274(defun ses-read-printer (prompt default)
2275 "Common code for `ses-read-cell-printer', `ses-read-column-printer', and `ses-read-default-printer'. 2275 "Common code for `ses-read-cell-printer', `ses-read-column-printer', and `ses-read-default-printer'.
2276PROMPT should end with \": \". Result is t if operation was cancelled." 2276PROMPT should end with \": \". Result is t if operation was canceled."
2277 (barf-if-buffer-read-only) 2277 (barf-if-buffer-read-only)
2278 (if (eq default t) 2278 (if (eq default t)
2279 (setq default "") 2279 (setq default "")
diff --git a/lisp/simple.el b/lisp/simple.el
index 1dc866cf64d..b718546248b 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -1582,7 +1582,7 @@ by the new completion."
1582 n) 1582 n)
1583 ;; next-matching-history-element always puts us at (point-min). 1583 ;; next-matching-history-element always puts us at (point-min).
1584 ;; Move to the position we were at before changing the buffer contents. 1584 ;; Move to the position we were at before changing the buffer contents.
1585 ;; This is still sensical, because the text before point has not changed. 1585 ;; This is still sensible, because the text before point has not changed.
1586 (goto-char point-at-start))) 1586 (goto-char point-at-start)))
1587 1587
1588(defun previous-complete-history-element (n) 1588(defun previous-complete-history-element (n)
@@ -5704,7 +5704,7 @@ At top-level, as an editor command, this simply beeps."
5704(defvar buffer-quit-function nil 5704(defvar buffer-quit-function nil
5705 "Function to call to \"quit\" the current buffer, or nil if none. 5705 "Function to call to \"quit\" the current buffer, or nil if none.
5706\\[keyboard-escape-quit] calls this function when its more local actions 5706\\[keyboard-escape-quit] calls this function when its more local actions
5707\(such as cancelling a prefix argument, minibuffer or region) do not apply.") 5707\(such as canceling a prefix argument, minibuffer or region) do not apply.")
5708 5708
5709(defun keyboard-escape-quit () 5709(defun keyboard-escape-quit ()
5710 "Exit the current \"mode\" (in a generalized sense of the word). 5710 "Exit the current \"mode\" (in a generalized sense of the word).
@@ -6209,7 +6209,7 @@ BASE-POSITION, says where to insert the completion."
6209 choice buffer base-position nil) 6209 choice buffer base-position nil)
6210 ;; This remove-text-properties should be unnecessary since `choice' 6210 ;; This remove-text-properties should be unnecessary since `choice'
6211 ;; comes from buffer-substring-no-properties. 6211 ;; comes from buffer-substring-no-properties.
6212 ;;(remove-text-properties 0 (lenth choice) '(mouse-face nil) choice) 6212 ;;(remove-text-properties 0 (length choice) '(mouse-face nil) choice)
6213 ;; Insert the completion into the buffer where it was requested. 6213 ;; Insert the completion into the buffer where it was requested.
6214 (funcall (or insert-function completion-list-insert-choice-function) 6214 (funcall (or insert-function completion-list-insert-choice-function)
6215 (or (car base-position) (point)) 6215 (or (car base-position) (point))
diff --git a/lisp/speedbar.el b/lisp/speedbar.el
index b8a734784be..3e79095e52f 100644
--- a/lisp/speedbar.el
+++ b/lisp/speedbar.el
@@ -1862,7 +1862,7 @@ of the special mode functions."
1862 (if (not v) 1862 (if (not v)
1863 (setq speedbar-special-mode-expansion-list t) 1863 (setq speedbar-special-mode-expansion-list t)
1864 ;; If it is autoloaded, we need to load it now so that 1864 ;; If it is autoloaded, we need to load it now so that
1865 ;; we have access to the varialbe -speedbar-menu-items. 1865 ;; we have access to the variable -speedbar-menu-items.
1866 ;; Is this XEmacs safe? 1866 ;; Is this XEmacs safe?
1867 (let ((sf (symbol-function v))) 1867 (let ((sf (symbol-function v)))
1868 (if (and (listp sf) (eq (car sf) 'autoload)) 1868 (if (and (listp sf) (eq (car sf) 'autoload))
diff --git a/lisp/term/x-win.el b/lisp/term/x-win.el
index 05e18ed24a0..ac0f833da63 100644
--- a/lisp/term/x-win.el
+++ b/lisp/term/x-win.el
@@ -126,7 +126,7 @@ a file in the home directory."
126 126
127(defun emacs-session-save () 127(defun emacs-session-save ()
128 "This function is called when the window system is shutting down. 128 "This function is called when the window system is shutting down.
129If this function returns non-nil, the window system shutdown is cancelled. 129If this function returns non-nil, the window system shutdown is canceled.
130 130
131When a session manager tells Emacs that the window system is shutting 131When a session manager tells Emacs that the window system is shutting
132down, this function is called. It calls the functions in the hook 132down, this function is called. It calls the functions in the hook
diff --git a/lisp/textmodes/artist.el b/lisp/textmodes/artist.el
index 0efabc2135a..bd1fcc43d22 100644
--- a/lisp/textmodes/artist.el
+++ b/lisp/textmodes/artist.el
@@ -3960,11 +3960,11 @@ The 2-point shape SHAPE is drawn from X1, Y1 to X2, Y2."
3960;; Implementation note: This really should honor the interval-fn entry 3960;; Implementation note: This really should honor the interval-fn entry
3961;; in the master table, `artist-mt', which would mean leaving a timer 3961;; in the master table, `artist-mt', which would mean leaving a timer
3962;; that calls `draw-fn' every now and then. That timer would then have 3962;; that calls `draw-fn' every now and then. That timer would then have
3963;; to be cancelled and reinstalled whenever the user moves the cursor. 3963;; to be canceled and reinstalled whenever the user moves the cursor.
3964;; This could be done, but what if the user suddenly switches to another 3964;; This could be done, but what if the user suddenly switches to another
3965;; drawing mode, or even kills the buffer! In the mouse case, it is much 3965;; drawing mode, or even kills the buffer! In the mouse case, it is much
3966;; simpler: when at the end of `artist-mouse-draw-continously', the 3966;; simpler: when at the end of `artist-mouse-draw-continously', the
3967;; user has released the button, so the timer will always be cancelled 3967;; user has released the button, so the timer will always be canceled
3968;; at that point. 3968;; at that point.
3969(defun artist-key-draw-continously (x y) 3969(defun artist-key-draw-continously (x y)
3970 "Draw current continuous shape at X,Y." 3970 "Draw current continuous shape at X,Y."
@@ -5589,7 +5589,7 @@ The event, EV, is the mouse event."
5589;; of drawing mode. 5589;; of drawing mode.
5590;; 5590;;
5591;; You should provide these functions. You might think that 5591;; You should provide these functions. You might think that
5592;; only you is using your type of mode, so noone will be able 5592;; only you is using your type of mode, so no one will be able
5593;; to switch to another operation of the same type of mode, 5593;; to switch to another operation of the same type of mode,
5594;; but someone else might base a new drawing mode upon your 5594;; but someone else might base a new drawing mode upon your
5595;; work. 5595;; work.
diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el
index d0967d63740..ba7b84fe1dd 100644
--- a/lisp/textmodes/ispell.el
+++ b/lisp/textmodes/ispell.el
@@ -2499,7 +2499,7 @@ scrolling the current window. Leave the new window selected."
2499 ;; hidden by new window, scroll it to just below new win 2499 ;; hidden by new window, scroll it to just below new win
2500 ;; otherwise set top line of other win so it doesn't scroll. 2500 ;; otherwise set top line of other win so it doesn't scroll.
2501 (if (< oldot top) (setq top oldot)) 2501 (if (< oldot top) (setq top oldot))
2502 ;; if frame is unsplitable, temporarily disable that... 2502 ;; if frame is unsplittable, temporarily disable that...
2503 (if (cdr (assq 'unsplittable (frame-parameters (selected-frame)))) 2503 (if (cdr (assq 'unsplittable (frame-parameters (selected-frame))))
2504 (let ((frame (selected-frame))) 2504 (let ((frame (selected-frame)))
2505 (modify-frame-parameters frame '((unsplittable . nil))) 2505 (modify-frame-parameters frame '((unsplittable . nil)))
@@ -3979,7 +3979,7 @@ Both should not be used to define a buffer-local dictionary."
3979; LocalWords: AMStex hspace includeonly nocite epsfig displaymath eqnarray reg 3979; LocalWords: AMStex hspace includeonly nocite epsfig displaymath eqnarray reg
3980; LocalWords: minipage modeline pers dict unhighlight buf grep sync prev inc 3980; LocalWords: minipage modeline pers dict unhighlight buf grep sync prev inc
3981; LocalWords: fn oldot NB AIX msg init read's bufs pt cmd Quinlan eg 3981; LocalWords: fn oldot NB AIX msg init read's bufs pt cmd Quinlan eg
3982; LocalWords: uuencoded unidiff sc nn VM SGML eval IspellPersDict unsplitable 3982; LocalWords: uuencoded unidiff sc nn VM SGML eval IspellPersDict
3983; LocalWords: lns XEmacs HTML casechars Multibyte 3983; LocalWords: lns XEmacs HTML casechars Multibyte
3984 3984
3985;;; ispell.el ends here 3985;;; ispell.el ends here
diff --git a/lisp/textmodes/reftex-dcr.el b/lisp/textmodes/reftex-dcr.el
index ff6ffffc382..2aecc34e2b0 100644
--- a/lisp/textmodes/reftex-dcr.el
+++ b/lisp/textmodes/reftex-dcr.el
@@ -212,7 +212,7 @@ to the functions `reftex-view-cr-cite' and `reftex-view-cr-ref'."
212 (add-hook 'pre-command-hook 'reftex-highlight-shall-die) 212 (add-hook 'pre-command-hook 'reftex-highlight-shall-die)
213 213
214 (when (eq how 'tmp-window) 214 (when (eq how 'tmp-window)
215 ;; Resize window and arrange restauration 215 ;; Resize window and arrange restoration
216 (shrink-window (1- (- (window-height) 9))) 216 (shrink-window (1- (- (window-height) 9)))
217 (recenter '(4)) 217 (recenter '(4))
218 (add-hook 'pre-command-hook 'reftex-restore-window-conf)) 218 (add-hook 'pre-command-hook 'reftex-restore-window-conf))
diff --git a/lisp/textmodes/table.el b/lisp/textmodes/table.el
index 65f6d98ef79..1a3c5c22815 100644
--- a/lisp/textmodes/table.el
+++ b/lisp/textmodes/table.el
@@ -4293,7 +4293,7 @@ cache buffer into the designated cell in the table buffer."
4293 (car (table--get-coordinate (cdr (table--horizontal-cell-list nil t)))) 4293 (car (table--get-coordinate (cdr (table--horizontal-cell-list nil t))))
4294 (1+ (cdr (table--get-coordinate (cdr (table--vertical-cell-list nil t)))))))) 4294 (1+ (cdr (table--get-coordinate (cdr (table--vertical-cell-list nil t))))))))
4295 4295
4296(defun table-call-interactively (function &optional recoard-flag keys) 4296(defun table-call-interactively (function &optional record-flag keys)
4297 "Call FUNCTION, or a table version of it if applicable. 4297 "Call FUNCTION, or a table version of it if applicable.
4298See `call-interactively' for full description of the arguments." 4298See `call-interactively' for full description of the arguments."
4299 (let ((table-func (intern-soft (format "*table--cell-%s" function)))) 4299 (let ((table-func (intern-soft (format "*table--cell-%s" function))))
@@ -4301,7 +4301,7 @@ See `call-interactively' for full description of the arguments."
4301 (if (and table-func 4301 (if (and table-func
4302 (table--point-in-cell-p)) 4302 (table--point-in-cell-p))
4303 table-func 4303 table-func
4304 function) recoard-flag keys))) 4304 function) record-flag keys)))
4305 4305
4306(defun table-funcall (function &rest arguments) 4306(defun table-funcall (function &rest arguments)
4307 "Call FUNCTION, or a table version of it if applicable. 4307 "Call FUNCTION, or a table version of it if applicable.
diff --git a/lisp/textmodes/texinfmt.el b/lisp/textmodes/texinfmt.el
index 094885bb0d0..b186b02851d 100644
--- a/lisp/textmodes/texinfmt.el
+++ b/lisp/textmodes/texinfmt.el
@@ -518,7 +518,7 @@ if large. You can use `Info-split' to do this manually."
518 518
519;;; Handle paragraph filling 519;;; Handle paragraph filling
520 520
521;; Keep as concatinated lists for ease of maintenance 521;; Keep as concatenated lists for ease of maintenance
522 522
523(defvar texinfo-no-refill-regexp 523(defvar texinfo-no-refill-regexp
524 (concat 524 (concat
@@ -2088,11 +2088,11 @@ This command is executed when texinfmt sees @item inside @multitable."
2088 (table-entry-height 0) 2088 (table-entry-height 0)
2089 ;; unformatted row looks like: A1 @tab A2 @tab A3 2089 ;; unformatted row looks like: A1 @tab A2 @tab A3
2090 ;; extract-row command deletes the source line in the table. 2090 ;; extract-row command deletes the source line in the table.
2091 (unformated-row (texinfo-multitable-extract-row))) 2091 (unformatted-row (texinfo-multitable-extract-row)))
2092 ;; Use a temporary buffer 2092 ;; Use a temporary buffer
2093 (set-buffer (get-buffer-create texinfo-multitable-buffer-name)) 2093 (set-buffer (get-buffer-create texinfo-multitable-buffer-name))
2094 (delete-region (point-min) (point-max)) 2094 (delete-region (point-min) (point-max))
2095 (insert unformated-row) 2095 (insert unformatted-row)
2096 (goto-char (point-min)) 2096 (goto-char (point-min))
2097;; 1. Check for correct number of @tab in line. 2097;; 1. Check for correct number of @tab in line.
2098 (let ((tab-number 1)) ; one @tab between two columns 2098 (let ((tab-number 1)) ; one @tab between two columns
@@ -4238,7 +4238,7 @@ the @ifeq command."
4238Must be used only with -batch, and kills Emacs on completion. 4238Must be used only with -batch, and kills Emacs on completion.
4239Each file will be processed even if an error occurred previously. 4239Each file will be processed even if an error occurred previously.
4240For example, invoke 4240For example, invoke
4241 \"emacs -batch -funcall batch-texinfo-format $docs/ ~/*.texinfo\"." 4241 \"emacs -batch -l texinfmt -f batch-texinfo-format $docs/ ~/*.texinfo\"."
4242 (if (not noninteractive) 4242 (if (not noninteractive)
4243 (error "batch-texinfo-format may only be used -batch")) 4243 (error "batch-texinfo-format may only be used -batch"))
4244 (let ((version-control t) 4244 (let ((version-control t)
diff --git a/lisp/time.el b/lisp/time.el
index ac4a011bdf8..4955b177545 100644
--- a/lisp/time.el
+++ b/lisp/time.el
@@ -369,7 +369,7 @@ would give mode line times like `94/12/30 21:07:48 (UTC)'."
369 nil))) 369 nil)))
370 370
371(with-no-warnings 371(with-no-warnings
372 ;; Warnings are suppresed to avoid "global/dynamic var `X' lacks a prefix". 372 ;; Warnings are suppressed to avoid "global/dynamic var `X' lacks a prefix".
373 (defvar now) 373 (defvar now)
374 (defvar time) 374 (defvar time)
375 (defvar load) 375 (defvar load)
diff --git a/lisp/url/ChangeLog b/lisp/url/ChangeLog
index 48d2caf35f4..b4cd24cc6b9 100644
--- a/lisp/url/ChangeLog
+++ b/lisp/url/ChangeLog
@@ -1673,7 +1673,7 @@
1673 (url-dav-process-DAV:activelock) 1673 (url-dav-process-DAV:activelock)
1674 (url-dav-process-DAV:lockdiscovery): Can now correctly parse 1674 (url-dav-process-DAV:lockdiscovery): Can now correctly parse
1675 DAV:lockdiscovery nodes, so that we can find out who has a 1675 DAV:lockdiscovery nodes, so that we can find out who has a
1676 resource locked and properly parse the reponse to a LOCK request. 1676 resource locked and properly parse the response to a LOCK request.
1677 (url-dav-process-DAV:status): Now parses out the numeric status 1677 (url-dav-process-DAV:status): Now parses out the numeric status
1678 from the HTTP response line. 1678 from the HTTP response line.
1679 (url-dav-process-response): New function to handle all the 1679 (url-dav-process-response): New function to handle all the
diff --git a/lisp/url/url-gw.el b/lisp/url/url-gw.el
index 7d80f2f6725..a3a384b7a90 100644
--- a/lisp/url/url-gw.el
+++ b/lisp/url/url-gw.el
@@ -72,12 +72,12 @@ This list will be executed as a command after logging in via telnet."
72 :group 'url-gateway) 72 :group 'url-gateway)
73 73
74(defcustom url-gateway-telnet-login-prompt "^\r*.?login:" 74(defcustom url-gateway-telnet-login-prompt "^\r*.?login:"
75 "Prompt that tells us we should send our username when loggin in w/telnet." 75 "Prompt that tells us we should send our username when logging in w/telnet."
76 :type 'regexp 76 :type 'regexp
77 :group 'url-gateway) 77 :group 'url-gateway)
78 78
79(defcustom url-gateway-telnet-password-prompt "^\r*.?password:" 79(defcustom url-gateway-telnet-password-prompt "^\r*.?password:"
80 "Prompt that tells us we should send our password when loggin in w/telnet." 80 "Prompt that tells us we should send our password when logging in w/telnet."
81 :type 'regexp 81 :type 'regexp
82 :group 'url-gateway) 82 :group 'url-gateway)
83 83
diff --git a/lisp/vc/ediff-init.el b/lisp/vc/ediff-init.el
index 787a8b7c0f1..d3db66a9e2a 100644
--- a/lisp/vc/ediff-init.el
+++ b/lisp/vc/ediff-init.el
@@ -370,7 +370,7 @@ It needs to be killed when we quit the session.")
370 this-command))) 370 this-command)))
371 371
372(defgroup ediff-highlighting nil 372(defgroup ediff-highlighting nil
373 "Hilighting of difference regions in Ediff." 373 "Highlighting of difference regions in Ediff."
374 :prefix "ediff-" 374 :prefix "ediff-"
375 :group 'ediff) 375 :group 'ediff)
376 376
diff --git a/lisp/vc/pcvs.el b/lisp/vc/pcvs.el
index 256719d4c84..9a8be04fc38 100644
--- a/lisp/vc/pcvs.el
+++ b/lisp/vc/pcvs.el
@@ -322,7 +322,7 @@ The argument is added (or not) to the list of FLAGS and is constructed
322by appending the branch to ARG which defaults to \"-r\". 322by appending the branch to ARG which defaults to \"-r\".
323Since the `cvs-secondary-branch-prefix' is only active if the primary 323Since the `cvs-secondary-branch-prefix' is only active if the primary
324prefix is active, it is important to read the secondary prefix before 324prefix is active, it is important to read the secondary prefix before
325the primay since reading the primary can deactivate it." 325the primary since reading the primary can deactivate it."
326 (let ((branch (and (cvs-prefix-get 'cvs-branch-prefix 'read-only) 326 (let ((branch (and (cvs-prefix-get 'cvs-branch-prefix 'read-only)
327 (cvs-prefix-get 'cvs-secondary-branch-prefix)))) 327 (cvs-prefix-get 'cvs-secondary-branch-prefix))))
328 (if branch (cons (concat (or arg "-r") branch) flags) flags))) 328 (if branch (cons (concat (or arg "-r") branch) flags) flags)))
diff --git a/lisp/vcursor.el b/lisp/vcursor.el
index d4fc35920a9..b8673f2049f 100644
--- a/lisp/vcursor.el
+++ b/lisp/vcursor.el
@@ -223,7 +223,7 @@
223;; automatically for a PC if Oemacs is detected. This set uses separate 223;; automatically for a PC if Oemacs is detected. This set uses separate
224;; control, shift and meta keys with function keys 1 to 10. In 224;; control, shift and meta keys with function keys 1 to 10. In
225;; particular, movement keys are concentrated on f5 to f8 with (in 225;; particular, movement keys are concentrated on f5 to f8 with (in
226;; increasing order of distance travelled) C-, M- and S- as prefixes. 226;; increasing order of distance traveled) C-, M- and S- as prefixes.
227;; See the actual bindings below (search for C-f1). This is because the 227;; See the actual bindings below (search for C-f1). This is because the
228;; C-S- prefix is represented by weird key sequences and the set is 228;; C-S- prefix is represented by weird key sequences and the set is
229;; incomplete; if you don't mind that, some hints are given in comments 229;; incomplete; if you don't mind that, some hints are given in comments
diff --git a/lisp/view.el b/lisp/view.el
index a5349445964..7703719ba40 100644
--- a/lisp/view.el
+++ b/lisp/view.el
@@ -481,7 +481,7 @@ Entry to view-mode runs the normal hook `view-mode-hook'."
481 ;; sets view-read-only to t as a buffer-local variable 481 ;; sets view-read-only to t as a buffer-local variable
482 ;; after exiting View mode. That arranges that the next toggle-read-only 482 ;; after exiting View mode. That arranges that the next toggle-read-only
483 ;; will reenable View mode. 483 ;; will reenable View mode.
484 ;; Cancelling View mode in any other way should cancel that, too, 484 ;; Canceling View mode in any other way should cancel that, too,
485 ;; so that View mode stays off if toggle-read-only is called. 485 ;; so that View mode stays off if toggle-read-only is called.
486 (if (local-variable-p 'view-read-only) 486 (if (local-variable-p 'view-read-only)
487 (kill-local-variable 'view-read-only)) 487 (kill-local-variable 'view-read-only))
diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el
index 8c4df9fc9cf..07eccaff4fb 100644
--- a/lisp/wid-edit.el
+++ b/lisp/wid-edit.el
@@ -295,10 +295,10 @@ minibuffer."
295 (error "Canceled")) 295 (error "Canceled"))
296 value)))) 296 value))))
297 297
298(defun widget-remove-if (predictate list) 298(defun widget-remove-if (predicate list)
299 (let (result (tail list)) 299 (let (result (tail list))
300 (while tail 300 (while tail
301 (or (funcall predictate (car tail)) 301 (or (funcall predicate (car tail))
302 (setq result (cons (car tail) result))) 302 (setq result (cons (car tail) result)))
303 (setq tail (cdr tail))) 303 (setq tail (cdr tail)))
304 (nreverse result))) 304 (nreverse result)))
@@ -577,7 +577,7 @@ This is only meaningful for radio buttons or checkboxes in a list."
577 "Map FUNCTION over the buttons in BUFFER. 577 "Map FUNCTION over the buttons in BUFFER.
578FUNCTION is called with the arguments WIDGET and MAPARG. 578FUNCTION is called with the arguments WIDGET and MAPARG.
579 579
580If FUNCTION returns non-nil, the walk is cancelled. 580If FUNCTION returns non-nil, the walk is canceled.
581 581
582The arguments MAPARG, and BUFFER default to nil and (current-buffer), 582The arguments MAPARG, and BUFFER default to nil and (current-buffer),
583respectively." 583respectively."
diff --git a/lisp/window.el b/lisp/window.el
index 69276a839bd..112caeeaf0f 100644
--- a/lisp/window.el
+++ b/lisp/window.el
@@ -1211,7 +1211,7 @@ More precisely, cycle through all windows calling the function
1211PREDICATE on each one of them with the window as its sole 1211PREDICATE on each one of them with the window as its sole
1212argument. Return the first window for which PREDICATE returns 1212argument. Return the first window for which PREDICATE returns
1213non-nil. Windows are scanned starting with the window following 1213non-nil. Windows are scanned starting with the window following
1214the selcted window. If no window satisfies PREDICATE, return 1214the selected window. If no window satisfies PREDICATE, return
1215DEFAULT. 1215DEFAULT.
1216 1216
1217MINIBUF t means include the minibuffer window even if the 1217MINIBUF t means include the minibuffer window even if the
@@ -5234,7 +5234,7 @@ WINDOW was scrolled."
5234 ;; This `condition-case' shouldn't be necessary, but who knows? 5234 ;; This `condition-case' shouldn't be necessary, but who knows?
5235 (condition-case nil 5235 (condition-case nil
5236 (if (zerop delta) 5236 (if (zerop delta)
5237 ;; Return zero if DELTA became zero in the proces. 5237 ;; Return zero if DELTA became zero in the process.
5238 0 5238 0
5239 ;; Don't try to redisplay with the cursor at the end on its 5239 ;; Don't try to redisplay with the cursor at the end on its
5240 ;; own line--that would force a scroll and spoil things. 5240 ;; own line--that would force a scroll and spoil things.