aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJuanma Barranquero2011-11-15 01:54:19 +0100
committerJuanma Barranquero2011-11-15 01:54:19 +0100
commit0d26e0b62b7d01e3cb6eb57943269b8f25e53cd6 (patch)
tree784b0f664bd50cf4bc244141190d8b9c92973835
parent947cd66b9611a5c4c4eb60238022e72fe51e2e46 (diff)
downloademacs-0d26e0b62b7d01e3cb6eb57943269b8f25e53cd6.tar.gz
emacs-0d26e0b62b7d01e3cb6eb57943269b8f25e53cd6.zip
Fix typos.
-rw-r--r--doc/misc/ChangeLog4
-rw-r--r--doc/misc/ede.texi2
-rw-r--r--lisp/ChangeLog7
-rw-r--r--lisp/ChangeLog.112
-rw-r--r--lisp/allout.el2
-rw-r--r--lisp/cedet/ChangeLog4
-rw-r--r--lisp/cedet/ede/project-am.el2
-rw-r--r--lisp/cedet/mode-local.el2
-rw-r--r--lisp/emulation/viper-util.el2
-rw-r--r--lisp/epg.el22
-rw-r--r--lisp/erc/ChangeLog.012
-rw-r--r--lisp/erc/ChangeLog.024
-rw-r--r--lisp/erc/ChangeLog.035
-rw-r--r--lisp/erc/ChangeLog.042
-rw-r--r--lisp/gnus/ChangeLog6
-rw-r--r--lisp/gnus/shr-color.el13
-rw-r--r--lisp/mh-e/ChangeLog.110
-rw-r--r--lisp/progmodes/cc-awk.el26
-rw-r--r--lisp/progmodes/cc-engine.el8
-rw-r--r--lisp/progmodes/cc-mode.el8
-rw-r--r--lisp/progmodes/cperl-mode.el2
-rw-r--r--lisp/progmodes/verilog-mode.el4
-rw-r--r--src/ChangeLog.82
-rw-r--r--src/ralloc.c16
-rw-r--r--src/xterm.h2
25 files changed, 91 insertions, 68 deletions
diff --git a/doc/misc/ChangeLog b/doc/misc/ChangeLog
index ec12b77e826..10e62b7d25f 100644
--- a/doc/misc/ChangeLog
+++ b/doc/misc/ChangeLog
@@ -1,3 +1,7 @@
12011-11-15 Juanma Barranquero <lekktu@gmail.com>
2
3 * ede.texi (project-am-texinfo): Fix typo.
4
12011-11-14 Juanma Barranquero <lekktu@gmail.com> 52011-11-14 Juanma Barranquero <lekktu@gmail.com>
2 6
3 * ediff.texi (Hooks): 7 * ediff.texi (Hooks):
diff --git a/doc/misc/ede.texi b/doc/misc/ede.texi
index 13b640a09fe..fc85f325a54 100644
--- a/doc/misc/ede.texi
+++ b/doc/misc/ede.texi
@@ -3273,7 +3273,7 @@ Return the default macro to 'edit' for this object type.
3273@end deffn 3273@end deffn
3274 3274
3275@deffn Method project-compile-target-command :AFTER this 3275@deffn Method project-compile-target-command :AFTER this
3276Default target t- use when compling a texinfo file. 3276Default target t- use when compiling a texinfo file.
3277@end deffn 3277@end deffn
3278 3278
3279@deffn Method ede-documentation :AFTER this 3279@deffn Method ede-documentation :AFTER this
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index dcd72b8a5fb..c6f5f3bfd4b 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,10 @@
12011-11-15 Juanma Barranquero <lekktu@gmail.com>
2
3 * epg.el (epg-start-decrypt, epg-start-verify, epg-start-sign)
4 (epg-start-encrypt, epg-start-export-keys, epg-start-import-keys)
5 (epg-start-receive-keys, epg-start-delete-keys, epg-start-sign-keys)
6 (epg-start-generate-key, epg-context-set-progress-callback): Fix typos.
7
12011-11-15 Glenn Morris <rgm@gnu.org> 82011-11-15 Glenn Morris <rgm@gnu.org>
2 9
3 * simple.el (mark-whole-buffer): Doc fix. (Bug#10023) 10 * simple.el (mark-whole-buffer): Doc fix. (Bug#10023)
diff --git a/lisp/ChangeLog.11 b/lisp/ChangeLog.11
index 76bac50c4b8..08bd70926b4 100644
--- a/lisp/ChangeLog.11
+++ b/lisp/ChangeLog.11
@@ -5283,7 +5283,7 @@
5283 (disabled-command-function): Function renamed from 5283 (disabled-command-function): Function renamed from
5284 `disabled-command-hook'. Adapt code to name change of the variable. 5284 `disabled-command-hook'. Adapt code to name change of the variable.
5285 5285
52862004-08-07 Satyaki Das <satyaki@theforce.stanford.edu> (tiny change) 52862004-08-07 Satyaki Das <satyaki@theforce.stanford.edu>
5287 5287
5288 * simple.el (completion-root-regexp): New defvar. 5288 * simple.el (completion-root-regexp): New defvar.
5289 (completion-setup-function): Use it instead of a literal string. 5289 (completion-setup-function): Use it instead of a literal string.
diff --git a/lisp/allout.el b/lisp/allout.el
index 9eeddb207ff..df2a21ffb2c 100644
--- a/lisp/allout.el
+++ b/lisp/allout.el
@@ -2525,7 +2525,7 @@ Outermost is first."
2525(defun allout-mark-active-p () 2525(defun allout-mark-active-p ()
2526 "True if the mark is currently or always active." 2526 "True if the mark is currently or always active."
2527 ;; `(cond (boundp...))' (or `(if ...)') invokes special byte-compiler 2527 ;; `(cond (boundp...))' (or `(if ...)') invokes special byte-compiler
2528 ;; provisions, at least in fsf emacs to prevent warnings about lack of, 2528 ;; provisions, at least in GNU Emacs to prevent warnings about lack of,
2529 ;; eg, region-active-p. 2529 ;; eg, region-active-p.
2530 (cond ((boundp 'mark-active) 2530 (cond ((boundp 'mark-active)
2531 mark-active) 2531 mark-active)
diff --git a/lisp/cedet/ChangeLog b/lisp/cedet/ChangeLog
index 0d621ad640a..7d70e83200d 100644
--- a/lisp/cedet/ChangeLog
+++ b/lisp/cedet/ChangeLog
@@ -1,3 +1,7 @@
12011-11-15 Juanma Barranquero <lekktu@gmail.com>
2
3 * ede/project-am.el (project-compile-target-command): Fix typo.
4
12011-11-14 Juanma Barranquero <lekktu@gmail.com> 52011-11-14 Juanma Barranquero <lekktu@gmail.com>
2 6
3 * ede/auto.el (ede-project-autoload): 7 * ede/auto.el (ede-project-autoload):
diff --git a/lisp/cedet/ede/project-am.el b/lisp/cedet/ede/project-am.el
index ec54d8151bc..c1e656e8459 100644
--- a/lisp/cedet/ede/project-am.el
+++ b/lisp/cedet/ede/project-am.el
@@ -836,7 +836,7 @@ nil means that this buffer belongs to no-one."
836 (oref this :name)) 836 (oref this :name))
837 837
838(defmethod project-compile-target-command ((this project-am-texinfo)) 838(defmethod project-compile-target-command ((this project-am-texinfo))
839 "Default target t- use when compling a texinfo file." 839 "Default target t- use when compiling a texinfo file."
840 (let ((n (oref this :name))) 840 (let ((n (oref this :name)))
841 (if (string-match "\\.texi?\\(nfo\\)?" n) 841 (if (string-match "\\.texi?\\(nfo\\)?" n)
842 (setq n (replace-match ".info" t t n))) 842 (setq n (replace-match ".info" t t n)))
diff --git a/lisp/cedet/mode-local.el b/lisp/cedet/mode-local.el
index 52bfaab5d25..0e7657642c2 100644
--- a/lisp/cedet/mode-local.el
+++ b/lisp/cedet/mode-local.el
@@ -637,7 +637,7 @@ SYMBOL is a function that can be overridden."
637 637
638(defun mode-local-print-bindings (table) 638(defun mode-local-print-bindings (table)
639 "Print bindings in TABLE." 639 "Print bindings in TABLE."
640 (let (us ;; List of unpecified symbols 640 (let (us ;; List of unspecified symbols
641 mc ;; List of mode local constants 641 mc ;; List of mode local constants
642 mv ;; List of mode local variables 642 mv ;; List of mode local variables
643 ov ;; List of overloaded functions 643 ov ;; List of overloaded functions
diff --git a/lisp/emulation/viper-util.el b/lisp/emulation/viper-util.el
index c80dd31a8f0..fcab8b57c1e 100644
--- a/lisp/emulation/viper-util.el
+++ b/lisp/emulation/viper-util.el
@@ -871,7 +871,7 @@ Otherwise return the normal value."
871 (abbreviate-file-name file))) 871 (abbreviate-file-name file)))
872 872
873;; Sit for VAL milliseconds. XEmacs doesn't support the millisecond arg 873;; Sit for VAL milliseconds. XEmacs doesn't support the millisecond arg
874;; in sit-for, so this function smoothes out the differences. 874;; in sit-for, so this function smooths out the differences.
875(defsubst viper-sit-for-short (val &optional nodisp) 875(defsubst viper-sit-for-short (val &optional nodisp)
876 (sit-for (/ val 1000.0) nodisp)) 876 (sit-for (/ val 1000.0) nodisp))
877 877
diff --git a/lisp/epg.el b/lisp/epg.el
index 9ca07e213b4..00c00f9c9d3 100644
--- a/lisp/epg.el
+++ b/lisp/epg.el
@@ -356,7 +356,7 @@ query by itself and Emacs can intercept them."
356PROGRESS-CALLBACK is either a function, or a cons-cell whose 356PROGRESS-CALLBACK is either a function, or a cons-cell whose
357car is a function and cdr is a callback data. 357car is a function and cdr is a callback data.
358 358
359The function gets five arguments: the context, the operation 359The function gets six arguments: the context, the operation
360description, the character to display a progress unit, the 360description, the character to display a progress unit, the
361current amount done, the total amount to be done, and the 361current amount done, the total amount to be done, and the
362callback data (if any)." 362callback data (if any)."
@@ -2031,7 +2031,7 @@ CIPHER must be a file data object.
2031 2031
2032If you use this function, you will need to wait for the completion of 2032If you use this function, you will need to wait for the completion of
2033`epg-gpg-program' by using `epg-wait-for-completion' and call 2033`epg-gpg-program' by using `epg-wait-for-completion' and call
2034`epg-reset' to clear a temporaly output file. 2034`epg-reset' to clear a temporary output file.
2035If you are unsure, use synchronous version of this function 2035If you are unsure, use synchronous version of this function
2036`epg-decrypt-file' or `epg-decrypt-string' instead." 2036`epg-decrypt-file' or `epg-decrypt-string' instead."
2037 (unless (epg-data-file cipher) 2037 (unless (epg-data-file cipher)
@@ -2097,7 +2097,7 @@ For a normal or a cleartext signature, SIGNED-TEXT should be nil.
2097 2097
2098If you use this function, you will need to wait for the completion of 2098If you use this function, you will need to wait for the completion of
2099`epg-gpg-program' by using `epg-wait-for-completion' and call 2099`epg-gpg-program' by using `epg-wait-for-completion' and call
2100`epg-reset' to clear a temporaly output file. 2100`epg-reset' to clear a temporary output file.
2101If you are unsure, use synchronous version of this function 2101If you are unsure, use synchronous version of this function
2102`epg-verify-file' or `epg-verify-string' instead." 2102`epg-verify-file' or `epg-verify-string' instead."
2103 (epg-context-set-operation context 'verify) 2103 (epg-context-set-operation context 'verify)
@@ -2195,7 +2195,7 @@ Otherwise, it makes a cleartext signature.
2195 2195
2196If you use this function, you will need to wait for the completion of 2196If you use this function, you will need to wait for the completion of
2197`epg-gpg-program' by using `epg-wait-for-completion' and call 2197`epg-gpg-program' by using `epg-wait-for-completion' and call
2198`epg-reset' to clear a temporaly output file. 2198`epg-reset' to clear a temporary output file.
2199If you are unsure, use synchronous version of this function 2199If you are unsure, use synchronous version of this function
2200`epg-sign-file' or `epg-sign-string' instead." 2200`epg-sign-file' or `epg-sign-string' instead."
2201 (epg-context-set-operation context 'sign) 2201 (epg-context-set-operation context 'sign)
@@ -2299,7 +2299,7 @@ If RECIPIENTS is nil, it performs symmetric encryption.
2299 2299
2300If you use this function, you will need to wait for the completion of 2300If you use this function, you will need to wait for the completion of
2301`epg-gpg-program' by using `epg-wait-for-completion' and call 2301`epg-gpg-program' by using `epg-wait-for-completion' and call
2302`epg-reset' to clear a temporaly output file. 2302`epg-reset' to clear a temporary output file.
2303If you are unsure, use synchronous version of this function 2303If you are unsure, use synchronous version of this function
2304`epg-encrypt-file' or `epg-encrypt-string' instead." 2304`epg-encrypt-file' or `epg-encrypt-string' instead."
2305 (epg-context-set-operation context 'encrypt) 2305 (epg-context-set-operation context 'encrypt)
@@ -2414,7 +2414,7 @@ If RECIPIENTS is nil, it performs symmetric encryption."
2414 2414
2415If you use this function, you will need to wait for the completion of 2415If you use this function, you will need to wait for the completion of
2416`epg-gpg-program' by using `epg-wait-for-completion' and call 2416`epg-gpg-program' by using `epg-wait-for-completion' and call
2417`epg-reset' to clear a temporaly output file. 2417`epg-reset' to clear a temporary output file.
2418If you are unsure, use synchronous version of this function 2418If you are unsure, use synchronous version of this function
2419`epg-export-keys-to-file' or `epg-export-keys-to-string' instead." 2419`epg-export-keys-to-file' or `epg-export-keys-to-string' instead."
2420 (epg-context-set-operation context 'export-keys) 2420 (epg-context-set-operation context 'export-keys)
@@ -2457,7 +2457,7 @@ KEYS is a data object.
2457 2457
2458If you use this function, you will need to wait for the completion of 2458If you use this function, you will need to wait for the completion of
2459`epg-gpg-program' by using `epg-wait-for-completion' and call 2459`epg-gpg-program' by using `epg-wait-for-completion' and call
2460`epg-reset' to clear a temporaly output file. 2460`epg-reset' to clear a temporary output file.
2461If you are unsure, use synchronous version of this function 2461If you are unsure, use synchronous version of this function
2462`epg-import-keys-from-file' or `epg-import-keys-from-string' instead." 2462`epg-import-keys-from-file' or `epg-import-keys-from-string' instead."
2463 (epg-context-set-operation context 'import-keys) 2463 (epg-context-set-operation context 'import-keys)
@@ -2498,7 +2498,7 @@ KEY-ID-LIST is a list of key IDs.
2498 2498
2499If you use this function, you will need to wait for the completion of 2499If you use this function, you will need to wait for the completion of
2500`epg-gpg-program' by using `epg-wait-for-completion' and call 2500`epg-gpg-program' by using `epg-wait-for-completion' and call
2501`epg-reset' to clear a temporaly output file. 2501`epg-reset' to clear a temporary output file.
2502If you are unsure, use synchronous version of this function 2502If you are unsure, use synchronous version of this function
2503`epg-receive-keys' instead." 2503`epg-receive-keys' instead."
2504 (epg-context-set-operation context 'receive-keys) 2504 (epg-context-set-operation context 'receive-keys)
@@ -2526,7 +2526,7 @@ KEYS is a list of key IDs"
2526 2526
2527If you use this function, you will need to wait for the completion of 2527If you use this function, you will need to wait for the completion of
2528`epg-gpg-program' by using `epg-wait-for-completion' and call 2528`epg-gpg-program' by using `epg-wait-for-completion' and call
2529`epg-reset' to clear a temporaly output file. 2529`epg-reset' to clear a temporary output file.
2530If you are unsure, use synchronous version of this function 2530If you are unsure, use synchronous version of this function
2531`epg-delete-keys' instead." 2531`epg-delete-keys' instead."
2532 (epg-context-set-operation context 'delete-keys) 2532 (epg-context-set-operation context 'delete-keys)
@@ -2558,7 +2558,7 @@ If you are unsure, use synchronous version of this function
2558 2558
2559If you use this function, you will need to wait for the completion of 2559If you use this function, you will need to wait for the completion of
2560`epg-gpg-program' by using `epg-wait-for-completion' and call 2560`epg-gpg-program' by using `epg-wait-for-completion' and call
2561`epg-reset' to clear a temporaly output file. 2561`epg-reset' to clear a temporary output file.
2562If you are unsure, use synchronous version of this function 2562If you are unsure, use synchronous version of this function
2563`epg-sign-keys' instead." 2563`epg-sign-keys' instead."
2564 (epg-context-set-operation context 'sign-keys) 2564 (epg-context-set-operation context 'sign-keys)
@@ -2593,7 +2593,7 @@ PARAMETERS specifies parameters for the key.
2593 2593
2594If you use this function, you will need to wait for the completion of 2594If you use this function, you will need to wait for the completion of
2595`epg-gpg-program' by using `epg-wait-for-completion' and call 2595`epg-gpg-program' by using `epg-wait-for-completion' and call
2596`epg-reset' to clear a temporaly output file. 2596`epg-reset' to clear a temporary output file.
2597If you are unsure, use synchronous version of this function 2597If you are unsure, use synchronous version of this function
2598`epg-generate-key-from-file' or `epg-generate-key-from-string' instead." 2598`epg-generate-key-from-file' or `epg-generate-key-from-string' instead."
2599 (epg-context-set-operation context 'generate-key) 2599 (epg-context-set-operation context 'generate-key)
diff --git a/lisp/erc/ChangeLog.01 b/lisp/erc/ChangeLog.01
index f73d2af949c..1e90b33a23b 100644
--- a/lisp/erc/ChangeLog.01
+++ b/lisp/erc/ChangeLog.01
@@ -826,7 +826,7 @@
826 * (erc-complete-nick): Add ": " only if one completes directly after the erc-prompt, otherwise, add just one space 826 * (erc-complete-nick): Add ": " only if one completes directly after the erc-prompt, otherwise, add just one space
827 827
828 * erc.el: 828 * erc.el:
829 * Changed menu-definition to use easymenu (hopefully this now works under Xemacs) 829 * Changed menu-definition to use easymenu (hopefully this now works under XEmacs)
830 * Fix for custom problem with :must-match on XEmacs (thanks shapr) 830 * Fix for custom problem with :must-match on XEmacs (thanks shapr)
831 * Added /COUNTRY command using (what-domain) from package mail-extr (shapr) 831 * Added /COUNTRY command using (what-domain) from package mail-extr (shapr)
832 * Fix for case-sensitivity problem with pals (they are now all downcased) 832 * Fix for case-sensitivity problem with pals (they are now all downcased)
diff --git a/lisp/erc/ChangeLog.02 b/lisp/erc/ChangeLog.02
index 09ab1cb3796..d1b05a23140 100644
--- a/lisp/erc/ChangeLog.02
+++ b/lisp/erc/ChangeLog.02
@@ -1373,7 +1373,7 @@
1373 1373
1374 * erc-menu.el: 1374 * erc-menu.el:
1375 * changed how we check if we should activate "Track hidden channels" and 1375 * changed how we check if we should activate "Track hidden channels" and
1376 whether it should be selected - fixes a bug Xemacs where whole menu bar 1376 whether it should be selected - fixes a bug XEmacs where whole menu bar
1377 does not work if menu is loaded 1377 does not work if menu is loaded
1378 1378
1379 * erc-menu.el: 1379 * erc-menu.el:
@@ -1545,7 +1545,7 @@
1545 1545
1546 * added s461 to english catalog 1546 * added s461 to english catalog
1547 1547
1548 * fixed bug where Xemacs would not quit if erc-quit-reason was 1548 * fixed bug where XEmacs would not quit if erc-quit-reason was
1549 set to erc-quit-reason-various and assoc-default was not defined 1549 set to erc-quit-reason-various and assoc-default was not defined
1550 1550
15512002-06-04 Andreas Fuchs <asf@void.at> 15512002-06-04 Andreas Fuchs <asf@void.at>
diff --git a/lisp/erc/ChangeLog.03 b/lisp/erc/ChangeLog.03
index 74f2ab442b9..43d0247bce6 100644
--- a/lisp/erc/ChangeLog.03
+++ b/lisp/erc/ChangeLog.03
@@ -1600,7 +1600,8 @@
1600 1600
1601 * erc-dcc.el: * erc-dcc-ipv4-regexp: New constant 1601 * erc-dcc.el: * erc-dcc-ipv4-regexp: New constant
1602 * (erc-ip-to-decimal): Use it. 1602 * (erc-ip-to-decimal): Use it.
1603 * erc-dcc-host:valid-regexp erc-dcc-ipv4-regexp: * erc-dcc-host: :type 1603 * erc-dcc-host:valid-regexp erc-dcc-ipv4-regexp:
1604 * erc-dcc-host: :type
1604 * (pcomplete/erc-mode/DCC): Add completion for GET and CLOSE. 1605 * (pcomplete/erc-mode/DCC): Add completion for GET and CLOSE.
1605 * Some docstring/comment fixes. 1606 * Some docstring/comment fixes.
1606 1607
@@ -1610,7 +1611,7 @@
1610 1611
1611 * erc-dcc.el: 1612 * erc-dcc.el:
1612 * Fixed the unibyte-multibyte problem (now a dcc get buffer is (set-buffer-multibyte nil), 1613 * Fixed the unibyte-multibyte problem (now a dcc get buffer is (set-buffer-multibyte nil),
1613 and saves correctly (tried with 21.3.50). Thanks to Eli for suggesting it! 1614 and saves correctly (tried with 21.3.50)). Thanks to Eli for suggesting it!
1614 * Added :start-time plist property/value to GET handling so that we can calculate elapsed-time. 1615 * Added :start-time plist property/value to GET handling so that we can calculate elapsed-time.
1615 * Some (unwind-protect (progn (set-buffer ...) ...)) constructs replaced with (with-current-buffer ...) 1616 * Some (unwind-protect (progn (set-buffer ...) ...)) constructs replaced with (with-current-buffer ...)
1616 1617
diff --git a/lisp/erc/ChangeLog.04 b/lisp/erc/ChangeLog.04
index 7db040fd23f..ff47372b8e3 100644
--- a/lisp/erc/ChangeLog.04
+++ b/lisp/erc/ChangeLog.04
@@ -136,7 +136,7 @@
1362004-12-14 Diane Murray <disumu@x3y2z1.net> 1362004-12-14 Diane Murray <disumu@x3y2z1.net>
137 137
138 * erc.el: The last change to `erc-mode-line-format' introduced a 138 * erc.el: The last change to `erc-mode-line-format' introduced a
139 bug in Xemacs - it can't handle the #(" "...) strings at all. The 139 bug in XEmacs - it can't handle the #(" "...) strings at all. The
140 following changes fix the bug and simplify the mode-line handling 140 following changes fix the bug and simplify the mode-line handling
141 considerably. (erc-mode-line-format): Now defined as a string 141 considerably. (erc-mode-line-format): Now defined as a string
142 which will be formatted using `format-spec' and take the place of 142 which will be formatted using `format-spec' and take the place of
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 0a6e3a426a1..77f2235e790 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,9 @@
12011-11-15 Juanma Barranquero <lekktu@gmail.com>
2
3 * shr-color.el (shr-color-visible-distance-min)
4 (shr-color-relative-to-absolute, set-minimum-interval)
5 (shr-color-visible): Fix typos.
6
12011-11-03 Lars Magne Ingebrigtsen <larsi@gnus.org> 72011-11-03 Lars Magne Ingebrigtsen <larsi@gnus.org>
2 8
3 * gnus-sum.el (gnus-articles-to-read): Change wording in prompt to be 9 * gnus-sum.el (gnus-articles-to-read): Change wording in prompt to be
diff --git a/lisp/gnus/shr-color.el b/lisp/gnus/shr-color.el
index 36dd65f4a2d..4fd35659e08 100644
--- a/lisp/gnus/shr-color.el
+++ b/lisp/gnus/shr-color.el
@@ -41,7 +41,7 @@ Must be between 0 and 100."
41 41
42(defcustom shr-color-visible-distance-min 5 42(defcustom shr-color-visible-distance-min 5
43 "Minimum color distance between two colors to be considered visible. 43 "Minimum color distance between two colors to be considered visible.
44This value is used to compare result for `ciede2000'. Its an 44This value is used to compare result for `ciede2000'. It's an
45absolute value without any unit." 45absolute value without any unit."
46 :group 'shr 46 :group 'shr
47 :type 'integer) 47 :type 'integer)
@@ -198,7 +198,8 @@ absolute value without any unit."
198Each entry should have the form (COLOR-NAME . HEXADECIMAL-COLOR).") 198Each entry should have the form (COLOR-NAME . HEXADECIMAL-COLOR).")
199 199
200(defun shr-color-relative-to-absolute (number) 200(defun shr-color-relative-to-absolute (number)
201 "Convert a relative NUMBER to absolute. If NUMBER is absolute, return NUMBER. 201 "Convert a relative NUMBER to absolute.
202If NUMBER is absolute, return NUMBER.
202This will convert \"80 %\" to 204, \"100 %\" to 255 but \"123\" to \"123\"." 203This will convert \"80 %\" to 204, \"100 %\" to 255 but \"123\" to \"123\"."
203 (let ((string-length (- (length number) 1))) 204 (let ((string-length (- (length number) 1)))
204 ;; Is this a number with %? 205 ;; Is this a number with %?
@@ -269,7 +270,7 @@ Like rgb() or hsl()."
269(defun set-minimum-interval (val1 val2 min max interval &optional fixed) 270(defun set-minimum-interval (val1 val2 min max interval &optional fixed)
270 "Set minimum interval between VAL1 and VAL2 to INTERVAL. 271 "Set minimum interval between VAL1 and VAL2 to INTERVAL.
271The values are bound by MIN and MAX. 272The values are bound by MIN and MAX.
272If FIXED is t, then val1 will not be touched." 273If FIXED is t, then VAL1 will not be touched."
273 (let ((diff (abs (- val1 val2)))) 274 (let ((diff (abs (- val1 val2))))
274 (unless (>= diff interval) 275 (unless (>= diff interval)
275 (if fixed 276 (if fixed
@@ -319,10 +320,10 @@ If FIXED is t, then val1 will not be touched."
319 320
320(defun shr-color-visible (bg fg &optional fixed-background) 321(defun shr-color-visible (bg fg &optional fixed-background)
321 "Check that BG and FG colors are visible if they are drawn on each other. 322 "Check that BG and FG colors are visible if they are drawn on each other.
322Return (bg fg) if they are. If they are too similar, two new 323Return (bg fg) if they are. If they are too similar, two new
323colors are returned instead. 324colors are returned instead.
324If FIXED-BACKGROUND is set, and if the color are not visible, a 325If FIXED-BACKGROUND is set, and if the color are not visible, a
325new background color will not be computed. Only the foreground 326new background color will not be computed. Only the foreground
326color will be adapted to be visible on BG." 327color will be adapted to be visible on BG."
327 ;; Convert fg and bg to CIE Lab 328 ;; Convert fg and bg to CIE Lab
328 (let ((fg-norm (color-name-to-rgb fg)) 329 (let ((fg-norm (color-name-to-rgb fg))
@@ -334,7 +335,7 @@ color will be adapted to be visible on BG."
334 (bg-lab (apply 'color-srgb-to-lab bg-norm)) 335 (bg-lab (apply 'color-srgb-to-lab bg-norm))
335 ;; Compute color distance using CIE DE 2000 336 ;; Compute color distance using CIE DE 2000
336 (fg-bg-distance (color-cie-de2000 fg-lab bg-lab)) 337 (fg-bg-distance (color-cie-de2000 fg-lab bg-lab))
337 ;; Compute luminance distance (substract L component) 338 ;; Compute luminance distance (subtract L component)
338 (luminance-distance (abs (- (car fg-lab) (car bg-lab))))) 339 (luminance-distance (abs (- (car fg-lab) (car bg-lab)))))
339 (if (and (>= fg-bg-distance shr-color-visible-distance-min) 340 (if (and (>= fg-bg-distance shr-color-visible-distance-min)
340 (>= luminance-distance shr-color-visible-luminance-min)) 341 (>= luminance-distance shr-color-visible-luminance-min))
diff --git a/lisp/mh-e/ChangeLog.1 b/lisp/mh-e/ChangeLog.1
index 827ce047591..4ba5e847981 100644
--- a/lisp/mh-e/ChangeLog.1
+++ b/lisp/mh-e/ChangeLog.1
@@ -3289,7 +3289,7 @@
3289 (mh-tick-add-overlay, mh-tick-remove-overlay, mh-notate-tick): 3289 (mh-tick-add-overlay, mh-tick-remove-overlay, mh-notate-tick):
3290 These functions aren't needed any more, since overlays aren't used 3290 These functions aren't needed any more, since overlays aren't used
3291 any more. Also overlays aren't portable to XEmacs, so nasty 3291 any more. Also overlays aren't portable to XEmacs, so nasty
3292 conditional code that used overlays in Emacs and extents in Xemacs 3292 conditional code that used overlays in Emacs and extents in XEmacs
3293 have been eliminated. 3293 have been eliminated.
3294 (mh-toggle-tick): Generalize it to work on a range of messages 3294 (mh-toggle-tick): Generalize it to work on a range of messages
3295 like the other interactive messages. 3295 like the other interactive messages.
@@ -9445,7 +9445,7 @@
9445 Non-fatal depencencies on the mm-decode, mm-uu and mm-view 9445 Non-fatal depencencies on the mm-decode, mm-uu and mm-view
9446 libraries. 9446 libraries.
9447 9447
94482002-07-15 Satyaki Das <satyaki@theforce.stanford.edu> 94482002-07-15 Satyaki Das <satyaki@theforce.stanford.edu>
9449 9449
9450 * mh-utils.el (mh-require, mh-autoload): Remove these macros. 9450 * mh-utils.el (mh-require, mh-autoload): Remove these macros.
9451 (mh-decode-mime): Initialized to t iff the mm-decode library is 9451 (mh-decode-mime): Initialized to t iff the mm-decode library is
@@ -9455,8 +9455,8 @@
94552002-07-15 Mark D Baushke <mdb@gnu.org> 94552002-07-15 Mark D Baushke <mdb@gnu.org>
9456 9456
9457 * mh-utils.el (mh-update-scan-format): Rewrite for compatibility 9457 * mh-utils.el (mh-update-scan-format): Rewrite for compatibility
9458 with Xemacs as replace-match appears not to have identical 9458 with XEmacs as replace-match appears not to have identical
9459 functionality with FSF emacs. 9459 functionality with GNU Emacs.
9460 (mh-scan-msg-format-regexp): Deleted. This regexp is now hardcoded 9460 (mh-scan-msg-format-regexp): Deleted. This regexp is now hardcoded
9461 into the mh-update-scan-format function. 9461 into the mh-update-scan-format function.
9462 9462
@@ -10337,7 +10337,7 @@
10337 arguments in XEmacs. 10337 arguments in XEmacs.
10338 (mh-send-letter): sendmail-coding-system not bound in XEmacs. 10338 (mh-send-letter): sendmail-coding-system not bound in XEmacs.
10339 (mh-send-letter): default-buffer-file-coding-system not bound in 10339 (mh-send-letter): default-buffer-file-coding-system not bound in
10340 Xemacs. 10340 XEmacs.
10341 10341
10342 * mh-e.el (mh-delete-msg, mh-refile-msg, mh-undo): 10342 * mh-e.el (mh-delete-msg, mh-refile-msg, mh-undo):
10343 transient-mark-mode not bound in XEmacs. The feature of 10343 transient-mark-mode not bound in XEmacs. The feature of
diff --git a/lisp/progmodes/cc-awk.el b/lisp/progmodes/cc-awk.el
index d19ba47aa3f..d55e5ce23b4 100644
--- a/lisp/progmodes/cc-awk.el
+++ b/lisp/progmodes/cc-awk.el
@@ -71,7 +71,7 @@
71 ;; / can delimit regexes or be a division operator. By default we assume 71 ;; / can delimit regexes or be a division operator. By default we assume
72 ;; that it is a division sign, and fix the regexp operator cases with 72 ;; that it is a division sign, and fix the regexp operator cases with
73 ;; `font-lock-syntactic-keywords'. 73 ;; `font-lock-syntactic-keywords'.
74 (modify-syntax-entry ?/ "." st) ; ACM 2002/4/27. 74 (modify-syntax-entry ?/ "." st) ; ACM 2002/4/27.
75 (modify-syntax-entry ?* "." st) 75 (modify-syntax-entry ?* "." st)
76 (modify-syntax-entry ?+ "." st) 76 (modify-syntax-entry ?+ "." st)
77 (modify-syntax-entry ?- "." st) 77 (modify-syntax-entry ?- "." st)
@@ -195,7 +195,7 @@
195;; Matches the inside of an AWK regexp (i.e. without the enclosing /s) 195;; Matches the inside of an AWK regexp (i.e. without the enclosing /s)
196(defconst c-awk-regexp-without-end-re 196(defconst c-awk-regexp-without-end-re
197 (concat "/" c-awk-regexp-innards-re)) 197 (concat "/" c-awk-regexp-innards-re))
198;; Matches an AWK regexp up to, but not including, any terminating /. 198;; Matches an AWK regexp up to, but not including, any terminating /.
199(defconst c-awk-one-line-possibly-open-regexp-re 199(defconst c-awk-one-line-possibly-open-regexp-re
200 (concat "/\\(" c-awk-non-eol-esc-pair-re 200 (concat "/\\(" c-awk-non-eol-esc-pair-re
201 "\\|" c-awk-regexp-one-line-possibly-open-char-list-re 201 "\\|" c-awk-regexp-one-line-possibly-open-char-list-re
@@ -256,7 +256,7 @@
256 256
257 257
258;; ACM, 2002/5/29: 258;; ACM, 2002/5/29:
259;; 259;;
260;; The next section of code is about determining whether or not an AWK 260;; The next section of code is about determining whether or not an AWK
261;; statement is complete or not. We use this to indent the following line. 261;; statement is complete or not. We use this to indent the following line.
262;; The determination is pretty straightforward in C, where a statement ends 262;; The determination is pretty straightforward in C, where a statement ends
@@ -382,7 +382,7 @@
382 ;; Kludge: If c-backward-syntactic-ws gets stuck at a BOL, it is likely 382 ;; Kludge: If c-backward-syntactic-ws gets stuck at a BOL, it is likely
383 ;; that the previous line contains an unterminated string (without \). In 383 ;; that the previous line contains an unterminated string (without \). In
384 ;; this case, assume that the previous line's c-awk-NL-prop is a $. 384 ;; this case, assume that the previous line's c-awk-NL-prop is a $.
385 ;; 385 ;;
386 ;; POINT MUST BE AT THE START OF A LINE when calling this function. This 386 ;; POINT MUST BE AT THE START OF A LINE when calling this function. This
387 ;; is to ensure that the various backward-comment functions will work 387 ;; is to ensure that the various backward-comment functions will work
388 ;; properly. 388 ;; properly.
@@ -425,13 +425,13 @@
425 ;; Calculate and set the value of the c-awk-NL-prop on the immediately 425 ;; Calculate and set the value of the c-awk-NL-prop on the immediately
426 ;; preceding EOL. This may also involve doing the same for several 426 ;; preceding EOL. This may also involve doing the same for several
427 ;; preceding EOLs. 427 ;; preceding EOLs.
428 ;; 428 ;;
429 ;; NOTE that if the property was already set, we return it without 429 ;; NOTE that if the property was already set, we return it without
430 ;; recalculation. (This is by accident rather than design.) 430 ;; recalculation. (This is by accident rather than design.)
431 ;; 431 ;;
432 ;; Return the property which got set (or was already set) on the previous 432 ;; Return the property which got set (or was already set) on the previous
433 ;; line. Return nil if we hit BOB. 433 ;; line. Return nil if we hit BOB.
434 ;; 434 ;;
435 ;; See c-awk-after-if-for-while-condition-p for a description of DO-LIM. 435 ;; See c-awk-after-if-for-while-condition-p for a description of DO-LIM.
436 ;; 436 ;;
437 ;; This function might do hidden buffer changes. 437 ;; This function might do hidden buffer changes.
@@ -492,7 +492,7 @@
492 ;; if necessary. (As a special case, the property doesn't get set on an 492 ;; if necessary. (As a special case, the property doesn't get set on an
493 ;; empty line at EOB (there's no position to set the property on), but the 493 ;; empty line at EOB (there's no position to set the property on), but the
494 ;; function returns the property value an EOL would have got.) 494 ;; function returns the property value an EOL would have got.)
495 ;; 495 ;;
496 ;; See c-awk-after-if-for-while-condition-p for a description of DO-LIM. 496 ;; See c-awk-after-if-for-while-condition-p for a description of DO-LIM.
497 ;; 497 ;;
498 ;; This function might do hidden buffer changes. 498 ;; This function might do hidden buffer changes.
@@ -566,7 +566,7 @@
566 ;; this, a new newline inserted after an old newline (e.g. by C-j) would 566 ;; this, a new newline inserted after an old newline (e.g. by C-j) would
567 ;; inherit any c-awk-NL-prop from the old newline. This would be a Bad 567 ;; inherit any c-awk-NL-prop from the old newline. This would be a Bad
568 ;; Thing. This function's action is required by c-put-char-property. 568 ;; Thing. This function's action is required by c-put-char-property.
569 (if (and (boundp 'text-property-default-nonsticky) ; doesn't exist in Xemacs 569 (if (and (boundp 'text-property-default-nonsticky) ; doesn't exist in XEmacs
570 (not (assoc 'c-awk-NL-prop text-property-default-nonsticky))) 570 (not (assoc 'c-awk-NL-prop text-property-default-nonsticky)))
571 (setq text-property-default-nonsticky 571 (setq text-property-default-nonsticky
572 (cons '(c-awk-NL-prop . t) text-property-default-nonsticky)))) 572 (cons '(c-awk-NL-prop . t) text-property-default-nonsticky))))
@@ -611,7 +611,7 @@
611;; Go back to the start of the (apparent) current line (or the start of the 611;; Go back to the start of the (apparent) current line (or the start of the
612;; line containing POS), returning the buffer position of that point. I.e., 612;; line containing POS), returning the buffer position of that point. I.e.,
613;; go back to the last line which doesn't have an escaped EOL before it. 613;; go back to the last line which doesn't have an escaped EOL before it.
614;; 614;;
615;; This is guaranteed to be "safe" for syntactic analysis, i.e. outwith any 615;; This is guaranteed to be "safe" for syntactic analysis, i.e. outwith any
616;; comment, string or regexp. IT MAY WELL BE that this function should not be 616;; comment, string or regexp. IT MAY WELL BE that this function should not be
617;; executed on a narrowed buffer. 617;; executed on a narrowed buffer.
@@ -823,14 +823,14 @@
823;; Don't overlook the possibility of the buffer change being the "recapturing" 823;; Don't overlook the possibility of the buffer change being the "recapturing"
824;; of a previously escaped newline. 824;; of a previously escaped newline.
825 825
826;; ACM 2008-02-05: 826;; ACM 2008-02-05:
827(defun c-awk-extend-and-syntax-tablify-region (beg end old-len) 827(defun c-awk-extend-and-syntax-tablify-region (beg end old-len)
828 ;; Expand the region (BEG END) as needed to (c-new-BEG c-new-END) then put 828 ;; Expand the region (BEG END) as needed to (c-new-BEG c-new-END) then put
829 ;; `syntax-table' properties on this region. 829 ;; `syntax-table' properties on this region.
830 ;; 830 ;;
831 ;; This function is called from an after-change function, BEG END and 831 ;; This function is called from an after-change function, BEG END and
832 ;; OLD-LEN being the standard parameters. 832 ;; OLD-LEN being the standard parameters.
833 ;; 833 ;;
834 ;; Point is undefined both before and after this function call, the buffer 834 ;; Point is undefined both before and after this function call, the buffer
835 ;; has been widened, and match-data saved. The return value is ignored. 835 ;; has been widened, and match-data saved. The return value is ignored.
836 ;; 836 ;;
@@ -848,7 +848,7 @@
848;; Awk regexps written with help from Peter Galbraith 848;; Awk regexps written with help from Peter Galbraith
849;; <galbraith@mixing.qc.dfo.ca>. 849;; <galbraith@mixing.qc.dfo.ca>.
850;; Take GNU Emacs's 'words out of the following regexp-opts. They dont work 850;; Take GNU Emacs's 'words out of the following regexp-opts. They dont work
851;; in Xemacs 21.4.4. acm 2002/9/19. 851;; in XEmacs 21.4.4. acm 2002/9/19.
852(defconst awk-font-lock-keywords 852(defconst awk-font-lock-keywords
853 (eval-when-compile 853 (eval-when-compile
854 (list 854 (list
diff --git a/lisp/progmodes/cc-engine.el b/lisp/progmodes/cc-engine.el
index fd32e5e956c..81d1c0d2f32 100644
--- a/lisp/progmodes/cc-engine.el
+++ b/lisp/progmodes/cc-engine.el
@@ -2032,7 +2032,7 @@ comment at the start of cc-engine.el for more info."
2032(defconst c-state-cache-too-far 5000) 2032(defconst c-state-cache-too-far 5000)
2033;; A maximum comfortable scanning distance, e.g. between 2033;; A maximum comfortable scanning distance, e.g. between
2034;; `c-state-cache-good-pos' and "HERE" (where we call c-parse-state). When 2034;; `c-state-cache-good-pos' and "HERE" (where we call c-parse-state). When
2035;; this distance is exceeded, we take "emergency meausures", e.g. by clearing 2035;; this distance is exceeded, we take "emergency measures", e.g. by clearing
2036;; the cache and starting again from point-min or a beginning of defun. This 2036;; the cache and starting again from point-min or a beginning of defun. This
2037;; value can be tuned for efficiency or set to a lower value for testing. 2037;; value can be tuned for efficiency or set to a lower value for testing.
2038 2038
@@ -4219,9 +4219,9 @@ comment at the start of cc-engine.el for more info."
4219;; complicated anyway. In this case, lim is only used to detect 4219;; complicated anyway. In this case, lim is only used to detect
4220;; cpp directives. 4220;; cpp directives.
4221;; 4221;;
4222;; Note that there is a bug in Xemacs's buffer-syntactic-context when used in 4222;; Note that there is a bug in XEmacs's buffer-syntactic-context when used in
4223;; conjunction with syntax-table-properties. The bug is present in, e.g., 4223;; conjunction with syntax-table-properties. The bug is present in, e.g.,
4224;; Xemacs 21.4.4. It manifested itself thus: 4224;; XEmacs 21.4.4. It manifested itself thus:
4225;; 4225;;
4226;; Starting with an empty AWK Mode buffer, type 4226;; Starting with an empty AWK Mode buffer, type
4227;; /regexp/ {<C-j> 4227;; /regexp/ {<C-j>
@@ -4235,7 +4235,7 @@ comment at the start of cc-engine.el for more info."
4235;; 4235;;
4236;; The workaround for this is for the AWK Mode initialisation to switch the 4236;; The workaround for this is for the AWK Mode initialisation to switch the
4237;; defalias for c-in-literal to c-slow-in-literal. This will slow down other 4237;; defalias for c-in-literal to c-slow-in-literal. This will slow down other
4238;; cc-modes in Xemacs whenever an awk-buffer has been initialised. 4238;; cc-modes in XEmacs whenever an awk-buffer has been initialised.
4239;; 4239;;
4240;; (Alan Mackenzie, 2003/4/30). 4240;; (Alan Mackenzie, 2003/4/30).
4241 4241
diff --git a/lisp/progmodes/cc-mode.el b/lisp/progmodes/cc-mode.el
index a6bf241f0db..d93d174047b 100644
--- a/lisp/progmodes/cc-mode.el
+++ b/lisp/progmodes/cc-mode.el
@@ -484,7 +484,7 @@ that requires a literal mode spec at compile time."
484 (make-local-variable 'comment-start) 484 (make-local-variable 'comment-start)
485 (make-local-variable 'comment-end) 485 (make-local-variable 'comment-end)
486 (make-local-variable 'comment-start-skip) 486 (make-local-variable 'comment-start-skip)
487 487
488 (make-local-variable 'paragraph-start) 488 (make-local-variable 'paragraph-start)
489 (make-local-variable 'paragraph-separate) 489 (make-local-variable 'paragraph-separate)
490 (make-local-variable 'paragraph-ignore-fill-prefix) 490 (make-local-variable 'paragraph-ignore-fill-prefix)
@@ -660,7 +660,7 @@ compatible with old code; callers should always specify it."
660 (when (eq (car elt) 'c-file-style) 660 (when (eq (car elt) 'c-file-style)
661 (setq cownt (1+ cownt)))) 661 (setq cownt (1+ cownt))))
662 cownt)) 662 cownt))
663 663
664(defun c-before-hack-hook () 664(defun c-before-hack-hook ()
665 "Set the CC Mode style and \"offsets\" when in the buffer's local variables. 665 "Set the CC Mode style and \"offsets\" when in the buffer's local variables.
666They are set only when, respectively, the pseudo variables 666They are set only when, respectively, the pseudo variables
@@ -860,7 +860,7 @@ Note that the style variables are always made local to the buffer."
860 ;; (i) Extend the font lock region to cover all changed preprocessor 860 ;; (i) Extend the font lock region to cover all changed preprocessor
861 ;; regions; it does this by setting the variables `c-new-BEG' and 861 ;; regions; it does this by setting the variables `c-new-BEG' and
862 ;; `c-new-END' to the new boundaries. 862 ;; `c-new-END' to the new boundaries.
863 ;; 863 ;;
864 ;; (ii) "Neutralize" every preprocessor line wholly or partially in the 864 ;; (ii) "Neutralize" every preprocessor line wholly or partially in the
865 ;; extended changed region. "Restore" lines which were CPP lines before the 865 ;; extended changed region. "Restore" lines which were CPP lines before the
866 ;; change and are no longer so; these can be located from the Buffer local 866 ;; change and are no longer so; these can be located from the Buffer local
@@ -1562,7 +1562,7 @@ Key bindings:
1562 (c-common-init 'awk-mode) 1562 (c-common-init 'awk-mode)
1563 (c-awk-unstick-NL-prop) 1563 (c-awk-unstick-NL-prop)
1564 1564
1565 ;; Prevent Xemacs's buffer-syntactic-context being used. See the comment 1565 ;; Prevent XEmacs's buffer-syntactic-context being used. See the comment
1566 ;; in cc-engine.el, just before (defun c-fast-in-literal ... 1566 ;; in cc-engine.el, just before (defun c-fast-in-literal ...
1567 (defalias 'c-in-literal 'c-slow-in-literal) 1567 (defalias 'c-in-literal 'c-slow-in-literal)
1568 1568
diff --git a/lisp/progmodes/cperl-mode.el b/lisp/progmodes/cperl-mode.el
index 0556741b65b..13858ad0da1 100644
--- a/lisp/progmodes/cperl-mode.el
+++ b/lisp/progmodes/cperl-mode.el
@@ -1512,7 +1512,7 @@ the last)."
1512(defvar cperl-font-locking nil) 1512(defvar cperl-font-locking nil)
1513 1513
1514;; NB as it stands the code in cperl-mode assumes this only has one 1514;; NB as it stands the code in cperl-mode assumes this only has one
1515;; element. If Xemacs 19 support were dropped, this could all be simplified. 1515;; element. If XEmacs 19 support were dropped, this could all be simplified.
1516(defvar cperl-compilation-error-regexp-alist 1516(defvar cperl-compilation-error-regexp-alist
1517 ;; This look like a paranoiac regexp: could anybody find a better one? (which WORKS). 1517 ;; This look like a paranoiac regexp: could anybody find a better one? (which WORKS).
1518 '(("^[^\n]* \\(file\\|at\\) \\([^ \t\n]+\\) [^\n]*line \\([0-9]+\\)[\\., \n]" 1518 '(("^[^\n]* \\(file\\|at\\) \\([^ \t\n]+\\) [^\n]*line \\([0-9]+\\)[\\., \n]"
diff --git a/lisp/progmodes/verilog-mode.el b/lisp/progmodes/verilog-mode.el
index ecd3b4af360..00466b8b1e7 100644
--- a/lisp/progmodes/verilog-mode.el
+++ b/lisp/progmodes/verilog-mode.el
@@ -292,7 +292,7 @@ STRING should be given if the last search was by `string-match' on STRING."
292 "Filter `easy-menu-define' MENU to support new features." 292 "Filter `easy-menu-define' MENU to support new features."
293 (cond ((not (featurep 'xemacs)) 293 (cond ((not (featurep 'xemacs))
294 menu) ;; GNU Emacs - passthru 294 menu) ;; GNU Emacs - passthru
295 ;; Xemacs doesn't support :help. Strip it. 295 ;; XEmacs doesn't support :help. Strip it.
296 ;; Recursively filter the a submenu 296 ;; Recursively filter the a submenu
297 ((listp menu) 297 ((listp menu)
298 (mapcar 'verilog-easy-menu-filter menu)) 298 (mapcar 'verilog-easy-menu-filter menu))
@@ -737,7 +737,7 @@ See `compilation-error-regexp-alist' for the formatting. For Emacs 22+.")
737(defvar verilog-error-regexp-xemacs-alist 737(defvar verilog-error-regexp-xemacs-alist
738 ;; Emacs form is '((v-tool "re" 1 2) ...) 738 ;; Emacs form is '((v-tool "re" 1 2) ...)
739 ;; XEmacs form is '(verilog ("re" 1 2) ...) 739 ;; XEmacs form is '(verilog ("re" 1 2) ...)
740 ;; So we can just map from Emacs to Xemacs 740 ;; So we can just map from Emacs to XEmacs
741 (cons 'verilog (mapcar 'cdr verilog-error-regexp-emacs-alist)) 741 (cons 'verilog (mapcar 'cdr verilog-error-regexp-emacs-alist))
742 "List of regexps for Verilog compilers. 742 "List of regexps for Verilog compilers.
743See `compilation-error-regexp-alist-alist' for the formatting. For XEmacs.") 743See `compilation-error-regexp-alist-alist' for the formatting. For XEmacs.")
diff --git a/src/ChangeLog.8 b/src/ChangeLog.8
index 0bb96b55c30..00e4a1f62c8 100644
--- a/src/ChangeLog.8
+++ b/src/ChangeLog.8
@@ -2196,7 +2196,7 @@
2196 2196
21971999-09-14 Gerd Moellmann <gerd@gnu.org> 21971999-09-14 Gerd Moellmann <gerd@gnu.org>
2198 2198
2199 * sound.c (Fplay_sound): Remove usused variables. 2199 * sound.c (Fplay_sound): Remove unused variables.
2200 (be2hs): Put in #if 0 because it's currently not used. 2200 (be2hs): Put in #if 0 because it's currently not used.
2201 2201
22021999-09-14 Ken Raeburn <raeburn@gnu.org> 22021999-09-14 Ken Raeburn <raeburn@gnu.org>
diff --git a/src/ralloc.c b/src/ralloc.c
index 50d322523c1..62189ad8fc7 100644
--- a/src/ralloc.c
+++ b/src/ralloc.c
@@ -219,13 +219,13 @@ find_heap (POINTER address)
219 If enough space is not presently available in our reserve, this means 219 If enough space is not presently available in our reserve, this means
220 getting more page-aligned space from the system. If the returned space 220 getting more page-aligned space from the system. If the returned space
221 is not contiguous to the last heap, allocate a new heap, and append it 221 is not contiguous to the last heap, allocate a new heap, and append it
222 to the heap list.
222 223
223 obtain does not try to keep track of whether space is in use 224 obtain does not try to keep track of whether space is in use or not
224 or not in use. It just returns the address of SIZE bytes that 225 in use. It just returns the address of SIZE bytes that fall within a
225 fall within a single heap. If you call obtain twice in a row 226 single heap. If you call obtain twice in a row with the same arguments,
226 with the same arguments, you typically get the same value. 227 you typically get the same value. It's the caller's responsibility to
227 to the heap list. It's the caller's responsibility to keep 228 keep track of what space is in use.
228 track of what space is in use.
229 229
230 Return the address of the space if all went well, or zero if we couldn't 230 Return the address of the space if all went well, or zero if we couldn't
231 allocate the memory. */ 231 allocate the memory. */
@@ -389,7 +389,7 @@ find_bloc (POINTER *ptr)
389 while (p != NIL_BLOC) 389 while (p != NIL_BLOC)
390 { 390 {
391 /* Consistency check. Don't return inconsistent blocs. 391 /* Consistency check. Don't return inconsistent blocs.
392 Don't abort here, as callers might be expecting this, but 392 Don't abort here, as callers might be expecting this, but
393 callers that always expect a bloc to be returned should abort 393 callers that always expect a bloc to be returned should abort
394 if one isn't to avoid a memory corruption bug that is 394 if one isn't to avoid a memory corruption bug that is
395 difficult to track down. */ 395 difficult to track down. */
@@ -1180,7 +1180,7 @@ r_alloc_reset_variable (POINTER *old, POINTER *new)
1180 1180
1181 /* Find the bloc that corresponds to the data pointed to by pointer. 1181 /* Find the bloc that corresponds to the data pointed to by pointer.
1182 find_bloc cannot be used, as it has internal consistency checks 1182 find_bloc cannot be used, as it has internal consistency checks
1183 which fail when the variable needs reseting. */ 1183 which fail when the variable needs resetting. */
1184 while (bloc != NIL_BLOC) 1184 while (bloc != NIL_BLOC)
1185 { 1185 {
1186 if (bloc->data == *new) 1186 if (bloc->data == *new)
diff --git a/src/xterm.h b/src/xterm.h
index e10a6bc34f0..1d2ce9a2d3c 100644
--- a/src/xterm.h
+++ b/src/xterm.h
@@ -330,7 +330,7 @@ struct x_display_info
330 ptrdiff_t x_dnd_atoms_length; 330 ptrdiff_t x_dnd_atoms_length;
331 331
332 /* Extended window manager hints, Atoms supported by the window manager and 332 /* Extended window manager hints, Atoms supported by the window manager and
333 atoms for settig the window type. */ 333 atoms for setting the window type. */
334 Atom Xatom_net_supported, Xatom_net_supporting_wm_check; 334 Atom Xatom_net_supported, Xatom_net_supporting_wm_check;
335 Atom *net_supported_atoms; 335 Atom *net_supported_atoms;
336 int nr_net_supported_atoms; 336 int nr_net_supported_atoms;