aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorCarsten Dominik2002-07-22 10:38:32 +0000
committerCarsten Dominik2002-07-22 10:38:32 +0000
commit6fbeb4293696fae4524135e41c23fd78d566eeb0 (patch)
treee8cb868ed38728598a1978e6f67b41042ed56b7e
parentb0e057bc0a65607340557686ca78d4489977455c (diff)
downloademacs-6fbeb4293696fae4524135e41c23fd78d566eeb0.tar.gz
emacs-6fbeb4293696fae4524135e41c23fd78d566eeb0.zip
Updated to reftex 4.17
-rw-r--r--lisp/ChangeLog236
-rw-r--r--lisp/textmodes/reftex-auc.el4
-rw-r--r--lisp/textmodes/reftex-cite.el128
-rw-r--r--lisp/textmodes/reftex-dcr.el4
-rw-r--r--lisp/textmodes/reftex-global.el4
-rw-r--r--lisp/textmodes/reftex-index.el7
-rw-r--r--lisp/textmodes/reftex-parse.el10
-rw-r--r--lisp/textmodes/reftex-ref.el4
-rw-r--r--lisp/textmodes/reftex-sel.el4
-rw-r--r--lisp/textmodes/reftex-toc.el27
-rw-r--r--lisp/textmodes/reftex-vars.el116
-rw-r--r--lisp/textmodes/reftex.el53
12 files changed, 361 insertions, 236 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b67c3d795fe..c5fce8ea262 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,51 @@
12002-07-22 Carsten Dominik <dominik@astro.uva.nl>
2
3 * textmodes/reftex-vars.el (reftex-index-verify-function): New
4 option.
5 (reftex-bibliography-commands): New option.
6 (reftex-toc-split-windows-horizontally): New option
7 (reftex-toc-split-windows-horizontally-fraction): New option
8 (reftex-include-file-commands): New option.
9 (reftex-cite-format-builtin): Added ?n for nocite.
10
11 * textmodes/reftex-index.el (reftex-query-index-phrase): Use
12 `reftex-index-verify-function'.
13
14 * textmodes/reftex-toc.el (reftex-re-enlarge): Handle horizontal
15 splitting.
16 (reftex-toc): Handle horizontal splitting
17 (reftex-last-window-width): New variable.
18
19 * textmodes/reftex-parse.el (reftex-locate-bibliography-files):
20 Use `reftex-bibliography-commands'.
21 (reftex-locate-bibliography-files): Regexp relaxed to allow for
22 cases where \bibliography is not the first thing on the line.
23
24 * textmodes/reftex.el (reftex-compile-variables): Use
25 `reftex-include-file-commands'.
26 (reftex-type-query-prompt): Changed defconst to defvar.
27 (reftex-type-query-help): likewise
28 (reftex-typekey-to-format-alist): likewise
29 (reftex-typekey-to-prefix-alist): likewise
30 (reftex-env-or-mac-alist):
31 (reftex-special-env-parsers): likewise
32 (reftex-label-mac-list): likewise
33 (reftex-label-env-list): likewise
34 (reftex-typekey-list): likewise
35 (reftex-words-to-typekey-alist): likewise
36 (reftex-key-to-index-macro-alist): likewise
37 (reftex-query-index-macro-prompt): likewise
38 (reftex-query-index-macro-help): likewise
39 (reftex-no-follow-message): likewise
40 (reftex-no-info-message): likewise
41 (reftex-mode): Define systax table for bibtex parsing.
42 (reftex-syntax-table-for-bib): Syntax table for bibtex parsing.
43
44 * textmodes/reftex-cite.el (reftex-format-names): %a as name
45 format lists all names.
46 (reftex-parse-bibtex-entry): Use `reftex-syntax-table-for-bib'.
47 (reftex-with-special-syntax-for-bib): new macro.
48
12002-07-21 Kai Gro,b_(Bjohann <Kai.Grossjohann@CS.Uni-Dortmund.DE> 492002-07-21 Kai Gro,b_(Bjohann <Kai.Grossjohann@CS.Uni-Dortmund.DE>
2 50
3 * net/tramp.el: Bump version to 2.0.2. 51 * net/tramp.el: Bump version to 2.0.2.
@@ -384,7 +432,7 @@
384 * calendar/timeclock.el (timeclock-in): Handle the case where no 432 * calendar/timeclock.el (timeclock-in): Handle the case where no
385 log file exists (ie the very first call). 433 log file exists (ie the very first call).
386 434
3872002-07-13 Kai Gro,A_(Bjohann <Kai.Grossjohann@CS.Uni-Dortmund.DE> 4352002-07-13 Kai Großjohann <Kai.Grossjohann@CS.Uni-Dortmund.DE>
388 436
389 * net/ange-ftp.el: Do not hook into file-name-handler-alist, this 437 * net/ange-ftp.el: Do not hook into file-name-handler-alist, this
390 is done by Tramp. 438 is done by Tramp.
@@ -460,7 +508,7 @@
460 (Macedoninan), "ru" (Russian), and "sp" (Serbian with Cyrillic 508 (Macedoninan), "ru" (Russian), and "sp" (Serbian with Cyrillic
461 alphabet) to "Cyrillic-ISO". 509 alphabet) to "Cyrillic-ISO".
462 510
4632002-07-11 Kai Gro,A_(Bjohann <Kai.Grossjohann@CS.Uni-Dortmund.DE> 5112002-07-11 Kai Großjohann <Kai.Grossjohann@CS.Uni-Dortmund.DE>
464 512
465 * net/tramp.el (tramp-default-method): New default method "sm" 513 * net/tramp.el (tramp-default-method): New default method "sm"
466 which I guess to be good for most people. 514 which I guess to be good for most people.
@@ -873,7 +921,7 @@
873 (uniquify-delayed-rationalize-file-buffer-names): 921 (uniquify-delayed-rationalize-file-buffer-names):
874 Rename from delayed-uniquify-rationalize-file-buffer-names. 922 Rename from delayed-uniquify-rationalize-file-buffer-names.
875 923
8762002-06-27 Kai Gro,A_(Bjohann <Kai.Grossjohann@CS.Uni-Dortmund.DE> 9242002-06-27 Kai Großjohann <Kai.Grossjohann@CS.Uni-Dortmund.DE>
877 925
878 * net/tramp.el (tramp-file-name-structure) 926 * net/tramp.el (tramp-file-name-structure)
879 (tramp-multi-file-name-hop-structure): Split for easier readability. 927 (tramp-multi-file-name-hop-structure): Split for easier readability.
@@ -922,7 +970,7 @@
922 970
923 * dired.el (dired-find-alternate-file): Mark as disabled. 971 * dired.el (dired-find-alternate-file): Mark as disabled.
924 972
9252002-06-25 Kai Gro,A_(Bjohann <Kai.Grossjohann@CS.Uni-Dortmund.DE> 9732002-06-25 Kai Großjohann <Kai.Grossjohann@CS.Uni-Dortmund.DE>
926 974
927 * net/tramp.el (tramp-ftp-method): New user option. 975 * net/tramp.el (tramp-ftp-method): New user option.
928 (tramp-invoke-ange-ftp): New function to forward calls to Ange-FTP. 976 (tramp-invoke-ange-ftp): New function to forward calls to Ange-FTP.
@@ -1010,7 +1058,7 @@
1010 * progmodes/f90.el (f90-do-auto-fill): Respect the value of 1058 * progmodes/f90.el (f90-do-auto-fill): Respect the value of
1011 comment-auto-fill-only-comments. 1059 comment-auto-fill-only-comments.
1012 1060
10132002-06-21 Kai Gro,A_(Bjohann <Kai.Grossjohann@CS.Uni-Dortmund.DE> 10612002-06-21 Kai Großjohann <Kai.Grossjohann@CS.Uni-Dortmund.DE>
1014 1062
1015 * net/ange-ftp.el (backup-buffer): Delete `ange-ftp' property. 1063 * net/ange-ftp.el (backup-buffer): Delete `ange-ftp' property.
1016 This is not a handled operation. 1064 This is not a handled operation.
@@ -1496,7 +1544,7 @@
1496 * select.el (xselect-convert-to-string): If VALUE is a string, 1544 * select.el (xselect-convert-to-string): If VALUE is a string,
1497 return a cons of TYPE and the string. 1545 return a cons of TYPE and the string.
1498 1546
14992002-06-05 Pavel Jan,Am(Bk <Pavel@Janik.cz> 15472002-06-05 Pavel Janík <Pavel@Janik.cz>
1500 1548
1501 * language/cyrillic.el (cyrillic-alternativnyj-decode-table): 1549 * language/cyrillic.el (cyrillic-alternativnyj-decode-table):
1502 Fix the table to contain correct characters. 1550 Fix the table to contain correct characters.
@@ -1932,7 +1980,7 @@
1932 (mail-default-directory): New user option. 1980 (mail-default-directory): New user option.
1933 (mail, mail-recover): Use that option. 1981 (mail, mail-recover): Use that option.
1934 1982
19352002-05-20 Kai Gro,A_(Bjohann <Kai.Grossjohann@CS.Uni-Dortmund.DE> 19832002-05-20 Kai Großjohann <Kai.Grossjohann@CS.Uni-Dortmund.DE>
1936 1984
1937 * international/mule.el (auto-coding-alist): Use emacs-mule 1985 * international/mule.el (auto-coding-alist): Use emacs-mule
1938 for auto-save files. 1986 for auto-save files.
@@ -2110,7 +2158,7 @@
2110 (dabbrev-upcase-means-case-search): Doc fix. 2158 (dabbrev-upcase-means-case-search): Doc fix.
2111 (dabbrev-case-replace): Fix custom tags and docs. 2159 (dabbrev-case-replace): Fix custom tags and docs.
2112 2160
21132002-05-14 Jochen K,A|(Bpper <jochen@jochen-kuepper.de> 21612002-05-14 Jochen Küpper <jochen@jochen-kuepper.de>
2114 2162
2115 * calc/calc-units.el (math-standard-units): Update from CODATA. 2163 * calc/calc-units.el (math-standard-units): Update from CODATA.
2116 2164
@@ -2172,7 +2220,7 @@
2172 (occur-engine): If there are no more matches, then finish 2220 (occur-engine): If there are no more matches, then finish
2173 searching the current buffer. 2221 searching the current buffer.
2174 2222
21752002-05-12 Pavel Jan,Am(Bk <Pavel@Janik.cz> 22232002-05-12 Pavel Janík <Pavel@Janik.cz>
2176 2224
2177 * net/ange-ftp.el (ange-ftp-try-passive-mode) 2225 * net/ange-ftp.el (ange-ftp-try-passive-mode)
2178 (ange-ftp-passive-host-alist): Change :version attributes to be 2226 (ange-ftp-passive-host-alist): Change :version attributes to be
@@ -2214,7 +2262,7 @@
2214 2262
2215 * subr.el (functionp): Catch errors in indirect-function. 2263 * subr.el (functionp): Catch errors in indirect-function.
2216 2264
22172002-05-12 Pavel Jan,Am(Bk <Pavel@Janik.cz> 22652002-05-12 Pavel Janík <Pavel@Janik.cz>
2218 2266
2219 * net/ldap.el (ldap-search-internal): Unfold folded lines before 2267 * net/ldap.el (ldap-search-internal): Unfold folded lines before
2220 parsing. 2268 parsing.
@@ -2297,7 +2345,7 @@
2297 2345
2298 * wid-edit.el (checkbox): New check-mark image. 2346 * wid-edit.el (checkbox): New check-mark image.
2299 2347
23002002-05-08 Pavel Jan,Am(Bk <Pavel@Janik.cz> 23482002-05-08 Pavel Janík <Pavel@Janik.cz>
2301 2349
2302 * filesets.el (filesets-running-xemacs): Fix last change. 2350 * filesets.el (filesets-running-xemacs): Fix last change.
2303 2351
@@ -2317,7 +2365,7 @@
2317 (filesets-menu-path, filesets-menu-before, filesets-menu-in-menu): 2365 (filesets-menu-path, filesets-menu-before, filesets-menu-in-menu):
2318 Defvar them to nil if running in Emacs. 2366 Defvar them to nil if running in Emacs.
2319 2367
23202002-05-08 Pavel Jan,Am(Bk <Pavel@Janik.cz> 23682002-05-08 Pavel Janík <Pavel@Janik.cz>
2321 2369
2322 * textmodes/flyspell.el (make-flyspell-overlay): Add help text 2370 * textmodes/flyspell.el (make-flyspell-overlay): Add help text
2323 to flyspell overlays. 2371 to flyspell overlays.
@@ -2572,7 +2620,7 @@
2572 Only interpret delete-selection property if mark-active. 2620 Only interpret delete-selection property if mark-active.
2573 (cua-mode): Fixed require in defcustom. 2621 (cua-mode): Fixed require in defcustom.
2574 2622
25752002-05-01 Pavel Jan,Am(Bk <Pavel@Janik.cz> 26232002-05-01 Pavel Janík <Pavel@Janik.cz>
2576 2624
2577 * calendar/cal-menu.el (cal-menu-x-popup-menu): Fix argument of 2625 * calendar/cal-menu.el (cal-menu-x-popup-menu): Fix argument of
2578 error call. 2626 error call.
@@ -2707,7 +2755,7 @@
2707 2755
2708 * language/viet-util.el: Update Commentary section. 2756 * language/viet-util.el: Update Commentary section.
2709 2757
27102002-04-29 Pavel Jan,Am(Bk <Pavel@Janik.cz> 27582002-04-29 Pavel Janík <Pavel@Janik.cz>
2711 2759
2712 * filesets.el (filesets-data): Doc fix. 2760 * filesets.el (filesets-data): Doc fix.
2713 (filesets-running-xemacs): Define even when compiling. 2761 (filesets-running-xemacs): Define even when compiling.
@@ -2772,7 +2820,7 @@
2772 * replace.el (occur-revert-arguments): 2820 * replace.el (occur-revert-arguments):
2773 Renamed from occur-revert-properties. All uses changed. 2821 Renamed from occur-revert-properties. All uses changed.
2774 2822
27752002-04-28 Pavel Jan,Am(Bk <Pavel@Janik.cz> 28232002-04-28 Pavel Janík <Pavel@Janik.cz>
2776 2824
2777 * recentf.el (recentf-menu-before): Use string to specify path in 2825 * recentf.el (recentf-menu-before): Use string to specify path in
2778 the menu. 2826 the menu.
@@ -3149,7 +3197,7 @@
3149 when finding the end. Take more care in analyzing the results 3197 when finding the end. Take more care in analyzing the results
3150 of intangibility after line-move-to-column. 3198 of intangibility after line-move-to-column.
3151 3199
31522002-04-22 Pavel Jan,Am(Bk <Pavel@Janik.cz> 32002002-04-22 Pavel Janík <Pavel@Janik.cz>
3153 3201
3154 * international/mule-diag.el (list-input-methods-1): Doc fix 3202 * international/mule-diag.el (list-input-methods-1): Doc fix
3155 (LEIM is now part of the standard distribution). 3203 (LEIM is now part of the standard distribution).
@@ -4145,7 +4193,7 @@
4145 4193
4146 * term.el (term-emulate-terminal): Fix last change. 4194 * term.el (term-emulate-terminal): Fix last change.
4147 4195
41482002-04-16 Pavel Jan,Am(Bk <Pavel@Janik.cz> 41962002-04-16 Pavel Janík <Pavel@Janik.cz>
4149 4197
4150 * bindings.el (mode-line-mode-menu): Update names to reflect 4198 * bindings.el (mode-line-mode-menu): Update names to reflect
4151 latest changes. 4199 latest changes.
@@ -4221,7 +4269,7 @@
4221 (exchange-point-and-mark): Temporarily enable transient-mark-mode 4269 (exchange-point-and-mark): Temporarily enable transient-mark-mode
4222 if prefix arg. 4270 if prefix arg.
4223 4271
42242002-04-14 Pavel Jan,Am(Bk <Pavel@Janik.cz> 42722002-04-14 Pavel Janík <Pavel@Janik.cz>
4225 4273
4226 * speedbar.el (speedbar-tag-hierarchy-method) 4274 * speedbar.el (speedbar-tag-hierarchy-method)
4227 (speedbar-toggle-updates, speedbar-toggle-images): Doc fixes. 4275 (speedbar-toggle-updates, speedbar-toggle-images): Doc fixes.
@@ -4231,7 +4279,7 @@
4231 * textmodes/sgml-mode.el (sgml-parse-tag-backward): Fix to work at 4279 * textmodes/sgml-mode.el (sgml-parse-tag-backward): Fix to work at
4232 beginning of buffer. 4280 beginning of buffer.
4233 4281
42342002-04-14 Pavel Jan,Am(Bk <Pavel@Janik.cz> 42822002-04-14 Pavel Janík <Pavel@Janik.cz>
4235 4283
4236 * speedbar.el (speedbar-generic-item-info) 4284 * speedbar.el (speedbar-generic-item-info)
4237 (speedbar-sort-tags): Doc fix. 4285 (speedbar-sort-tags): Doc fix.
@@ -4260,7 +4308,7 @@
4260 (gamegrid-add-score): Just dispatch on `system-type' to one of the 4308 (gamegrid-add-score): Just dispatch on `system-type' to one of the
4261 previous two functions. 4309 previous two functions.
4262 4310
42632002-04-13 Pavel Jan,Am(Bk <Pavel@Janik.cz> 43112002-04-13 Pavel Janík <Pavel@Janik.cz>
4264 4312
4265 * iswitchb.el: Update commentary to include new function 4313 * iswitchb.el: Update commentary to include new function
4266 iswitchb-exclude-nonmatching. 4314 iswitchb-exclude-nonmatching.
@@ -4325,7 +4373,7 @@
4325 (fill-region-as-paragraph): Compare to `to' rather than eobp. 4373 (fill-region-as-paragraph): Compare to `to' rather than eobp.
4326 (fill-paragraph): Don't rebind fill-paragraph-function. 4374 (fill-paragraph): Don't rebind fill-paragraph-function.
4327 4375
43282002-04-11 Pavel Jan,Am(Bk <Pavel@Janik.cz> 43762002-04-11 Pavel Janík <Pavel@Janik.cz>
4329 4377
4330 * menu-bar.el (menu-bar-adv-search-menu): Add incremental search. 4378 * menu-bar.el (menu-bar-adv-search-menu): Add incremental search.
4331 4379
@@ -4439,7 +4487,7 @@
4439 Use sgml-parse-tag-backward to find start point. 4487 Use sgml-parse-tag-backward to find start point.
4440 (sgml-looking-back-at): Doc fix. 4488 (sgml-looking-back-at): Doc fix.
4441 4489
44422002-04-09 Pavel Jan,Am(Bk <Pavel@Janik.cz> 44902002-04-09 Pavel Janík <Pavel@Janik.cz>
4443 4491
4444 * isearch.el (isearch-message-prefix): Use minibuffer-prompt face 4492 * isearch.el (isearch-message-prefix): Use minibuffer-prompt face
4445 for prompt. 4493 for prompt.
@@ -4488,7 +4536,7 @@
4488 * vc-cvs.el (vc-cvs-valid-version-number-p): New function. 4536 * vc-cvs.el (vc-cvs-valid-version-number-p): New function.
4489 (vc-cvs-checkin): Use it. 4537 (vc-cvs-checkin): Use it.
4490 4538
44912002-04-08 Pavel Jan,Am(Bk <Pavel@Janik.cz> 45392002-04-08 Pavel Janík <Pavel@Janik.cz>
4492 4540
4493 * files.el (display-time-string): Fix last change. 4541 * files.el (display-time-string): Fix last change.
4494 4542
@@ -4503,7 +4551,7 @@
4503 default-process-coding-system. 4551 default-process-coding-system.
4504 (coding-system-change-text-conversion): Fix case where CODING is nil. 4552 (coding-system-change-text-conversion): Fix case where CODING is nil.
4505 4553
45062002-04-07 Pavel Jan,Am(Bk <Pavel@Janik.cz> 45542002-04-07 Pavel Janík <Pavel@Janik.cz>
4507 4555
4508 * subr.el (play-sound): Move here from simple.el. 4556 * subr.el (play-sound): Move here from simple.el.
4509 4557
@@ -4530,7 +4578,7 @@
4530 4578
4531 * textmodes/xml-lite.el: Remove. 4579 * textmodes/xml-lite.el: Remove.
4532 4580
45332002-04-05 Pavel Jan,Am(Bk <Pavel@Janik.cz> 45812002-04-05 Pavel Janík <Pavel@Janik.cz>
4534 4582
4535 * simple.el (play-sound): New function (uses play-sound-internal). 4583 * simple.el (play-sound): New function (uses play-sound-internal).
4536 4584
@@ -4554,7 +4602,7 @@
4554 * textmodes/sgml-mode.el: Add missing require. 4602 * textmodes/sgml-mode.el: Add missing require.
4555 (sgml-lexical-context): Fix up CDATA detection for boundary cases. 4603 (sgml-lexical-context): Fix up CDATA detection for boundary cases.
4556 4604
45572002-04-03 Kai Gro,A_(Bjohann <Kai.Grossjohann@CS.Uni-Dortmund.DE> 46052002-04-03 Kai Großjohann <Kai.Grossjohann@CS.Uni-Dortmund.DE>
4558 4606
4559 * pcvs.el (cvs-mode-previous-line, cvs-mode-next-line): Move to 4607 * pcvs.el (cvs-mode-previous-line, cvs-mode-next-line): Move to
4560 spot indicated by text property `cvs-goal-column', if present. 4608 spot indicated by text property `cvs-goal-column', if present.
@@ -4622,7 +4670,7 @@
4622 (sgml-parse-tag-backward): Extend support for CDATA to include 4670 (sgml-parse-tag-backward): Extend support for CDATA to include
4623 conditional sections. 4671 conditional sections.
4624 4672
46252002-04-03 Pavel Jan,Am(Bk <Pavel@Janik.cz> 46732002-04-03 Pavel Janík <Pavel@Janik.cz>
4626 4674
4627 * cus-start.el: Rename `autoselect-window' to 4675 * cus-start.el: Rename `autoselect-window' to
4628 `mouse-autoselect-window'. 4676 `mouse-autoselect-window'.
@@ -4696,7 +4744,7 @@
4696 (xml-lite-parse-tag-backward): Simplify parsing by assuming we 4744 (xml-lite-parse-tag-backward): Simplify parsing by assuming we
4697 always start within text. Make use of sgml-unclosed-tag-p. 4745 always start within text. Make use of sgml-unclosed-tag-p.
4698 4746
46992002-04-01 Ville Skytt,Ad(B <ville.skytta@xemacs.org> 47472002-04-01 Ville Skyttä <ville.skytta@xemacs.org>
4700 4748
4701 * tcl.el (tcl-imenu-generic-expression): New value. 4749 * tcl.el (tcl-imenu-generic-expression): New value.
4702 (tcl-imenu-create-index-function): Function deleted. 4750 (tcl-imenu-create-index-function): Function deleted.
@@ -4706,7 +4754,7 @@
4706 (inferior-tcl-mode): Doc fix. 4754 (inferior-tcl-mode): Doc fix.
4707 Change not legally significant. 4755 Change not legally significant.
4708 4756
47092002-04-01 Pavel Jan,Am(Bk <Pavel@Janik.cz> 47572002-04-01 Pavel Janík <Pavel@Janik.cz>
4710 4758
4711 * cus-start.el: Rename `x-autoselect-window' to `autoselect-window'. 4759 * cus-start.el: Rename `x-autoselect-window' to `autoselect-window'.
4712 4760
@@ -4907,7 +4955,7 @@
4907 for comments. 4955 for comments.
4908 (xml-lite-in-string-p): Simplify. 4956 (xml-lite-in-string-p): Simplify.
4909 4957
49102002-03-27 Pavel Jan,Am(Bk <Pavel@Janik.cz> 49582002-03-27 Pavel Janík <Pavel@Janik.cz>
4911 4959
4912 * allout.el (outline-layout): Doc fix. 4960 * allout.el (outline-layout): Doc fix.
4913 4961
@@ -4975,7 +5023,7 @@
4975 5023
4976 * subr.el (substring-no-properties): Function deleted (now in C). 5024 * subr.el (substring-no-properties): Function deleted (now in C).
4977 5025
49782002-03-25 Pavel Jan,Am(Bk <Pavel@Janik.cz> 50262002-03-25 Pavel Janík <Pavel@Janik.cz>
4979 5027
4980 * mwheel.el (mouse-wheel-mode): Use global-set-key and 5028 * mwheel.el (mouse-wheel-mode): Use global-set-key and
4981 global-unset-key. 5029 global-unset-key.
@@ -5016,7 +5064,7 @@
5016 fore- and background colors of the faces we create, since facemenu 5064 fore- and background colors of the faces we create, since facemenu
5017 doesn't. 5065 doesn't.
5018 5066
50192002-03-24 Pavel Jan,Am(Bk <Pavel@Janik.cz> 50672002-03-24 Pavel Janík <Pavel@Janik.cz>
5020 5068
5021 * mwheel.el (mouse-wheel-mode): Use the result of 5069 * mwheel.el (mouse-wheel-mode): Use the result of
5022 current-global-map instead of the variable `global-map'. 5070 current-global-map instead of the variable `global-map'.
@@ -5071,7 +5119,7 @@
5071 * mail/emacsbug.el (report-emacs-bug-hook): Remove submitter 5119 * mail/emacsbug.el (report-emacs-bug-hook): Remove submitter
5072 directions as the last action. 5120 directions as the last action.
5073 5121
50742002-03-21 Pavel Jan,Am(Bk <Pavel@Janik.cz> 51222002-03-21 Pavel Janík <Pavel@Janik.cz>
5075 5123
5076 * startup.el (fancy-splash-tail, normal-splash-screen): 5124 * startup.el (fancy-splash-tail, normal-splash-screen):
5077 Update copyright. 5125 Update copyright.
@@ -5259,7 +5307,7 @@
5259 <top-level>: Remove the setup for all known codepages: it seems 5307 <top-level>: Remove the setup for all known codepages: it seems
5260 to cause crashes in the CCL driver. 5308 to cause crashes in the CCL driver.
5261 5309
52622002-03-16 Pavel Jan,Am(Bk <Pavel@Janik.cz> 53102002-03-16 Pavel Janík <Pavel@Janik.cz>
5263 5311
5264 * textmodes/bibtex.el (bibtex-sort-ignore-string-entries) 5312 * textmodes/bibtex.el (bibtex-sort-ignore-string-entries)
5265 (bibtex-entry-field-alist): Doc fix. 5313 (bibtex-entry-field-alist): Doc fix.
@@ -5277,7 +5325,7 @@
5277 * files.el (load-completion): New function. 5325 * files.el (load-completion): New function.
5278 (load-library): Use it. 5326 (load-library): Use it.
5279 5327
52802002-03-15 Pavel Jan,Am(Bk <Pavel@Janik.cz> 53282002-03-15 Pavel Janík <Pavel@Janik.cz>
5281 5329
5282 * calendar/cal-french.el (calendar-goto-french-date): Fix prompt 5330 * calendar/cal-french.el (calendar-goto-french-date): Fix prompt
5283 to match the actual code. 5331 to match the actual code.
@@ -5420,7 +5468,7 @@
5420 5468
5421 * comint.el: Remove documentation on setting up pcomplete. 5469 * comint.el: Remove documentation on setting up pcomplete.
5422 5470
54232002-03-11 Pavel Jan,Am(Bk <Pavel@Janik.cz> 54712002-03-11 Pavel Janík <Pavel@Janik.cz>
5424 5472
5425 * font-lock.el (java-font-lock-extra-types): Add "URL" as separate 5473 * font-lock.el (java-font-lock-extra-types): Add "URL" as separate
5426 item. Doc fix. 5474 item. Doc fix.
@@ -5540,7 +5588,7 @@
5540 (hif-conditional): New function to evaluate a conditional 5588 (hif-conditional): New function to evaluate a conditional
5541 expression. 5589 expression.
5542 5590
55432002-03-06 Pavel Jan,Am(Bk <Pavel@Janik.cz> 55912002-03-06 Pavel Janík <Pavel@Janik.cz>
5544 5592
5545 * language/czech.el ("Czech"): Fix the documentation. 5593 * language/czech.el ("Czech"): Fix the documentation.
5546 5594
@@ -5603,7 +5651,7 @@
5603 (mode-line-inactive, header-line): Move the `t' section to the 5651 (mode-line-inactive, header-line): Move the `t' section to the
5604 beginning so the `:inherit' setting can be shared. 5652 beginning so the `:inherit' setting can be shared.
5605 5653
56062002-03-04 Pavel Jan,Am(Bk <Pavel@Janik.cz> 56542002-03-04 Pavel Janík <Pavel@Janik.cz>
5607 5655
5608 * net/snmp-mode.el: Require tempo when compiling to prevent 5656 * net/snmp-mode.el: Require tempo when compiling to prevent
5609 warnings. Update copyright notice. 5657 warnings. Update copyright notice.
@@ -5723,7 +5771,7 @@
5723 * font-lock.el (java-font-lock-extra-types): 5771 * font-lock.el (java-font-lock-extra-types):
5724 Match java.net.URL, etc. 5772 Match java.net.URL, etc.
5725 5773
57262002-02-28 Pavel Jan,Am(Bk <Pavel@Janik.cz> 57742002-02-28 Pavel Janík <Pavel@Janik.cz>
5727 5775
5728 * hexl.el (hexl-options): Doc fix. 5776 * hexl.el (hexl-options): Doc fix.
5729 Update Commentary section. 5777 Update Commentary section.
@@ -6003,7 +6051,7 @@
6003 * progmodes/tcl.el (tcl-do-fill-paragraph): Find and fill on more 6051 * progmodes/tcl.el (tcl-do-fill-paragraph): Find and fill on more
6004 natural paragraph boundaries. Don't fail at beginning of buffer. 6052 natural paragraph boundaries. Don't fail at beginning of buffer.
6005 6053
60062002-02-20 Pavel Jan,Am(Bk <Pavel@Janik.cz> 60542002-02-20 Pavel Janík <Pavel@Janik.cz>
6007 6055
6008 * tar-mode.el (tar-next-line, tar-previous-line): Add doc string, 6056 * tar-mode.el (tar-next-line, tar-previous-line): Add doc string,
6009 call the argument "arg" to match plain next-line and 6057 call the argument "arg" to match plain next-line and
@@ -6067,7 +6115,7 @@
6067 * mail/uce.el (uce-reply-to-uce): Fix incorrect behavior when 6115 * mail/uce.el (uce-reply-to-uce): Fix incorrect behavior when
6068 invoked from Rmail with full headers displayed. 6116 invoked from Rmail with full headers displayed.
6069 6117
60702002-02-17 Kai Gro,A_(Bjohann <Kai.Grossjohann@CS.Uni-Dortmund.DE> 61182002-02-17 Kai Großjohann <Kai.Grossjohann@CS.Uni-Dortmund.DE>
6071 6119
6072 * emacs-lisp/lisp.el (mark-defun): Don't leave multiple marks 6120 * emacs-lisp/lisp.el (mark-defun): Don't leave multiple marks
6073 when repeated. 6121 when repeated.
@@ -6083,7 +6131,7 @@
6083 6131
6084 * textmodes/flyspell.el (flyspell): Add to ispell group. 6132 * textmodes/flyspell.el (flyspell): Add to ispell group.
6085 6133
60862002-02-17 Kai Gro,A_(Bjohann <Kai.Grossjohann@CS.Uni-Dortmund.DE> 61342002-02-17 Kai Großjohann <Kai.Grossjohann@CS.Uni-Dortmund.DE>
6087 6135
6088 * emacs-lisp/lisp.el (mark-sexp): Don't leave multiple marks when 6136 * emacs-lisp/lisp.el (mark-sexp): Don't leave multiple marks when
6089 repeated. 6137 repeated.
@@ -6107,7 +6155,7 @@
6107 * cus-start.el: Add automatic-hscroll-margin and 6155 * cus-start.el: Add automatic-hscroll-margin and
6108 automatic-hscroll-step. 6156 automatic-hscroll-step.
6109 6157
61102002-02-16 Pavel Jan,Am(Bk <Pavel@Janik.cz> 61582002-02-16 Pavel Janík <Pavel@Janik.cz>
6111 6159
6112 * cus-start.el (x-autoselect-window): Allow customization. 6160 * cus-start.el (x-autoselect-window): Allow customization.
6113 6161
@@ -6204,7 +6252,7 @@
6204 6252
6205 * menu-bar.el (menu-bar-tools-menu): Add an item for Calculator. 6253 * menu-bar.el (menu-bar-tools-menu): Add an item for Calculator.
6206 6254
62072002-02-15 Kai Gro,A_(Bjohann <Kai.Grossjohann@CS.Uni-Dortmund.DE> 62552002-02-15 Kai Großjohann <Kai.Grossjohann@CS.Uni-Dortmund.DE>
6208 6256
6209 * simple.el (mark-word): Mark more if repeated. 6257 * simple.el (mark-word): Mark more if repeated.
6210 * textmodes/paragraphs.el (mark-paragraph): Ditto. 6258 * textmodes/paragraphs.el (mark-paragraph): Ditto.
@@ -6305,7 +6353,7 @@
6305 * cus-start.el: Don't warn about "x-*" symbols when building a 6353 * cus-start.el: Don't warn about "x-*" symbols when building a
6306 non-GUI version. 6354 non-GUI version.
6307 6355
63082002-02-11 Pavel Jan,Am(Bk <Pavel@Janik.cz> 63562002-02-11 Pavel Janík <Pavel@Janik.cz>
6309 6357
6310 * strokes.el (strokes-do-stroke, strokes-do-complex-stroke): 6358 * strokes.el (strokes-do-stroke, strokes-do-complex-stroke):
6311 Doc fix. 6359 Doc fix.
@@ -6330,7 +6378,7 @@
6330 (dump-charsets, dump-codings): Deleted (obsolete). 6378 (dump-charsets, dump-codings): Deleted (obsolete).
6331 From Dave Love <fx@gnu.org>. 6379 From Dave Love <fx@gnu.org>.
6332 6380
63332002-02-10 Pavel Jan,Am(Bk <Pavel@Janik.cz> 63812002-02-10 Pavel Janík <Pavel@Janik.cz>
6334 6382
6335 * menu-bar.el (menu-bar-showhide-menu): Rename functions for toggling. 6383 * menu-bar.el (menu-bar-showhide-menu): Rename functions for toggling.
6336 6384
@@ -6353,7 +6401,7 @@
6353 6401
6354 * ediff.el: Typo in comment. 6402 * ediff.el: Typo in comment.
6355 6403
63562002-02-09 Pavel Jan,Am(Bk <Pavel@Janik.cz> 64042002-02-09 Pavel Janík <Pavel@Janik.cz>
6357 6405
6358 * menu-bar.el (menu-bar-options-save): Take care of 6406 * menu-bar.el (menu-bar-options-save): Take care of
6359 line-number-mode and column-number-mode variables. 6407 line-number-mode and column-number-mode variables.
@@ -6430,7 +6478,7 @@
6430 * subr.el (global-set-key, local-set-key): Accept a symbol for the 6478 * subr.el (global-set-key, local-set-key): Accept a symbol for the
6431 KEY argument (like define-key). 6479 KEY argument (like define-key).
6432 6480
64332002-02-06 Pavel Jan,Am(Bk <Pavel@Janik.cz> 64812002-02-06 Pavel Janík <Pavel@Janik.cz>
6434 6482
6435 * textmodes/flyspell.el (flyspell-insert-function): Doc fix. 6483 * textmodes/flyspell.el (flyspell-insert-function): Doc fix.
6436 6484
@@ -6511,7 +6559,7 @@
6511 * cus-edit.el (customize-mark-to-save): New function. 6559 * cus-edit.el (customize-mark-to-save): New function.
6512 * menu-bar.el (menu-bar-options-save): Rewrote. 6560 * menu-bar.el (menu-bar-options-save): Rewrote.
6513 6561
65142002-02-05 Pavel Jan,Am(Bk <Pavel@Janik.cz> 65622002-02-05 Pavel Janík <Pavel@Janik.cz>
6515 6563
6516 * cus-start.el (x-use-underline-position-properties): 6564 * cus-start.el (x-use-underline-position-properties):
6517 Allow customization. 6565 Allow customization.
@@ -6544,11 +6592,11 @@
6544 * window.el (save-selected-window): Move macro before first use. 6592 * window.el (save-selected-window): Move macro before first use.
6545 (balance-windows): Fix misplaced parenthesis. 6593 (balance-windows): Fix misplaced parenthesis.
6546 6594
65472002-02-03 Pavel Jan,Am(Bk <Pavel@Janik.cz> 65952002-02-03 Pavel Janík <Pavel@Janik.cz>
6548 6596
6549 * calculator.el (calculator-displayers): Doc fixes. 6597 * calculator.el (calculator-displayers): Doc fixes.
6550 6598
65512002-02-03 Pavel Jan,Am(Bk <Pavel@Janik.cz> 65992002-02-03 Pavel Janík <Pavel@Janik.cz>
6552 6600
6553 * menu-bar.el (menu-bar-help-menu): Use different text for tool-tip. 6601 * menu-bar.el (menu-bar-help-menu): Use different text for tool-tip.
6554 (menu-bar-options-save): Save also the value of `display-time-mode'. 6602 (menu-bar-options-save): Save also the value of `display-time-mode'.
@@ -6587,7 +6635,7 @@
6587 looking for X-Coding-System header, and restore the pruned state 6635 looking for X-Coding-System header, and restore the pruned state
6588 before returning. 6636 before returning.
6589 6637
65902002-02-02 Pavel Jan,Am(Bk <Pavel@Janik.cz> 66382002-02-02 Pavel Janík <Pavel@Janik.cz>
6591 6639
6592 * cus-edit.el (customize-save-variable): Fix typo in prompt. 6640 * cus-edit.el (customize-save-variable): Fix typo in prompt.
6593 6641
@@ -6676,7 +6724,7 @@
6676 * emulation/pc-select.el (pc-select-save-and-set-mode): 6724 * emulation/pc-select.el (pc-select-save-and-set-mode):
6677 Properly use MODE-VAR. 6725 Properly use MODE-VAR.
6678 6726
66792002-01-29 Pavel Jan,Am(Bk <Pavel@Janik.cz> 67272002-01-29 Pavel Janík <Pavel@Janik.cz>
6680 6728
6681 * menu-bar.el (menu-bar-help-menu): Change menu-item "Show Emacs 6729 * menu-bar.el (menu-bar-help-menu): Change menu-item "Show Emacs
6682 Version" to "About Emacs". 6730 Version" to "About Emacs".
@@ -6693,7 +6741,7 @@
6693 6741
6694 * calendar/calendar.el (generate-calendar-month): Doc fix. 6742 * calendar/calendar.el (generate-calendar-month): Doc fix.
6695 6743
66962002-01-27 Pavel Jan,Am(Bk <Pavel@Janik.cz> 67442002-01-27 Pavel Janík <Pavel@Janik.cz>
6697 6745
6698 * time.el (display-time-mail-directory): New option. 6746 * time.el (display-time-mail-directory): New option.
6699 (display-time-mail-function): Update doc-string. 6747 (display-time-mail-function): Update doc-string.
@@ -6908,7 +6956,7 @@
6908 with `byte-compile-dynamic'. 6956 with `byte-compile-dynamic'.
6909 (ibuffer-default-directory, toplevel): Doc files. 6957 (ibuffer-default-directory, toplevel): Doc files.
6910 6958
69112002-01-20 Pavel Jan,Am(Bk <Pavel@Janik.cz> 69592002-01-20 Pavel Janík <Pavel@Janik.cz>
6912 6960
6913 * tempo.el (tempo-define-template): Doc fix. 6961 * tempo.el (tempo-define-template): Doc fix.
6914 6962
@@ -6925,7 +6973,7 @@
6925 6973
6926 * term/w32-win.el (mouse-set-font): Use w32-list-proportional-fonts. 6974 * term/w32-win.el (mouse-set-font): Use w32-list-proportional-fonts.
6927 6975
69282002-01-19 Pavel Jan,Am(Bk <Pavel@Janik.cz> 69762002-01-19 Pavel Janík <Pavel@Janik.cz>
6929 6977
6930 * language/tibet-util.el (tibetan-decompose-region) 6978 * language/tibet-util.el (tibetan-decompose-region)
6931 (tibetan-decompose-string): Fix typo in docstring. 6979 (tibetan-decompose-string): Fix typo in docstring.
@@ -7017,7 +7065,7 @@
7017 7065
7018 * mail/feedmail.el (feedmail): Fix :link spec. 7066 * mail/feedmail.el (feedmail): Fix :link spec.
7019 7067
70202002-01-16 Pavel Jan,Am(Bk <Pavel@Janik.cz> 70682002-01-16 Pavel Janík <Pavel@Janik.cz>
7021 7069
7022 * net/ldap.el (ldap-ldapsearch-prog): Default to OpenLDAP version 7070 * net/ldap.el (ldap-ldapsearch-prog): Default to OpenLDAP version
7023 2 ldapsearch. 7071 2 ldapsearch.
@@ -7134,7 +7182,7 @@
7134 (comint-send-input): New arg NO-NEWLINE. 7182 (comint-send-input): New arg NO-NEWLINE.
7135 (comint-send-eof): Call comint-send-eof with NO-NEWLINE. 7183 (comint-send-eof): Call comint-send-eof with NO-NEWLINE.
7136 7184
71372002-01-12 Pavel Jan,Am(Bk <Pavel@Janik.cz> 71852002-01-12 Pavel Janík <Pavel@Janik.cz>
7138 7186
7139 * textmodes/flyspell.el (flyspell-check-pre-word-p): 7187 * textmodes/flyspell.el (flyspell-check-pre-word-p):
7140 Prevent delaying when executing keyboard macros. 7188 Prevent delaying when executing keyboard macros.
@@ -7219,7 +7267,7 @@
7219 7267
7220 * textmodes/flyspell.el (flyspell-mode-line-string): Fix custom type. 7268 * textmodes/flyspell.el (flyspell-mode-line-string): Fix custom type.
7221 7269
72222002-01-08 Pavel Jan,Am(Bk <Pavel@Janik.cz> 72702002-01-08 Pavel Janík <Pavel@Janik.cz>
7223 7271
7224 * progmodes/ada-mode.el (ada-initialize-properties, ada-mode): 7272 * progmodes/ada-mode.el (ada-initialize-properties, ada-mode):
7225 Do not use make-local-hook. 7273 Do not use make-local-hook.
@@ -7235,7 +7283,7 @@
7235 7283
7236 * ediff-hook.el: Add an autoload cookie. 7284 * ediff-hook.el: Add an autoload cookie.
7237 7285
72382002-01-08 Pavel Jan,Am(Bk <Pavel@Janik.cz> 72862002-01-08 Pavel Janík <Pavel@Janik.cz>
7239 7287
7240 * net/eudcb-ph.el, net/ldap.el: New maintainer. New e-mail 7288 * net/eudcb-ph.el, net/ldap.el: New maintainer. New e-mail
7241 address of the author. 7289 address of the author.
@@ -7347,7 +7395,7 @@
7347 * help-fns.el (describe-variable, describe-function): 7395 * help-fns.el (describe-variable, describe-function):
7348 Do save-excursion. 7396 Do save-excursion.
7349 7397
73502002-01-06 Pavel Jan,Am(Bk <Pavel@Janik.cz> 73982002-01-06 Pavel Janík <Pavel@Janik.cz>
7351 7399
7352 * net/ldap.el (ldap-search-internal): Skip error message from 7400 * net/ldap.el (ldap-search-internal): Skip error message from
7353 ldapsearch. Allow listing attribute names only. Do not open 7401 ldapsearch. Allow listing attribute names only. Do not open
@@ -7371,7 +7419,7 @@
7371 * net/eudcb-ldap.el (eudc-attribute-display-method-alist): 7419 * net/eudcb-ldap.el (eudc-attribute-display-method-alist):
7372 Use proper attribute name labeledUri instead of deprecated labeledUrl. 7420 Use proper attribute name labeledUri instead of deprecated labeledUrl.
7373 7421
73742002-01-05 Pavel Jan,Am(Bk <Pavel@Janik.cz> 74222002-01-05 Pavel Janík <Pavel@Janik.cz>
7375 7423
7376 * net/eudc-hotlist.el (eudc-edit-hotlist): Avoid error when 7424 * net/eudc-hotlist.el (eudc-edit-hotlist): Avoid error when
7377 editing an empty hotlist. 7425 editing an empty hotlist.
@@ -7432,7 +7480,7 @@
7432 7480
7433 * mail/sendmail.el (mail-recover-1, mail-recover): Doc fix. 7481 * mail/sendmail.el (mail-recover-1, mail-recover): Doc fix.
7434 7482
74352002-01-04 Pavel Jan,Am(Bk <Pavel@Janik.cz> 74832002-01-04 Pavel Janík <Pavel@Janik.cz>
7436 7484
7437 * net/ldap.el (ldap-host-parameters-alist): Remove duplicated entry. 7485 * net/ldap.el (ldap-host-parameters-alist): Remove duplicated entry.
7438 (ldap-ignore-attribute-codings): Change the default value to allow 7486 (ldap-ignore-attribute-codings): Change the default value to allow
@@ -7462,7 +7510,7 @@
7462 does not exist, call mail-recover-1 to allow recovery from past 7510 does not exist, call mail-recover-1 to allow recovery from past
7463 auto-saved drafts. 7511 auto-saved drafts.
7464 7512
74652002-01-03 Pavel Jan,Am(Bk <Pavel@Janik.cz> 75132002-01-03 Pavel Janík <Pavel@Janik.cz>
7466 7514
7467 * time.el (display-time-load-average-threshold): Fix defcustom 7515 * time.el (display-time-load-average-threshold): Fix defcustom
7468 (add type and group). 7516 (add type and group).
@@ -7581,7 +7629,7 @@
7581 * bindings.el (function-key-map): Don't bind shifted keypad 7629 * bindings.el (function-key-map): Don't bind shifted keypad
7582 numeric keys. 7630 numeric keys.
7583 7631
75842002-01-02 Pavel Jan,Am(Bk <Pavel@Janik.cz> 76322002-01-02 Pavel Janík <Pavel@Janik.cz>
7585 7633
7586 * enriched.el (enriched-handle-display-prop): Remove unused variables. 7634 * enriched.el (enriched-handle-display-prop): Remove unused variables.
7587 (enriched-mode): Doc fix. 7635 (enriched-mode): Doc fix.
@@ -7617,7 +7665,7 @@
7617 * cus-edit.el (custom-face-edit-fix-value): New function. 7665 * cus-edit.el (custom-face-edit-fix-value): New function.
7618 (custom-face-edit): Use it, to convert :italic and :bold to new forms. 7666 (custom-face-edit): Use it, to convert :italic and :bold to new forms.
7619 7667
76202001-12-30 Pavel Jan,Am(Bk <Pavel@Janik.cz> 76682001-12-30 Pavel Janík <Pavel@Janik.cz>
7621 7669
7622 * progmodes/octave-mod.el (octave-abbrev-table): 7670 * progmodes/octave-mod.el (octave-abbrev-table):
7623 * progmodes/idlwave.el (idlwave-mode-abbrev-table): 7671 * progmodes/idlwave.el (idlwave-mode-abbrev-table):
@@ -7747,7 +7795,7 @@
7747 7795
7748 * international/fontset.el: Don't require ind-util when compiling. 7796 * international/fontset.el: Don't require ind-util when compiling.
7749 7797
77502001-12-25 Pavel Jan,Am(Bk <Pavel@Janik.cz> 77982001-12-25 Pavel Janík <Pavel@Janik.cz>
7751 7799
7752 * emulation/tpu-edt.el (tpu-reset-screen-size): 7800 * emulation/tpu-edt.el (tpu-reset-screen-size):
7753 Use set-frame-height and set-frame-width instead of set-screen-height 7801 Use set-frame-height and set-frame-width instead of set-screen-height
@@ -7835,7 +7883,7 @@
7835 * play/yow.el (yow): Use an arg to distinguish interactive calls, 7883 * play/yow.el (yow): Use an arg to distinguish interactive calls,
7836 not interactive-p. 7884 not interactive-p.
7837 7885
78382001-12-22 Pavel Jan,Am(Bk <Pavel@Janik.cz> 78862001-12-22 Pavel Janík <Pavel@Janik.cz>
7839 7887
7840 * emacs-lisp/elint.el (elint-unknown-builtin-args): 7888 * emacs-lisp/elint.el (elint-unknown-builtin-args):
7841 Remove mocklisp entries. 7889 Remove mocklisp entries.
@@ -7861,7 +7909,7 @@
7861 * textmodes/refill.el (refill-mode): Don't barf when redundantly 7909 * textmodes/refill.el (refill-mode): Don't barf when redundantly
7862 turning refill-mode off. 7910 turning refill-mode off.
7863 7911
78642001-12-22 Pavel Jan,Am(Bk <Pavel@Janik.cz> 79122001-12-22 Pavel Janík <Pavel@Janik.cz>
7865 7913
7866 * time.el (display-time-load-average-threshold): New variable. 7914 * time.el (display-time-load-average-threshold): New variable.
7867 (display-time-update): Use it. 7915 (display-time-update): Use it.
@@ -8004,7 +8052,7 @@
8004 (print-coding-system-briefly): Make printed output have a similar 8052 (print-coding-system-briefly): Make printed output have a similar
8005 format as describe-character-set. 8053 format as describe-character-set.
8006 8054
80072001-12-20 Pavel Jan,Am(Bk <Pavel@Janik.cz> 80552001-12-20 Pavel Janík <Pavel@Janik.cz>
8008 8056
8009 * play/blackbox.el (bb-member): Remove, use member instead. 8057 * play/blackbox.el (bb-member): Remove, use member instead.
8010 (bb-delete): Remove, use delete instead. 8058 (bb-delete): Remove, use delete instead.
@@ -8038,7 +8086,7 @@
8038 8086
8039 * international/fontset.el: Require `ind-util' when compiling. 8087 * international/fontset.el: Require `ind-util' when compiling.
8040 8088
80412001-12-18 Pavel Jan,Am(Bk <Pavel@Janik.cz> 80892001-12-18 Pavel Janík <Pavel@Janik.cz>
8042 8090
8043 * language/ethio-util.el (ethio-modify-vowel): Use char-to-string 8091 * language/ethio-util.el (ethio-modify-vowel): Use char-to-string
8044 instead of decompose-composite-char. 8092 instead of decompose-composite-char.
@@ -8256,7 +8304,7 @@
8256 8304
8257 * newcomment.el (comment-indent): Jump to the middle of empty comments. 8305 * newcomment.el (comment-indent): Jump to the middle of empty comments.
8258 8306
82592001-12-14 Pavel Jan,Am(Bk <Pavel@Janik.cz> 83072001-12-14 Pavel Janík <Pavel@Janik.cz>
8260 8308
8261 * select.el (xselect-convert-to-class, xselect-convert-to-name): 8309 * select.el (xselect-convert-to-class, xselect-convert-to-name):
8262 Document. 8310 Document.
@@ -8304,7 +8352,7 @@
8304 * international/mule.el (set-auto-coding): Don't search for 8352 * international/mule.el (set-auto-coding): Don't search for
8305 "unibyte:" or "coding:" if set-auto-mode-1 returns nil. 8353 "unibyte:" or "coding:" if set-auto-mode-1 returns nil.
8306 8354
83072001-12-13 Pavel Jan,Am(Bk <Pavel@Janik.cz> 83552001-12-13 Pavel Janík <Pavel@Janik.cz>
8308 8356
8309 * mail/mailabbrev.el (mail-abbrevs-setup): Do not use make-local-hook. 8357 * mail/mailabbrev.el (mail-abbrevs-setup): Do not use make-local-hook.
8310 8358
@@ -8360,7 +8408,7 @@
8360 * language/european.el: Remove autoload cookies. Fix registration 8408 * language/european.el: Remove autoload cookies. Fix registration
8361 of diacritic composition function. 8409 of diacritic composition function.
8362 8410
83632001-12-11 Pavel Jan,Am(Bk <Pavel@Janik.cz> 84112001-12-11 Pavel Janík <Pavel@Janik.cz>
8364 8412
8365 * calendar/todo-mode.el: Require time-stamp. 8413 * calendar/todo-mode.el: Require time-stamp.
8366 8414
@@ -8417,7 +8465,7 @@
8417 Use `select-frame-set-input-focus'--needed when window manager 8465 Use `select-frame-set-input-focus'--needed when window manager
8418 uses "click to focus" policy. 8466 uses "click to focus" policy.
8419 8467
84202001-12-09 Pavel Jan,Am(Bk <Pavel@Janik.cz> 84682001-12-09 Pavel Janík <Pavel@Janik.cz>
8421 8469
8422 * COPYING: Moved back. 8470 * COPYING: Moved back.
8423 8471
@@ -8566,7 +8614,7 @@
8566 * textmodes/picture.el (picture-mode-map): Don't use defconst 8614 * textmodes/picture.el (picture-mode-map): Don't use defconst
8567 for a variable. 8615 for a variable.
8568 8616
85692001-12-02 Pavel Jan,Am(Bk <Pavel@Janik.cz> 86172001-12-02 Pavel Janík <Pavel@Janik.cz>
8570 8618
8571 * textmodes/reftex-index.el (reftex-index-mode): 8619 * textmodes/reftex-index.el (reftex-index-mode):
8572 Remove make-local-hook. 8620 Remove make-local-hook.
@@ -8631,12 +8679,12 @@
8631 8679
8632 * man.el (Man-build-section-alist): Remove last Man-match-substring. 8680 * man.el (Man-build-section-alist): Remove last Man-match-substring.
8633 8681
86342001-11-30 Kai Gro,A_(Bjohann <Kai.Grossjohann@CS.Uni-Dortmund.DE> 86822001-11-30 Kai Großjohann <Kai.Grossjohann@CS.Uni-Dortmund.DE>
8635 8683
8636 * textmodes/paragraphs.el (mark-paragraph): Clarify doc. 8684 * textmodes/paragraphs.el (mark-paragraph): Clarify doc.
8637 Clarify error message. 8685 Clarify error message.
8638 8686
86392001-11-29 Kai Gro,A_(Bjohann <Kai.Grossjohann@CS.Uni-Dortmund.DE> 86872001-11-29 Kai Großjohann <Kai.Grossjohann@CS.Uni-Dortmund.DE>
8640 8688
8641 * textmodes/paragraphs.el (mark-paragraph): Allow prefix arg. 8689 * textmodes/paragraphs.el (mark-paragraph): Allow prefix arg.
8642 8690
@@ -8690,7 +8738,7 @@
8690 (Info-index): Use it. Add completion to the interactive spec. 8738 (Info-index): Use it. Add completion to the interactive spec.
8691 (Info-menu-update): Simplify call to `Info-complete-menu-item'. 8739 (Info-menu-update): Simplify call to `Info-complete-menu-item'.
8692 8740
86932001-11-29 Pavel Jan,Am(Bk <Pavel@Janik.cz> 87412001-11-29 Pavel Janík <Pavel@Janik.cz>
8694 8742
8695 * COPYING: Removed. 8743 * COPYING: Removed.
8696 8744
@@ -8707,7 +8755,7 @@
8707 (register-char-codings): Use it to cope with generic chars in 8755 (register-char-codings): Use it to cope with generic chars in
8708 safe-chars. 8756 safe-chars.
8709 8757
87102001-11-29 Pavel Jan,Am(Bk <Pavel@Janik.cz> 87582001-11-29 Pavel Janík <Pavel@Janik.cz>
8711 8759
8712 * play/blackbox.el (blackbox-mode, blackbox): Doc fix. 8760 * play/blackbox.el (blackbox-mode, blackbox): Doc fix.
8713 8761
@@ -8851,7 +8899,7 @@
8851 * frame.el (show-trailing-whitespace): Remove :set argument (the 8899 * frame.el (show-trailing-whitespace): Remove :set argument (the
8852 value was essentially identical to the defalt). 8900 value was essentially identical to the defalt).
8853 8901
88542001-11-26 Pavel Jan,Am(Bk <Pavel@Janik.cz> 89022001-11-26 Pavel Janík <Pavel@Janik.cz>
8855 8903
8856 * hexl.el (hexl-mode, hexl-follow-ascii): Remove make-local-hook. 8904 * hexl.el (hexl-mode, hexl-follow-ascii): Remove make-local-hook.
8857 8905
@@ -8915,7 +8963,7 @@
8915 8963
8916 * help-funs.el (describe-syntax): Put (interactive) after doc string. 8964 * help-funs.el (describe-syntax): Put (interactive) after doc string.
8917 8965
89182001-11-26 Pavel Jan,Am(Bk <Pavel@Janik.cz> 89662001-11-26 Pavel Janík <Pavel@Janik.cz>
8919 8967
8920 * international/quail.el (quail-help): Require help-mode in 8968 * international/quail.el (quail-help): Require help-mode in
8921 top-level instead. 8969 top-level instead.
@@ -8986,12 +9034,12 @@
8986 * language/devan-util.el: Comment out parts of the file 9034 * language/devan-util.el: Comment out parts of the file
8987 which apparently are garbled. 9035 which apparently are garbled.
8988 9036
89892001-11-25 Pavel Jan,Am(Bk <Pavel@Janik.cz> 90372001-11-25 Pavel Janík <Pavel@Janik.cz>
8990 9038
8991 * mail/smtpmail.el (smtpmail-deduce-address-list): Don't use 9039 * mail/smtpmail.el (smtpmail-deduce-address-list): Don't use
8992 insert-string. 9040 insert-string.
8993 9041
89942001-11-25 Pavel Jan,Am(Bk <Pavel@Janik.cz> 90422001-11-25 Pavel Janík <Pavel@Janik.cz>
8995 9043
8996 * play/snake.el (snake-mode): Remove make-local-hook. 9044 * play/snake.el (snake-mode): Remove make-local-hook.
8997 9045
@@ -9118,7 +9166,7 @@
9118 9166
9119 * international/encoded-kb.el: Don't alter minor-map-alist. 9167 * international/encoded-kb.el: Don't alter minor-map-alist.
9120 9168
91212001-11-20 Kai Gro,A_(Bjohann <Kai.Grossjohann@CS.Uni-Dortmund.DE> 91692001-11-20 Kai Großjohann <Kai.Grossjohann@CS.Uni-Dortmund.DE>
9122 9170
9123 * files.el (auto-save-file-name-transforms): Put remote files in 9171 * files.el (auto-save-file-name-transforms): Put remote files in
9124 temporary-file-directory rather than /tmp. 9172 temporary-file-directory rather than /tmp.
@@ -9476,7 +9524,7 @@
9476 Don't recognize a "telephone number" at the beginning of the name. 9524 Don't recognize a "telephone number" at the beginning of the name.
9477 (mail-extr-leading-garbage): Match non-word characters only. 9525 (mail-extr-leading-garbage): Match non-word characters only.
9478 9526
94792001-11-16 Pavel Jan,Am(Bk <Pavel@Janik.cz> 95272001-11-16 Pavel Janík <Pavel@Janik.cz>
9480 9528
9481 * startup.el (command-line-processed): Doc fix. 9529 * startup.el (command-line-processed): Doc fix.
9482 9530
@@ -9504,7 +9552,7 @@
9504 (multiple-value-apply, nth-value): Use defsubst rather than defalias 9552 (multiple-value-apply, nth-value): Use defsubst rather than defalias
9505 to get better doc strings. 9553 to get better doc strings.
9506 9554
95072001-11-15 Pavel Jan,Am(Bk <Pavel@Janik.cz> 95552001-11-15 Pavel Janík <Pavel@Janik.cz>
9508 9556
9509 * derived.el: Fix autoload cookie. 9557 * derived.el: Fix autoload cookie.
9510 9558
@@ -9699,7 +9747,7 @@
9699 (log-view-current-tag): Take an optional `where' arg. 9747 (log-view-current-tag): Take an optional `where' arg.
9700 (log-view-diff): New user command. 9748 (log-view-diff): New user command.
9701 9749
97022001-11-12 Pavel Jan,Am(Bk <Pavel@Janik.cz> 97502001-11-12 Pavel Janík <Pavel@Janik.cz>
9703 9751
9704 * progmodes/cpp.el (cpp-choose-face): Fix typo. 9752 * progmodes/cpp.el (cpp-choose-face): Fix typo.
9705 9753
@@ -9739,7 +9787,7 @@
9739 * calc/calc-ext.el (calc-init-extensions): Update autoload names 9787 * calc/calc-ext.el (calc-init-extensions): Update autoload names
9740 to match files renamed on initial calc import. 9788 to match files renamed on initial calc import.
9741 9789
97422001-11-12 Pavel Jan,Am(Bk <Pavel@Janik.cz> 97902001-11-12 Pavel Janík <Pavel@Janik.cz>
9743 9791
9744 * textmodes/flyspell.el (flyspell-default-dictionary): 9792 * textmodes/flyspell.el (flyspell-default-dictionary):
9745 Fix previous change. 9793 Fix previous change.
@@ -9782,7 +9830,7 @@
97822001-11-11 Colin Walters <walters@verbum.org> 98302001-11-11 Colin Walters <walters@verbum.org>
9783 9831
9784 The following changes are based on patches from 9832 The following changes are based on patches from
9785 Eli Zaretskii <eliz@is.elta.co.il>, Kai Gro,A_(Bjohann 9833 Eli Zaretskii <eliz@is.elta.co.il>, Kai Großjohann
9786 <Kai.Grossjohann@CS.Uni-Dortmund.DE>, and others. 9834 <Kai.Grossjohann@CS.Uni-Dortmund.DE>, and others.
9787 9835
9788 * calc/calc.el (toplevel): Require calc-macs. 9836 * calc/calc.el (toplevel): Require calc-macs.
@@ -9851,7 +9899,7 @@
9851 (radio-button-choice): Ditto. 9899 (radio-button-choice): Ditto.
9852 (editable-list): Ditto. 9900 (editable-list): Ditto.
9853 9901
98542001-11-09 Pavel Jan,Am(Bk <Pavel@Janik.cz> 99022001-11-09 Pavel Janík <Pavel@Janik.cz>
9855 9903
9856 * play/gomoku.el: Move definitions of constants to the beginning 9904 * play/gomoku.el: Move definitions of constants to the beginning
9857 of file, before their use. 9905 of file, before their use.
@@ -10127,7 +10175,7 @@
10127 (debugger-setup-buffer): Call it. 10175 (debugger-setup-buffer): Call it.
10128 (debugger-mode-map): Bind RET and mouse-2. 10176 (debugger-mode-map): Bind RET and mouse-2.
10129 10177
101302001-10-31 Pavel Jan,Am(Bk <Pavel@Janik.cz> 101782001-10-31 Pavel Janík <Pavel@Janik.cz>
10131 10179
10132 * startup.el: Document command line option --no-window-system 10180 * startup.el: Document command line option --no-window-system
10133 instead of --no-windows. 10181 instead of --no-windows.
@@ -10270,7 +10318,7 @@
10270 Report numbers of files skipped and failed too. 10318 Report numbers of files skipped and failed too.
10271 (byte-compile-file): Return 'no-byte-compile for skipped files. 10319 (byte-compile-file): Return 'no-byte-compile for skipped files.
10272 10320
102732001-10-29 Kai Gro,A_(Bjohann <Kai.Grossjohann@CS.Uni-Dortmund.DE> 103212001-10-29 Kai Großjohann <Kai.Grossjohann@CS.Uni-Dortmund.DE>
10274 10322
10275 * log-view.el (log-view-mode-map): Bind `M-n' and `M-p', not `M n' 10323 * log-view.el (log-view-mode-map): Bind `M-n' and `M-p', not `M n'
10276 and `M p'. 10324 and `M p'.
@@ -10620,7 +10668,7 @@
10620 * progmodes/compile.el (compilation-set-window-height): 10668 * progmodes/compile.el (compilation-set-window-height):
10621 Select old window only if it's still live. 10669 Select old window only if it's still live.
10622 10670
106232001-10-22 Pavel Jan,Am(Bk <Pavel@Janik.cz> 106712001-10-22 Pavel Janík <Pavel@Janik.cz>
10624 10672
10625 * help-mode.el (help-buffer): Remove debugging code. 10673 * help-mode.el (help-buffer): Remove debugging code.
10626 From Stefan Monnier <monnier@cs.yale.edu>. 10674 From Stefan Monnier <monnier@cs.yale.edu>.
diff --git a/lisp/textmodes/reftex-auc.el b/lisp/textmodes/reftex-auc.el
index 840bb889781..4546651da91 100644
--- a/lisp/textmodes/reftex-auc.el
+++ b/lisp/textmodes/reftex-auc.el
@@ -1,8 +1,8 @@
1;;; reftex-auc.el --- RefTeX's interface to AUC TeX 1;;; reftex-auc.el --- RefTeX's interface to AUC TeX
2;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc. 2;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.
3 3
4;; Author: Carsten Dominik <dominik@strw.LeidenUniv.nl> 4;; Author: Carsten Dominik <dominik@science.uva.nl>
5;; Version: 4.16 5;; Version: 4.17
6 6
7;; This file is part of GNU Emacs. 7;; This file is part of GNU Emacs.
8 8
diff --git a/lisp/textmodes/reftex-cite.el b/lisp/textmodes/reftex-cite.el
index 37833be278c..ebcfd991829 100644
--- a/lisp/textmodes/reftex-cite.el
+++ b/lisp/textmodes/reftex-cite.el
@@ -1,8 +1,8 @@
1;;; reftex-cite.el --- creating citations with RefTeX 1;;; reftex-cite.el --- creating citations with RefTeX
2;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc. 2;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.
3 3
4;; Author: Carsten Dominik <dominik@strw.LeidenUniv.nl> 4;; Author: Carsten Dominik <dominik@science.uva.nl>
5;; Version: 4.16 5;; Version: 4.17
6 6
7;; This file is part of GNU Emacs. 7;; This file is part of GNU Emacs.
8 8
@@ -53,6 +53,15 @@
53 53
54;; Find bibtex files 54;; Find bibtex files
55 55
56
57(defmacro reftex-with-special-syntax-for-bib (&rest body)
58 `(let ((saved-syntax (syntax-table)))
59 (unwind-protect
60 (progn
61 (set-syntax-table reftex-syntax-table-for-bib)
62 ,@body)
63 (set-syntax-table saved-syntax))))
64
56(defun reftex-default-bibliography () 65(defun reftex-default-bibliography ()
57 ;; Return the expanded value of `reftex-default-bibliography'. 66 ;; Return the expanded value of `reftex-default-bibliography'.
58 ;; The expanded value is cached. 67 ;; The expanded value is cached.
@@ -193,63 +202,64 @@
193 (message "Scanning bibliography database %s" buffer1)) 202 (message "Scanning bibliography database %s" buffer1))
194 203
195 (set-buffer buffer1) 204 (set-buffer buffer1)
196 (save-excursion 205 (reftex-with-special-syntax-for-bib
197 (goto-char (point-min)) 206 (save-excursion
198 (while (re-search-forward first-re nil t) 207 (goto-char (point-min))
199 (catch 'search-again 208 (while (re-search-forward first-re nil t)
200 (setq key-point (point)) 209 (catch 'search-again
201 (unless (re-search-backward 210 (setq key-point (point))
202 "\\(\\`\\|[\n\r]\\)[ \t]*@\\([a-zA-Z]+\\)[ \t\n\r]*[{(]" nil t) 211 (unless (re-search-backward
203 (throw 'search-again nil)) 212 "\\(\\`\\|[\n\r]\\)[ \t]*@\\([a-zA-Z]+\\)[ \t\n\r]*[{(]" nil t)
204 (setq start-point (point)) 213 (throw 'search-again nil))
205 (goto-char (match-end 0)) 214 (setq start-point (point))
206 (condition-case nil 215 (goto-char (match-end 0))
207 (up-list 1) 216 (condition-case nil
208 (error (goto-char key-point) 217 (up-list 1)
218 (error (goto-char key-point)
209 (throw 'search-again nil))) 219 (throw 'search-again nil)))
210 (setq end-point (point)) 220 (setq end-point (point))
211 221
212 ;; Ignore @string, @comment and @c entries or things 222 ;; Ignore @string, @comment and @c entries or things
213 ;; outside entries 223 ;; outside entries
214 (when (or (string= (downcase (match-string 2)) "string") 224 (when (or (string= (downcase (match-string 2)) "string")
215 (string= (downcase (match-string 2)) "comment") 225 (string= (downcase (match-string 2)) "comment")
216 (string= (downcase (match-string 2)) "c") 226 (string= (downcase (match-string 2)) "c")
217 (< (point) key-point)) ; this means match not in {} 227 (< (point) key-point)) ; this means match not in {}
218 (goto-char key-point) 228 (goto-char key-point)
219 (throw 'search-again nil)) 229 (throw 'search-again nil))
220 230
221 ;; Well, we have got a match 231 ;; Well, we have got a match
222 (setq entry (concat 232 (setq entry (concat
223 (buffer-substring start-point (point)) "\n")) 233 (buffer-substring start-point (point)) "\n"))
224 234
225 ;; Check if other regexp match as well 235 ;; Check if other regexp match as well
226 (setq re-list rest-re) 236 (setq re-list rest-re)
227 (while re-list 237 (while re-list
228 (unless (string-match (car re-list) entry) 238 (unless (string-match (car re-list) entry)
229 ;; nope - move on 239 ;; nope - move on
230 (throw 'search-again nil)) 240 (throw 'search-again nil))
231 (pop re-list)) 241 (pop re-list))
232 242
233 (setq alist (reftex-parse-bibtex-entry 243 (setq alist (reftex-parse-bibtex-entry
234 nil start-point end-point)) 244 nil start-point end-point))
235 (push (cons "&entry" entry) alist) 245 (push (cons "&entry" entry) alist)
236 246
237 ;; check for crossref entries 247 ;; check for crossref entries
238 (if (assoc "crossref" alist) 248 (if (assoc "crossref" alist)
239 (setq alist 249 (setq alist
240 (append 250 (append
241 alist (reftex-get-crossref-alist alist)))) 251 alist (reftex-get-crossref-alist alist))))
242 252
243 ;; format the entry 253 ;; format the entry
244 (push (cons "&formatted" (reftex-format-bib-entry alist)) 254 (push (cons "&formatted" (reftex-format-bib-entry alist))
245 alist) 255 alist)
246 256
247 ;; make key the first element 257 ;; make key the first element
248 (push (reftex-get-bib-field "&key" alist) alist) 258 (push (reftex-get-bib-field "&key" alist) alist)
249 259
250 ;; add it to the list 260 ;; add it to the list
251 (push alist found-list)))) 261 (push alist found-list)))))
252 (reftex-kill-temporary-buffers)))) 262 (reftex-kill-temporary-buffers))))
253 (setq found-list (nreverse found-list)) 263 (setq found-list (nreverse found-list))
254 264
255 ;; Sorting 265 ;; Sorting
@@ -390,6 +400,7 @@
390 (progn 400 (progn
391 (set-buffer (get-buffer-create " *RefTeX-scratch*")) 401 (set-buffer (get-buffer-create " *RefTeX-scratch*"))
392 (fundamental-mode) 402 (fundamental-mode)
403 (set-syntax-table reftex-syntax-table-for-bib)
393 (erase-buffer) 404 (erase-buffer)
394 (insert entry)) 405 (insert entry))
395 (widen) 406 (widen)
@@ -834,6 +845,7 @@ While entering the regexp, completion on knows citation keys is possible.
834 845
835(defun reftex-format-names (namelist n) 846(defun reftex-format-names (namelist n)
836 (let (last (len (length namelist))) 847 (let (last (len (length namelist)))
848 (if (= n 0) (setq n len))
837 (cond 849 (cond
838 ((< len 1) "") 850 ((< len 1) "")
839 ((= 1 len) (car namelist)) 851 ((= 1 len) (car namelist))
diff --git a/lisp/textmodes/reftex-dcr.el b/lisp/textmodes/reftex-dcr.el
index 8c179ff32b1..c0af53a9bc6 100644
--- a/lisp/textmodes/reftex-dcr.el
+++ b/lisp/textmodes/reftex-dcr.el
@@ -1,8 +1,8 @@
1;;; reftex-dcr.el --- viewing cross references and citations with RefTeX 1;;; reftex-dcr.el --- viewing cross references and citations with RefTeX
2;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc. 2;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.
3 3
4;; Author: Carsten Dominik <dominik@strw.LeidenUniv.nl> 4;; Author: Carsten Dominik <dominik@science.uva.nl>
5;; Version: 4.16 5;; Version: 4.17
6;; 6;;
7 7
8;; This file is part of GNU Emacs. 8;; This file is part of GNU Emacs.
diff --git a/lisp/textmodes/reftex-global.el b/lisp/textmodes/reftex-global.el
index 6810b80adfc..d19b45d76de 100644
--- a/lisp/textmodes/reftex-global.el
+++ b/lisp/textmodes/reftex-global.el
@@ -1,8 +1,8 @@
1;;; reftex-global.el --- operations on entire documents with RefTeX 1;;; reftex-global.el --- operations on entire documents with RefTeX
2;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc. 2;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.
3 3
4;; Author: Carsten Dominik <dominik@strw.LeidenUniv.nl> 4;; Author: Carsten Dominik <dominik@science.uva.nl>
5;; Version: 4.16 5;; Version: 4.17
6 6
7;; This file is part of GNU Emacs. 7;; This file is part of GNU Emacs.
8 8
diff --git a/lisp/textmodes/reftex-index.el b/lisp/textmodes/reftex-index.el
index 660dcfaadc2..5db364c371f 100644
--- a/lisp/textmodes/reftex-index.el
+++ b/lisp/textmodes/reftex-index.el
@@ -1,8 +1,8 @@
1;;; reftex-index.el --- index support with RefTeX 1;;; reftex-index.el --- index support with RefTeX
2;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc. 2;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.
3 3
4;; Author: Carsten Dominik <dominik@strw.LeidenUniv.nl> 4;; Author: Carsten Dominik <dominik@science.uva.nl>
5;; Version: 4.16 5;; Version: 4.17
6 6
7;; This file is part of GNU Emacs. 7;; This file is part of GNU Emacs.
8 8
@@ -1819,6 +1819,9 @@ both ends."
1819 (unwind-protect 1819 (unwind-protect
1820 (while (re-search-forward re nil t) 1820 (while (re-search-forward re nil t)
1821 (catch 'next-match 1821 (catch 'next-match
1822 (if (and (fboundp reftex-index-verify-function)
1823 (not (funcall reftex-index-verify-function)))
1824 (throw 'next-match nil))
1822 (setq match (match-string 0)) 1825 (setq match (match-string 0))
1823 (setq mathp 1826 (setq mathp
1824 (save-match-data 1827 (save-match-data
diff --git a/lisp/textmodes/reftex-parse.el b/lisp/textmodes/reftex-parse.el
index 1bb6a24bce5..3a42bc7d85b 100644
--- a/lisp/textmodes/reftex-parse.el
+++ b/lisp/textmodes/reftex-parse.el
@@ -1,8 +1,8 @@
1;;; reftex-parse.el --- parser functions for RefTeX 1;;; reftex-parse.el --- parser functions for RefTeX
2;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc. 2;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.
3 3
4;; Author: Carsten Dominik <dominik@strw.LeidenUniv.nl> 4;; Author: Carsten Dominik <dominik@science.uva.nl>
5;; Version: 4.16 5;; Version: 4.17
6;; 6;;
7 7
8;; This file is part of GNU Emacs. 8;; This file is part of GNU Emacs.
@@ -198,6 +198,7 @@ of master file."
198 toc-entry index-entry next-buf buf) 198 toc-entry index-entry next-buf buf)
199 199
200 (catch 'exit 200 (catch 'exit
201 (debug)
201 (setq file-found (reftex-locate-file file "tex" master-dir)) 202 (setq file-found (reftex-locate-file file "tex" master-dir))
202 (if (and (not file-found) 203 (if (and (not file-found)
203 (setq buf (reftex-get-buffer-visiting file))) 204 (setq buf (reftex-get-buffer-visiting file)))
@@ -334,7 +335,10 @@ of master file."
334 (save-excursion 335 (save-excursion
335 (goto-char (point-min)) 336 (goto-char (point-min))
336 (if (re-search-forward 337 (if (re-search-forward
337 "\\(\\`\\|[\n\r]\\)[ \t]*\\\\\\(no\\)?bibliography{[ \t]*\\([^}]+\\)" nil t) 338 (concat
339 "\\(\\`\\|[\n\r]\\)[^%]*\\\\\\("
340 (mapconcat 'identity reftex-bibliography-commands "\\|")
341 "\\){[ \t]*\\([^}]+\\)") nil t)
338 (setq files 342 (setq files
339 (split-string (reftex-match-string 3) 343 (split-string (reftex-match-string 3)
340 "[ \t\n\r]*,[ \t\n\r]*"))))) 344 "[ \t\n\r]*,[ \t\n\r]*")))))
diff --git a/lisp/textmodes/reftex-ref.el b/lisp/textmodes/reftex-ref.el
index 4db17b238b7..982062e12f9 100644
--- a/lisp/textmodes/reftex-ref.el
+++ b/lisp/textmodes/reftex-ref.el
@@ -1,8 +1,8 @@
1;;; reftex-ref.el --- code to create labels and references with RefTeX 1;;; reftex-ref.el --- code to create labels and references with RefTeX
2;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc. 2;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.
3 3
4;; Author: Carsten Dominik <dominik@strw.LeidenUniv.nl> 4;; Author: Carsten Dominik <dominik@science.uva.nl>
5;; Version: 4.16 5;; Version: 4.17
6 6
7;; This file is part of GNU Emacs. 7;; This file is part of GNU Emacs.
8 8
diff --git a/lisp/textmodes/reftex-sel.el b/lisp/textmodes/reftex-sel.el
index 05aadeeb03d..f59e2a1e03f 100644
--- a/lisp/textmodes/reftex-sel.el
+++ b/lisp/textmodes/reftex-sel.el
@@ -1,8 +1,8 @@
1;;; reftex-sel.el --- the selection modes for RefTeX 1;;; reftex-sel.el --- the selection modes for RefTeX
2;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc. 2;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.
3 3
4;; Author: Carsten Dominik <dominik@strw.LeidenUniv.nl> 4;; Author: Carsten Dominik <dominik@science.uva.nl>
5;; Version: 4.16 5;; Version: 4.17
6 6
7;; This file is part of GNU Emacs. 7;; This file is part of GNU Emacs.
8 8
diff --git a/lisp/textmodes/reftex-toc.el b/lisp/textmodes/reftex-toc.el
index 2ec1040d190..15685939815 100644
--- a/lisp/textmodes/reftex-toc.el
+++ b/lisp/textmodes/reftex-toc.el
@@ -1,8 +1,8 @@
1;;; reftex-toc.el --- RefTeX's table of contents mode 1;;; reftex-toc.el --- RefTeX's table of contents mode
2;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc. 2;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.
3 3
4;; Author: Carsten Dominik <dominik@strw.LeidenUniv.nl> 4;; Author: Carsten Dominik <dominik@science.uva.nl>
5;; Version: 4.16 5;; Version: 4.17
6 6
7;; This file is part of GNU Emacs. 7;; This file is part of GNU Emacs.
8 8
@@ -72,6 +72,7 @@ Here are all local bindings.
72 "Stores the file name from which `reftex-toc' was called. For redo command.") 72 "Stores the file name from which `reftex-toc' was called. For redo command.")
73 73
74(defvar reftex-last-window-height nil) 74(defvar reftex-last-window-height nil)
75(defvar reftex-last-window-width nil)
75(defvar reftex-toc-include-labels-indicator nil) 76(defvar reftex-toc-include-labels-indicator nil)
76(defvar reftex-toc-include-index-indicator nil) 77(defvar reftex-toc-include-index-indicator nil)
77(defvar reftex-toc-max-level-indicator nil) 78(defvar reftex-toc-max-level-indicator nil)
@@ -127,7 +128,7 @@ When called with a raw C-u prefix, rescan the document first."
127 (docstruct-symbol reftex-docstruct-symbol) 128 (docstruct-symbol reftex-docstruct-symbol)
128 (xr-data (assq 'xr (symbol-value reftex-docstruct-symbol))) 129 (xr-data (assq 'xr (symbol-value reftex-docstruct-symbol)))
129 (xr-alist (cons (cons "" (buffer-file-name)) (nth 1 xr-data))) 130 (xr-alist (cons (cons "" (buffer-file-name)) (nth 1 xr-data)))
130 (here-I-am (if rebuild 131 (here-I-am (if rebuild
131 (get 'reftex-toc :reftex-data) 132 (get 'reftex-toc :reftex-data)
132 (car (reftex-where-am-I)))) 133 (car (reftex-where-am-I))))
133 offset) 134 offset)
@@ -137,8 +138,14 @@ When called with a raw C-u prefix, rescan the document first."
137 (when (or (not reftex-toc-keep-other-windows) 138 (when (or (not reftex-toc-keep-other-windows)
138 (< (window-height) (* 2 window-min-height))) 139 (< (window-height) (* 2 window-min-height)))
139 (delete-other-windows)) 140 (delete-other-windows))
140 (setq reftex-last-window-height (window-height)) ; remember 141
141 (split-window) 142 (setq reftex-last-window-width (window-width)
143 reftex-last-window-height (window-height)) ; remember
144 (if reftex-toc-split-windows-horizontally
145 (split-window-horizontally
146 (floor (* (frame-width) reftex-toc-split-windows-horizontally-fraction)))
147 (split-window))
148
142 (let ((default-major-mode 'reftex-toc-mode)) 149 (let ((default-major-mode 'reftex-toc-mode))
143 (switch-to-buffer "*toc*"))) 150 (switch-to-buffer "*toc*")))
144 151
@@ -237,9 +244,13 @@ SPC=view TAB=goto RET=goto+hide [q]uit [r]escan [l]abels [f]ollow [x]r [?]Help
237 244
238(defun reftex-re-enlarge () 245(defun reftex-re-enlarge ()
239 ;; Enlarge windiw to a remembered size 246 ;; Enlarge windiw to a remembered size
240 (enlarge-window 247 (if reftex-toc-split-windows-horizontally
241 (max 0 (- (or reftex-last-window-height (window-height)) 248 (enlarge-window-horizontally
242 (window-height))))) 249 (max 0 (- (or reftex-last-window-width (window-width))
250 (window-width))))
251 (enlarge-window
252 (max 0 (- (or reftex-last-window-height (window-height))
253 (window-height))))))
243 254
244(defun reftex-toc-show-help () 255(defun reftex-toc-show-help ()
245 "Show a summary of special key bindings." 256 "Show a summary of special key bindings."
diff --git a/lisp/textmodes/reftex-vars.el b/lisp/textmodes/reftex-vars.el
index eac9d644d6f..05588d712e6 100644
--- a/lisp/textmodes/reftex-vars.el
+++ b/lisp/textmodes/reftex-vars.el
@@ -1,8 +1,8 @@
1;;; reftex-vars.el --- configuration variables for RefTeX 1;;; reftex-vars.el --- configuration variables for RefTeX
2;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc. 2;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.
3 3
4;; Author: Carsten Dominik <dominik@strw.LeidenUniv.nl> 4;; Author: Carsten Dominik <dominik@science.uva.nl>
5;; Version: 4.16 5;; Version: 4.17
6 6
7;; This file is part of GNU Emacs. 7;; This file is part of GNU Emacs.
8 8
@@ -136,7 +136,8 @@ distribution. Mixed-case symbols are convenience aliases.")
136 (?s . "\\citep[see][]{%l}") 136 (?s . "\\citep[see][]{%l}")
137 (?a . "\\citeauthor{%l}") 137 (?a . "\\citeauthor{%l}")
138 (?A . "\\citeauthor*{%l}") 138 (?A . "\\citeauthor*{%l}")
139 (?y . "\\citeyear{%l}"))) 139 (?y . "\\citeyear{%l}")
140 (?n . "\\nocite{%l}")))
140 (bibentry "The Bibentry package" 141 (bibentry "The Bibentry package"
141 "\\bibentry{%l}") 142 "\\bibentry{%l}")
142 (harvard "The Harvard package" 143 (harvard "The Harvard package"
@@ -205,12 +206,57 @@ distribution. Mixed-case symbols are convenience aliases.")
205 :prefix "reftex-" 206 :prefix "reftex-"
206 :group 'tex) 207 :group 'tex)
207 208
209
208;; Table of contents configuration -------------------------------------- 210;; Table of contents configuration --------------------------------------
209 211
210(defgroup reftex-table-of-contents-browser nil 212(defgroup reftex-table-of-contents-browser nil
211 "A multifile table of contents browser." 213 "A multifile table of contents browser."
212 :group 'reftex) 214 :group 'reftex)
213 215
216(defcustom reftex-include-file-commands '("include" "input")
217 "LaTeX commands which input another file.
218The file name is expected after the command, either in braces or separated
219by whitespace."
220 :group 'reftex-table-of-contents-browser
221 :type '(repeat string))
222
223(defcustom reftex-max-section-depth 12
224 "Maximum depth of section levels in document structure.
225Standard LaTeX needs default is 7, but there are packages for which this
226needs to be larger."
227 :group 'reftex-table-of-contents-browser
228 :type 'integer)
229
230;; LaTeX section commands and level numbers
231(defcustom reftex-section-levels
232 '(
233 ("part" . 0)
234 ("chapter" . 1)
235 ("section" . 2)
236 ("subsection" . 3)
237 ("subsubsection" . 4)
238 ("paragraph" . 5)
239 ("subparagraph" . 6)
240 ("subsubparagraph" . 7)
241 ("addchap" . -1) ; KOMA-Script
242 ("addsec" . -2) ; KOMA-Script
243;;; ("minisec" . -7) ; KOMA-Script
244 )
245 "Commands and levels used for defining sections in the document.
246This is an alist with each element like (COMMAND-NAME . LEVEL).
247The car of each cons cell is the name of the section macro (without
248the backslash). The cdr is a number indicating its level. A negative
249level means the same level as the positive value, but the section will
250never get a number. The cdr may also be a function which will be called
251to after the section-re matched to determine the level."
252 :group 'reftex-table-of-contents-browser
253 :set 'reftex-set-dirty
254 :type '(repeat
255 (cons (string :tag "sectioning macro" "")
256 (choice
257 (number :tag "level " 0)
258 (symbol :tag "function " my-level-func)))))
259
214(defcustom reftex-toc-max-level 100 260(defcustom reftex-toc-max-level 100
215 "*The maximum level of toc entries which will be included in the TOC. 261 "*The maximum level of toc entries which will be included in the TOC.
216Section headings with a bigger level will be ignored. In RefTeX, chapters 262Section headings with a bigger level will be ignored. In RefTeX, chapters
@@ -219,6 +265,17 @@ This variable can be changed from within the *toc* buffer with the `t' key."
219 :group 'reftex-table-of-contents-browser 265 :group 'reftex-table-of-contents-browser
220 :type 'integer) 266 :type 'integer)
221 267
268(defcustom reftex-toc-split-windows-horizontally nil
269 "*Non-nil means, create TOC window by splitting window horizontally."
270 :group 'reftex-table-of-contents-browser
271 :type 'boolean)
272
273(defcustom reftex-toc-split-windows-horizontally-fraction .5
274 "*Fraction of the horizontal width of the frame to be used for TOC window.
275Only relevant when `reftex-toc-split-windows-horizontally' is non-nil."
276 :group 'reftex-table-of-contents-browser
277 :type 'number)
278
222(defcustom reftex-toc-keep-other-windows t 279(defcustom reftex-toc-keep-other-windows t
223 "*Non-nil means, split the selected window to display the *toc* buffer. 280 "*Non-nil means, split the selected window to display the *toc* buffer.
224This helps to keep the window configuration, but makes the *toc* small. 281This helps to keep the window configuration, but makes the *toc* small.
@@ -479,43 +536,6 @@ list. However, builtin defaults should normally be set with the variable
479 (nth 0 x))) 536 (nth 0 x)))
480 reftex-label-alist-builtin))))) 537 reftex-label-alist-builtin)))))
481 538
482(defcustom reftex-max-section-depth 12
483 "Maximum depth of section levels in document structure.
484Standard LaTeX needs default is 7, but there are packages for which this
485needs to be larger."
486 :group 'reftex-defining-label-environments
487 :type 'integer)
488
489;; LaTeX section commands and level numbers
490(defcustom reftex-section-levels
491 '(
492 ("part" . 0)
493 ("chapter" . 1)
494 ("section" . 2)
495 ("subsection" . 3)
496 ("subsubsection" . 4)
497 ("paragraph" . 5)
498 ("subparagraph" . 6)
499 ("subsubparagraph" . 7)
500 ("addchap" . -1) ; KOMA-Script
501 ("addsec" . -2) ; KOMA-Script
502;;; ("minisec" . -7) ; KOMA-Script
503 )
504 "Commands and levels used for defining sections in the document.
505This is an alist with each element like (COMMAND-NAME . LEVEL).
506The car of each cons cell is the name of the section macro (without
507the backslash). The cdr is a number indicating its level. A negative
508level means the same level as the positive value, but the section will
509never get a number. The cdr may also be a function which will be called
510to after the section-re matched to determine the level."
511 :group 'reftex-defining-label-environments
512 :set 'reftex-set-dirty
513 :type '(repeat
514 (cons (string :tag "sectioning macro" "")
515 (choice
516 (number :tag "level " 0)
517 (symbol :tag "function " my-level-func)))))
518
519(defcustom reftex-section-prefixes '((0 . "part:") (1 . "cha:") (t . "sec:")) 539(defcustom reftex-section-prefixes '((0 . "part:") (1 . "cha:") (t . "sec:"))
520 "Prefixes for section labels. 540 "Prefixes for section labels.
521When the label prefix given in an entry in `reftex-label-alist' contains `%S', 541When the label prefix given in an entry in `reftex-label-alist' contains `%S',
@@ -855,6 +875,12 @@ string to insert into the buffer."
855 "Support for referencing bibliographic data with BibTeX." 875 "Support for referencing bibliographic data with BibTeX."
856 :group 'reftex) 876 :group 'reftex)
857 877
878(defcustom reftex-bibliography-commands '("bibliography" "nobibliography")
879 "LaTeX commands which specify the BibTeX databases to use with the document."
880 :group 'reftex-citation-support
881 :type '(repeat string))
882
883
858(defvar reftex-bibfile-ignore-list nil) ; compatibility 884(defvar reftex-bibfile-ignore-list nil) ; compatibility
859(defcustom reftex-bibfile-ignore-regexps nil 885(defcustom reftex-bibfile-ignore-regexps nil
860 "*List of regular expressions to exclude files in \\bibliography{..}. 886 "*List of regular expressions to exclude files in \\bibliography{..}.
@@ -898,7 +924,7 @@ If `reftex-cite-format' is a string, it will be used as the format.
898In the format, the following percent escapes will be expanded. 924In the format, the following percent escapes will be expanded.
899 925
900%l The BibTeX label of the citation. 926%l The BibTeX label of the citation.
901%a List of author names, see also `reftex-cite-punctuation. 927%a List of author names, see also `reftex-cite-punctuation'.
902%2a Like %a, but abbreviate more than 2 authors like Jones et al. 928%2a Like %a, but abbreviate more than 2 authors like Jones et al.
903%A First author name only. 929%A First author name only.
904%e Works like %a, but on list of editor names. (%2e and %E work a well) 930%e Works like %a, but on list of editor names. (%2e and %E work a well)
@@ -1175,6 +1201,14 @@ at one of these points, no word boundary is required there."
1175 :group 'reftex-index-support 1201 :group 'reftex-index-support
1176 :type 'boolean) 1202 :type 'boolean)
1177 1203
1204(defcustom reftex-index-verify-function nil
1205 "A function which is called at each match during global indexing.
1206If the function returns nil, the current match is skipped."
1207 :group 'reftex-index-support
1208 :type '(choice
1209 (const :tag "No verification" nil)
1210 (function)))
1211
1178(defcustom reftex-index-phrases-skip-indexed-matches nil 1212(defcustom reftex-index-phrases-skip-indexed-matches nil
1179 "*Non-nil means, skip matches which appear to be indexed already. 1213 "*Non-nil means, skip matches which appear to be indexed already.
1180When doing global indexing from the phrases buffer, searches for some 1214When doing global indexing from the phrases buffer, searches for some
diff --git a/lisp/textmodes/reftex.el b/lisp/textmodes/reftex.el
index 8db74a41090..2dca200c0ec 100644
--- a/lisp/textmodes/reftex.el
+++ b/lisp/textmodes/reftex.el
@@ -1,8 +1,8 @@
1;;; reftex.el --- minor mode for doing \label, \ref, \cite, \index in LaTeX 1;;; reftex.el --- minor mode for doing \label, \ref, \cite, \index in LaTeX
2;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc. 2;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.
3 3
4;; Author: Carsten Dominik <dominik@strw.LeidenUniv.nl> 4;; Author: Carsten Dominik <dominik@science.uva.nl>
5;; Version: 4.16 5;; Version: 4.17
6;; Keywords: tex 6;; Keywords: tex
7 7
8;; This file is part of GNU Emacs. 8;; This file is part of GNU Emacs.
@@ -300,7 +300,7 @@
300;;; Define the formal stuff for a minor mode named RefTeX. 300;;; Define the formal stuff for a minor mode named RefTeX.
301;;; 301;;;
302 302
303(defconst reftex-version "RefTeX version 4.16" 303(defconst reftex-version "RefTeX version 4.17"
304 "Version string for RefTeX.") 304 "Version string for RefTeX.")
305 305
306(defvar reftex-mode nil 306(defvar reftex-mode nil
@@ -312,6 +312,7 @@
312 312
313(defvar reftex-mode-menu nil) 313(defvar reftex-mode-menu nil)
314(defvar reftex-syntax-table nil) 314(defvar reftex-syntax-table nil)
315(defvar reftex-syntax-table-for-bib nil)
315 316
316(defvar reftex-auto-view-crossref-timer nil 317(defvar reftex-auto-view-crossref-timer nil
317 "The timer used for auto-view-crossref.") 318 "The timer used for auto-view-crossref.")
@@ -371,6 +372,12 @@ on the menu bar.
371 (setq reftex-syntax-table (copy-syntax-table (syntax-table))) 372 (setq reftex-syntax-table (copy-syntax-table (syntax-table)))
372 (modify-syntax-entry ?\( "." reftex-syntax-table) 373 (modify-syntax-entry ?\( "." reftex-syntax-table)
373 (modify-syntax-entry ?\) "." reftex-syntax-table)) 374 (modify-syntax-entry ?\) "." reftex-syntax-table))
375 (unless reftex-syntax-table-for-bib
376 (setq reftex-syntax-table-for-bib (copy-syntax-table reftex-syntax-table))
377 (modify-syntax-entry ?\' "." reftex-syntax-table-for-bib)
378 (modify-syntax-entry ?\" "." reftex-syntax-table-for-bib)
379 (modify-syntax-entry ?\[ "." reftex-syntax-table-for-bib)
380 (modify-syntax-entry ?\] "." reftex-syntax-table-for-bib))
374 (run-hooks 'reftex-mode-hook)) 381 (run-hooks 'reftex-mode-hook))
375 ;; Mode was turned off 382 ;; Mode was turned off
376 (easy-menu-remove reftex-mode-menu))) 383 (easy-menu-remove reftex-mode-menu)))
@@ -610,49 +617,49 @@ the label information is recompiled on next use."
610;; The following constants are derived from `reftex-label-alist'. 617;; The following constants are derived from `reftex-label-alist'.
611 618
612;; Prompt used for label type queries directed to the user. 619;; Prompt used for label type queries directed to the user.
613(defconst reftex-type-query-prompt nil) 620(defvar reftex-type-query-prompt nil)
614 621
615;; Help string for label type queries. 622;; Help string for label type queries.
616(defconst reftex-type-query-help nil) 623(defvar reftex-type-query-help nil)
617 624
618;; Alist relating label type to reference format. 625;; Alist relating label type to reference format.
619(defconst reftex-typekey-to-format-alist nil) 626(defvar reftex-typekey-to-format-alist nil)
620 627
621;; Alist relating label type to label prefix. 628;; Alist relating label type to label prefix.
622(defconst reftex-typekey-to-prefix-alist nil) 629(defvar reftex-typekey-to-prefix-alist nil)
623 630
624;; Alist relating environments or macros to label type and context regexp. 631;; Alist relating environments or macros to label type and context regexp.
625(defconst reftex-env-or-mac-alist nil) 632(defvar reftex-env-or-mac-alist nil)
626 633
627;; List of special environment parser functions 634;; List of special environment parser functions
628(defconst reftex-special-env-parsers nil) 635(defvar reftex-special-env-parsers nil)
629 636
630;; List of macros carrying a label. 637;; List of macros carrying a label.
631(defconst reftex-label-mac-list nil) 638(defvar reftex-label-mac-list nil)
632 639
633;; List of environments carrying a label. 640;; List of environments carrying a label.
634(defconst reftex-label-env-list nil) 641(defvar reftex-label-env-list nil)
635 642
636;; List of all typekey letters in use. 643;; List of all typekey letters in use.
637(defconst reftex-typekey-list nil) 644(defvar reftex-typekey-list nil)
638 645
639;; Alist relating magic words to a label type. 646;; Alist relating magic words to a label type.
640(defconst reftex-words-to-typekey-alist nil) 647(defvar reftex-words-to-typekey-alist nil)
641 648
642;; The last list-of-labels entry used in a reference. 649;; The last list-of-labels entry used in a reference.
643(defvar reftex-last-used-reference (list nil nil nil nil)) 650(defvar reftex-last-used-reference (list nil nil nil nil))
644 651
645;; Alist relating index macros to other info. 652;; Alist relating index macros to other info.
646(defconst reftex-key-to-index-macro-alist nil) 653(defvar reftex-key-to-index-macro-alist nil)
647;; Prompt for index macro queries 654;; Prompt for index macro queries
648(defconst reftex-query-index-macro-prompt nil) 655(defvar reftex-query-index-macro-prompt nil)
649;; Help string for index macro queries 656;; Help string for index macro queries
650(defconst reftex-query-index-macro-help nil) 657(defvar reftex-query-index-macro-help nil)
651 658
652;; The message when follow-mode is suspended 659;; The message when follow-mode is suspended
653(defconst reftex-no-follow-message 660(defvar reftex-no-follow-message
654 "No follow-mode into unvisited file. Press SPC to visit it.") 661 "No follow-mode into unvisited file. Press SPC to visit it.")
655(defconst reftex-no-info-message 662(defvar reftex-no-info-message
656 "%s: info not available, use `\\[reftex-view-crossref]' to get it.") 663 "%s: info not available, use `\\[reftex-view-crossref]' to get it.")
657 664
658;; Global variables used for communication between functions. 665;; Global variables used for communication between functions.
@@ -1092,9 +1099,15 @@ This enforces rescanning the buffer on next use."
1092 reftex-section-levels)) 1099 reftex-section-levels))
1093 1100
1094 ;; Calculate the regular expressions 1101 ;; Calculate the regular expressions
1095 (let* ((wbol "\\(\\`\\|[\n\r]\\)[ \t]*") 1102 (let* (
1103; (wbol "\\(\\`\\|[\n\r]\\)[ \t]*")
1104 (wbol "\\(\\`\\|[\n\r]\\)[ \t]*")
1096 (label-re "\\\\label{\\([^}]*\\)}") 1105 (label-re "\\\\label{\\([^}]*\\)}")
1097 (include-re (concat wbol "\\\\\\(include\\|input\\)[{ \t]+\\([^} \t\n\r]+\\)")) 1106 (include-re (concat wbol
1107 "\\\\\\("
1108 (mapconcat 'identity
1109 reftex-include-file-commands "\\|")
1110 "\\)[{ \t]+\\([^} \t\n\r]+\\)"))
1098 (section-re 1111 (section-re
1099 (concat wbol "\\\\\\(" 1112 (concat wbol "\\\\\\("
1100 (mapconcat (lambda (x) (regexp-quote (car x))) 1113 (mapconcat (lambda (x) (regexp-quote (car x)))