diff options
| author | Juanma Barranquero | 2011-11-25 14:26:30 +0100 |
|---|---|---|
| committer | Juanma Barranquero | 2011-11-25 14:26:30 +0100 |
| commit | e9fce1acd8e0702c35b2c28d3b4893a913e5c67b (patch) | |
| tree | e643f3319aca392931342f5588bac7ef323d251c | |
| parent | 034ea24ddb8c58aa69736d49ffa10fdd4b1a9847 (diff) | |
| download | emacs-e9fce1acd8e0702c35b2c28d3b4893a913e5c67b.tar.gz emacs-e9fce1acd8e0702c35b2c28d3b4893a913e5c67b.zip | |
Fix typos.
| -rw-r--r-- | ChangeLog | 4 | ||||
| -rw-r--r-- | doc/misc/ChangeLog | 2 | ||||
| -rw-r--r-- | lisp/ChangeLog | 15 | ||||
| -rw-r--r-- | lisp/ChangeLog.10 | 4 | ||||
| -rw-r--r-- | lisp/ChangeLog.11 | 4 | ||||
| -rw-r--r-- | lisp/ChangeLog.13 | 4 | ||||
| -rw-r--r-- | lisp/ChangeLog.15 | 4 | ||||
| -rw-r--r-- | lisp/ChangeLog.7 | 4 | ||||
| -rw-r--r-- | lisp/emacs-lisp/avl-tree.el | 64 | ||||
| -rw-r--r-- | lisp/emacs-lisp/cconv.el | 6 | ||||
| -rw-r--r-- | lisp/gnus/ChangeLog | 24 | ||||
| -rw-r--r-- | lisp/gnus/ChangeLog.2 | 2 | ||||
| -rw-r--r-- | lisp/net/gnutls.el | 2 | ||||
| -rw-r--r-- | nt/ChangeLog | 4 | ||||
| -rw-r--r-- | nt/INSTALL | 2 | ||||
| -rwxr-xr-x | nt/configure.bat | 4 | ||||
| -rw-r--r-- | src/ChangeLog | 2 | ||||
| -rw-r--r-- | src/ChangeLog.10 | 2 | ||||
| -rw-r--r-- | src/ChangeLog.11 | 10 | ||||
| -rw-r--r-- | src/ChangeLog.6 | 18 |
20 files changed, 98 insertions, 83 deletions
| @@ -1438,7 +1438,7 @@ | |||
| 1438 | 1438 | ||
| 1439 | 2010-10-24 Lars Magne Ingebrigtsen <larsi@gnus.org> | 1439 | 2010-10-24 Lars Magne Ingebrigtsen <larsi@gnus.org> |
| 1440 | 1440 | ||
| 1441 | * configure.in: Remove the BROKEN annotation from gnutls. | 1441 | * configure.in: Remove the BROKEN annotation from GnuTLS. |
| 1442 | 1442 | ||
| 1443 | 2010-10-22 Glenn Morris <rgm@gnu.org> | 1443 | 2010-10-22 Glenn Morris <rgm@gnu.org> |
| 1444 | 1444 | ||
| @@ -1521,7 +1521,7 @@ | |||
| 1521 | 2010-09-26 Lars Magne Ingebrigtsen <larsi@gnus.org> | 1521 | 2010-09-26 Lars Magne Ingebrigtsen <larsi@gnus.org> |
| 1522 | 1522 | ||
| 1523 | * configure.in (HAVE_GNUTLS): Don't break if we don't have the | 1523 | * configure.in (HAVE_GNUTLS): Don't break if we don't have the |
| 1524 | gnutls libraries. | 1524 | GnuTLS libraries. |
| 1525 | 1525 | ||
| 1526 | 2010-09-26 Teodor Zlatanov <tzz@lifelogs.com> | 1526 | 2010-09-26 Teodor Zlatanov <tzz@lifelogs.com> |
| 1527 | 1527 | ||
diff --git a/doc/misc/ChangeLog b/doc/misc/ChangeLog index 57e7dd5871a..f94153479a8 100644 --- a/doc/misc/ChangeLog +++ b/doc/misc/ChangeLog | |||
| @@ -2995,7 +2995,7 @@ | |||
| 2995 | * org.texi (Activation, Exporting, ASCII export, HTML export) | 2995 | * org.texi (Activation, Exporting, ASCII export, HTML export) |
| 2996 | (HTML Export commands, LaTeX/PDF export commands): | 2996 | (HTML Export commands, LaTeX/PDF export commands): |
| 2997 | Improve documentation about transient-mark-mode. | 2997 | Improve documentation about transient-mark-mode. |
| 2998 | (References): DOcuemtn the use of special names like $LR1 to reference | 2998 | (References): Document the use of special names like $LR1 to reference |
| 2999 | to fields in the last table row. | 2999 | to fields in the last table row. |
| 3000 | 3000 | ||
| 3001 | 2008-12-19 Juri Linkov <juri@jurta.org> | 3001 | 2008-12-19 Juri Linkov <juri@jurta.org> |
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index d4410089716..8f31c293b7a 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,14 @@ | |||
| 1 | 2011-11-25 Juanma Barranquero <lekktu@gmail.com> | ||
| 2 | |||
| 3 | * emacs-lisp/avl-tree.el (avl-tree--do-copy, avl-tree-create) | ||
| 4 | (avl-tree-compare-function, avl-tree-empty, avl-tree-enter) | ||
| 5 | (avl-tree-delete, avl-tree-member, avl-tree-member-p, avl-tree-map) | ||
| 6 | (avl-tree-mapc, avl-tree-mapf, avl-tree-mapcar, avl-tree-copy) | ||
| 7 | (avl-tree-clear, avl-tree-stack, avl-tree-stack-pop) | ||
| 8 | (avl-tree-stack-first): | ||
| 9 | * emacs-lisp/cconv.el (cconv--analyse-use): | ||
| 10 | * net/gnutls.el (gnutls-negotiate): Fix typos. | ||
| 11 | |||
| 1 | 2011-11-24 Glenn Morris <rgm@gnu.org> | 12 | 2011-11-24 Glenn Morris <rgm@gnu.org> |
| 2 | 13 | ||
| 3 | * lpr.el (lpr-windows-system, lpr-lp-system): | 14 | * lpr.el (lpr-windows-system, lpr-lp-system): |
| @@ -3832,7 +3843,7 @@ | |||
| 3832 | 3843 | ||
| 3833 | * cus-edit.el (custom-show): Mark as obsolete. | 3844 | * cus-edit.el (custom-show): Mark as obsolete. |
| 3834 | 3845 | ||
| 3835 | * net/network-stream.el (network-stream-open-starttls): If gnutls | 3846 | * net/network-stream.el (network-stream-open-starttls): If GnuTLS |
| 3836 | negotiation fails, then possibly try again with a non-encrypted | 3847 | negotiation fails, then possibly try again with a non-encrypted |
| 3837 | connection (bug#9017). | 3848 | connection (bug#9017). |
| 3838 | 3849 | ||
| @@ -8018,7 +8029,7 @@ | |||
| 8018 | 2011-04-12 Lars Magne Ingebrigtsen <larsi@gnus.org> | 8029 | 2011-04-12 Lars Magne Ingebrigtsen <larsi@gnus.org> |
| 8019 | 8030 | ||
| 8020 | * net/network-stream.el (network-stream-open-starttls): Only do | 8031 | * net/network-stream.el (network-stream-open-starttls): Only do |
| 8021 | opportunistic STARTTLS upgrades if we have built-in gnutls support. | 8032 | opportunistic STARTTLS upgrades if we have built-in GnuTLS support. |
| 8022 | Upgrades via gnutls-cli are too slow to be done opportunistically. | 8033 | Upgrades via gnutls-cli are too slow to be done opportunistically. |
| 8023 | 8034 | ||
| 8024 | 2011-04-12 Juanma Barranquero <lekktu@gmail.com> | 8035 | 2011-04-12 Juanma Barranquero <lekktu@gmail.com> |
diff --git a/lisp/ChangeLog.10 b/lisp/ChangeLog.10 index bf6f21cd422..0d2255ac0a4 100644 --- a/lisp/ChangeLog.10 +++ b/lisp/ChangeLog.10 | |||
| @@ -9746,8 +9746,8 @@ | |||
| 9746 | 9746 | ||
| 9747 | 2002-09-28 Simon Josefsson <jas@extundo.com> | 9747 | 2002-09-28 Simon Josefsson <jas@extundo.com> |
| 9748 | 9748 | ||
| 9749 | * mail/smtpmail.el (smtpmail-via-smtp): Only negotiate starttls on | 9749 | * mail/smtpmail.el (smtpmail-via-smtp): Only negotiate STARTTLS on |
| 9750 | streams that were opened using starttls. | 9750 | streams that were opened using STARTTLS. |
| 9751 | 9751 | ||
| 9752 | 2002-09-28 Paul Reilly <pmr@pajato.com> | 9752 | 2002-09-28 Paul Reilly <pmr@pajato.com> |
| 9753 | 9753 | ||
diff --git a/lisp/ChangeLog.11 b/lisp/ChangeLog.11 index c80091e4657..38a5530fbfc 100644 --- a/lisp/ChangeLog.11 +++ b/lisp/ChangeLog.11 | |||
| @@ -6728,11 +6728,11 @@ | |||
| 6728 | 2004-05-28 Simon Josefsson <jas@extundo.com> | 6728 | 2004-05-28 Simon Josefsson <jas@extundo.com> |
| 6729 | 6729 | ||
| 6730 | * mail/smtpmail.el (smtpmail-open-stream): | 6730 | * mail/smtpmail.el (smtpmail-open-stream): |
| 6731 | Bind starttls-extra-arguments too, if starttls.el uses GNUTLS. | 6731 | Bind starttls-extra-arguments too, if starttls.el uses GnuTLS. |
| 6732 | 6732 | ||
| 6733 | 2004-05-26 Simon Josefsson <jas@extundo.com> | 6733 | 2004-05-26 Simon Josefsson <jas@extundo.com> |
| 6734 | 6734 | ||
| 6735 | * starttls.el: Merge with my GNUTLS based starttls.el. | 6735 | * starttls.el: Merge with my GnuTLS based starttls.el. |
| 6736 | (starttls-gnutls-program, starttls-use-gnutls) | 6736 | (starttls-gnutls-program, starttls-use-gnutls) |
| 6737 | (starttls-extra-arguments, starttls-process-connection-type) | 6737 | (starttls-extra-arguments, starttls-process-connection-type) |
| 6738 | (starttls-connect, starttls-failure, starttls-success): New variables. | 6738 | (starttls-connect, starttls-failure, starttls-success): New variables. |
diff --git a/lisp/ChangeLog.13 b/lisp/ChangeLog.13 index bfe0f4a7a51..12eadc6aadf 100644 --- a/lisp/ChangeLog.13 +++ b/lisp/ChangeLog.13 | |||
| @@ -4275,7 +4275,7 @@ | |||
| 4275 | stops with an error and Emacs does not compile with those things in. | 4275 | stops with an error and Emacs does not compile with those things in. |
| 4276 | Besides, declare-function is not defined in XEmacs. | 4276 | Besides, declare-function is not defined in XEmacs. |
| 4277 | 4277 | ||
| 4278 | * ediff-util.el (eqiff-quit): Autoraise minibuffer. | 4278 | * ediff-util.el (ediff-quit): Autoraise minibuffer. |
| 4279 | 4279 | ||
| 4280 | * ediff-diff.el (ediff-convert-fine-diffs-to-overlays): Make it a defun. | 4280 | * ediff-diff.el (ediff-convert-fine-diffs-to-overlays): Make it a defun. |
| 4281 | 4281 | ||
| @@ -7393,7 +7393,7 @@ | |||
| 7393 | 7393 | ||
| 7394 | * help-mode.el (help-mode): Set view-exit-action to bury the | 7394 | * help-mode.el (help-mode): Set view-exit-action to bury the |
| 7395 | buffer instead of fiddling with windows. Simplify code. | 7395 | buffer instead of fiddling with windows. Simplify code. |
| 7396 | (help-mode-finish): When help-window eqs t set it to the selected | 7396 | (help-mode-finish): When help-window equals t set it to the selected |
| 7397 | window and have with-help-window set up view-return-to-alist. | 7397 | window and have with-help-window set up view-return-to-alist. |
| 7398 | (help-buffer): Add autoload cookie. | 7398 | (help-buffer): Add autoload cookie. |
| 7399 | 7399 | ||
diff --git a/lisp/ChangeLog.15 b/lisp/ChangeLog.15 index e9bd06afae8..82f3417ef82 100644 --- a/lisp/ChangeLog.15 +++ b/lisp/ChangeLog.15 | |||
| @@ -6065,7 +6065,7 @@ | |||
| 6065 | 6065 | ||
| 6066 | 2010-10-03 Teodor Zlatanov <tzz@lifelogs.com> | 6066 | 2010-10-03 Teodor Zlatanov <tzz@lifelogs.com> |
| 6067 | 6067 | ||
| 6068 | * net/gnutls.el: Improve docs. Remove starttls and ssl emulation. | 6068 | * net/gnutls.el: Improve docs. Remove STARTTLS and SSL emulation. |
| 6069 | Provide only `open-gnutls-stream' (formerly `open-ssl-stream') and | 6069 | Provide only `open-gnutls-stream' (formerly `open-ssl-stream') and |
| 6070 | `gnutls-negotiate' (formerly `starttls-negotiate'). | 6070 | `gnutls-negotiate' (formerly `starttls-negotiate'). |
| 6071 | Remove trivial wrapper `starttls-open-stream'. | 6071 | Remove trivial wrapper `starttls-open-stream'. |
| @@ -6217,7 +6217,7 @@ | |||
| 6217 | 6217 | ||
| 6218 | 2010-10-01 Lars Magne Ingebrigtsen <larsi@gnus.org> | 6218 | 2010-10-01 Lars Magne Ingebrigtsen <larsi@gnus.org> |
| 6219 | 6219 | ||
| 6220 | * net/tls.el (tls-starttls-switches): Give up on using starttls with | 6220 | * net/tls.el (tls-starttls-switches): Give up on using STARTTLS with |
| 6221 | gnutls-cli. | 6221 | gnutls-cli. |
| 6222 | (tls-program): Add --insecure to be consistent with the defaults from | 6222 | (tls-program): Add --insecure to be consistent with the defaults from |
| 6223 | openssl s_client. Now all three commands are insecure. | 6223 | openssl s_client. Now all three commands are insecure. |
diff --git a/lisp/ChangeLog.7 b/lisp/ChangeLog.7 index a59f1abb2a2..df2f5cce23f 100644 --- a/lisp/ChangeLog.7 +++ b/lisp/ChangeLog.7 | |||
| @@ -1012,7 +1012,7 @@ | |||
| 1012 | bindings for quail-execute-non-quail-command deleted. | 1012 | bindings for quail-execute-non-quail-command deleted. |
| 1013 | (quail-conversion-keymap): Likewise. Add key bindings for | 1013 | (quail-conversion-keymap): Likewise. Add key bindings for |
| 1014 | quail-self-insert-command. | 1014 | quail-self-insert-command. |
| 1015 | (quail-delete-overlays): Chekc overlay-start for overlays before | 1015 | (quail-delete-overlays): Check overlay-start for overlays before |
| 1016 | deleting them. | 1016 | deleting them. |
| 1017 | (quail-mode): This function deleted. | 1017 | (quail-mode): This function deleted. |
| 1018 | (quail-inactivate, quail-activate): New functions. | 1018 | (quail-inactivate, quail-activate): New functions. |
| @@ -19394,7 +19394,7 @@ | |||
| 19394 | * loadup.el: Load language/english and language/tibetan. | 19394 | * loadup.el: Load language/english and language/tibetan. |
| 19395 | 19395 | ||
| 19396 | * mule-cmds.el: Prefix for Mule related commands is changed. | 19396 | * mule-cmds.el: Prefix for Mule related commands is changed. |
| 19397 | (view-hello-file): Allways does correct decoding of HELLO file. | 19397 | (view-hello-file): Always does correct decoding of HELLO file. |
| 19398 | 19398 | ||
| 19399 | * mule-conf.el: Change descriptions for Arabic, Indian, and | 19399 | * mule-conf.el: Change descriptions for Arabic, Indian, and |
| 19400 | Vietnamese character sets. Define Tibetan character sets. | 19400 | Vietnamese character sets. Define Tibetan character sets. |
diff --git a/lisp/emacs-lisp/avl-tree.el b/lisp/emacs-lisp/avl-tree.el index 9ecd4e12020..bc1efc118ef 100644 --- a/lisp/emacs-lisp/avl-tree.el +++ b/lisp/emacs-lisp/avl-tree.el | |||
| @@ -74,7 +74,7 @@ | |||
| 74 | cmpfun) | 74 | cmpfun) |
| 75 | 75 | ||
| 76 | (defmacro avl-tree--root (tree) | 76 | (defmacro avl-tree--root (tree) |
| 77 | ;; Return the root node for an avl-tree. INTERNAL USE ONLY. | 77 | ;; Return the root node for an AVL tree. INTERNAL USE ONLY. |
| 78 | `(avl-tree--node-left (avl-tree--dummyroot ,tree))) | 78 | `(avl-tree--node-left (avl-tree--dummyroot ,tree))) |
| 79 | 79 | ||
| 80 | (defsetf avl-tree--root (tree) (node) | 80 | (defsetf avl-tree--root (tree) (node) |
| @@ -372,7 +372,7 @@ itself." | |||
| 372 | 372 | ||
| 373 | ;;; INTERNAL USE ONLY | 373 | ;;; INTERNAL USE ONLY |
| 374 | (defun avl-tree--do-copy (root) | 374 | (defun avl-tree--do-copy (root) |
| 375 | "Copy the avl tree with ROOT as root. Highly recursive." | 375 | "Copy the AVL tree with ROOT as root. Highly recursive." |
| 376 | (if (null root) | 376 | (if (null root) |
| 377 | nil | 377 | nil |
| 378 | (avl-tree--node-create | 378 | (avl-tree--node-create |
| @@ -401,7 +401,7 @@ itself." | |||
| 401 | ;; front of the STACK, until a leaf is reached. | 401 | ;; front of the STACK, until a leaf is reached. |
| 402 | (let ((node (car (avl-tree--stack-store stack))) | 402 | (let ((node (car (avl-tree--stack-store stack))) |
| 403 | (dir (if (avl-tree--stack-reverse stack) 1 0))) | 403 | (dir (if (avl-tree--stack-reverse stack) 1 0))) |
| 404 | (when node ; check for emtpy stack | 404 | (when node ; check for empty stack |
| 405 | (while (setq node (avl-tree--node-branch node dir)) | 405 | (while (setq node (avl-tree--node-branch node dir)) |
| 406 | (push node (avl-tree--stack-store stack)))))) | 406 | (push node (avl-tree--stack-store stack)))))) |
| 407 | 407 | ||
| @@ -411,21 +411,21 @@ itself." | |||
| 411 | 411 | ||
| 412 | ;; define public alias for constructors so that we can set docstring | 412 | ;; define public alias for constructors so that we can set docstring |
| 413 | (defalias 'avl-tree-create 'avl-tree--create | 413 | (defalias 'avl-tree-create 'avl-tree--create |
| 414 | "Create an empty avl tree. | 414 | "Create an empty AVL tree. |
| 415 | COMPARE-FUNCTION is a function which takes two arguments, A and B, | 415 | COMPARE-FUNCTION is a function which takes two arguments, A and B, |
| 416 | and returns non-nil if A is less than B, and nil otherwise.") | 416 | and returns non-nil if A is less than B, and nil otherwise.") |
| 417 | 417 | ||
| 418 | (defalias 'avl-tree-compare-function 'avl-tree--cmpfun | 418 | (defalias 'avl-tree-compare-function 'avl-tree--cmpfun |
| 419 | "Return the comparison function for the avl tree TREE. | 419 | "Return the comparison function for the AVL tree TREE. |
| 420 | 420 | ||
| 421 | \(fn TREE)") | 421 | \(fn TREE)") |
| 422 | 422 | ||
| 423 | (defun avl-tree-empty (tree) | 423 | (defun avl-tree-empty (tree) |
| 424 | "Return t if avl tree TREE is emtpy, otherwise return nil." | 424 | "Return t if AVL tree TREE is empty, otherwise return nil." |
| 425 | (null (avl-tree--root tree))) | 425 | (null (avl-tree--root tree))) |
| 426 | 426 | ||
| 427 | (defun avl-tree-enter (tree data &optional updatefun) | 427 | (defun avl-tree-enter (tree data &optional updatefun) |
| 428 | "Insert DATA into the avl tree TREE. | 428 | "Insert DATA into the AVL tree TREE. |
| 429 | 429 | ||
| 430 | If an element that matches DATA (according to the tree's | 430 | If an element that matches DATA (according to the tree's |
| 431 | comparison function, see `avl-tree-create') already exists in | 431 | comparison function, see `avl-tree-create') already exists in |
| @@ -433,8 +433,8 @@ TREE, it will be replaced by DATA by default. | |||
| 433 | 433 | ||
| 434 | If UPDATEFUN is supplied and an element matching DATA already | 434 | If UPDATEFUN is supplied and an element matching DATA already |
| 435 | exists in TREE, UPDATEFUN is called with two arguments: DATA, and | 435 | exists in TREE, UPDATEFUN is called with two arguments: DATA, and |
| 436 | the matching element. Its return value replaces the existing | 436 | the matching element. Its return value replaces the existing |
| 437 | element. This value *must* itself match DATA (and hence the | 437 | element. This value *must* itself match DATA (and hence the |
| 438 | pre-existing data), or an error will occur. | 438 | pre-existing data), or an error will occur. |
| 439 | 439 | ||
| 440 | Returns the new data." | 440 | Returns the new data." |
| @@ -443,7 +443,7 @@ Returns the new data." | |||
| 443 | 0 data updatefun))) | 443 | 0 data updatefun))) |
| 444 | 444 | ||
| 445 | (defun avl-tree-delete (tree data &optional test nilflag) | 445 | (defun avl-tree-delete (tree data &optional test nilflag) |
| 446 | "Delete the element matching DATA from the avl tree TREE. | 446 | "Delete the element matching DATA from the AVL tree TREE. |
| 447 | Matching uses the comparison function previously specified in | 447 | Matching uses the comparison function previously specified in |
| 448 | `avl-tree-create' when TREE was created. | 448 | `avl-tree-create' when TREE was created. |
| 449 | 449 | ||
| @@ -456,7 +456,7 @@ distinguished from the case of a successfully deleted null | |||
| 456 | element. | 456 | element. |
| 457 | 457 | ||
| 458 | If supplied, TEST specifies a test that a matching element must | 458 | If supplied, TEST specifies a test that a matching element must |
| 459 | pass before it is deleted. If a matching element is found, it is | 459 | pass before it is deleted. If a matching element is found, it is |
| 460 | passed as an argument to TEST, and is deleted only if the return | 460 | passed as an argument to TEST, and is deleted only if the return |
| 461 | value is non-nil." | 461 | value is non-nil." |
| 462 | (cdr (avl-tree--do-delete (avl-tree--cmpfun tree) | 462 | (cdr (avl-tree--do-delete (avl-tree--cmpfun tree) |
| @@ -465,14 +465,14 @@ value is non-nil." | |||
| 465 | 465 | ||
| 466 | 466 | ||
| 467 | (defun avl-tree-member (tree data &optional nilflag) | 467 | (defun avl-tree-member (tree data &optional nilflag) |
| 468 | "Return the element in the avl tree TREE which matches DATA. | 468 | "Return the element in the AVL tree TREE which matches DATA. |
| 469 | Matching uses the comparison function previously specified in | 469 | Matching uses the comparison function previously specified in |
| 470 | `avl-tree-create' when TREE was created. | 470 | `avl-tree-create' when TREE was created. |
| 471 | 471 | ||
| 472 | If there is no such element in the tree, nil is | 472 | If there is no such element in the tree, nil is |
| 473 | returned. Optional argument NILFLAG specifies a value to return | 473 | returned. Optional argument NILFLAG specifies a value to return |
| 474 | instead of nil in this case. This allows non-existent elements to | 474 | instead of nil in this case. This allows non-existent elements to |
| 475 | be distinguished from a null element. (See also | 475 | be distinguished from a null element. (See also |
| 476 | `avl-tree-member-p', which does this for you.)" | 476 | `avl-tree-member-p', which does this for you.)" |
| 477 | (let ((node (avl-tree--root tree)) | 477 | (let ((node (avl-tree--root tree)) |
| 478 | (compare-function (avl-tree--cmpfun tree))) | 478 | (compare-function (avl-tree--cmpfun tree))) |
| @@ -488,15 +488,15 @@ be distinguished from a null element. (See also | |||
| 488 | 488 | ||
| 489 | 489 | ||
| 490 | (defun avl-tree-member-p (tree data) | 490 | (defun avl-tree-member-p (tree data) |
| 491 | "Return t if an element matching DATA exists in the avl tree TREE, | 491 | "Return t if an element matching DATA exists in the AVL tree TREE. |
| 492 | otherwise return nil. Matching uses the comparison function | 492 | Otherwise return nil. Matching uses the comparison function |
| 493 | previously specified in `avl-tree-create' when TREE was created." | 493 | previously specified in `avl-tree-create' when TREE was created." |
| 494 | (let ((flag '(nil))) | 494 | (let ((flag '(nil))) |
| 495 | (not (eq (avl-tree-member tree data flag) flag)))) | 495 | (not (eq (avl-tree-member tree data flag) flag)))) |
| 496 | 496 | ||
| 497 | 497 | ||
| 498 | (defun avl-tree-map (__map-function__ tree &optional reverse) | 498 | (defun avl-tree-map (__map-function__ tree &optional reverse) |
| 499 | "Modify all elements in the avl tree TREE by applying FUNCTION. | 499 | "Modify all elements in the AVL tree TREE by applying FUNCTION. |
| 500 | 500 | ||
| 501 | Each element is replaced by the return value of FUNCTION applied | 501 | Each element is replaced by the return value of FUNCTION applied |
| 502 | to that element. | 502 | to that element. |
| @@ -512,7 +512,7 @@ descending order if REVERSE is non-nil." | |||
| 512 | 512 | ||
| 513 | 513 | ||
| 514 | (defun avl-tree-mapc (__map-function__ tree &optional reverse) | 514 | (defun avl-tree-mapc (__map-function__ tree &optional reverse) |
| 515 | "Apply FUNCTION to all elements in avl tree TREE, | 515 | "Apply FUNCTION to all elements in AVL tree TREE, |
| 516 | for side-effect only. | 516 | for side-effect only. |
| 517 | 517 | ||
| 518 | FUNCTION is applied to the elements in ascending order, or | 518 | FUNCTION is applied to the elements in ascending order, or |
| @@ -526,7 +526,7 @@ descending order if REVERSE is non-nil." | |||
| 526 | 526 | ||
| 527 | (defun avl-tree-mapf | 527 | (defun avl-tree-mapf |
| 528 | (__map-function__ combinator tree &optional reverse) | 528 | (__map-function__ combinator tree &optional reverse) |
| 529 | "Apply FUNCTION to all elements in avl tree TREE, | 529 | "Apply FUNCTION to all elements in AVL tree TREE, |
| 530 | and combine the results using COMBINATOR. | 530 | and combine the results using COMBINATOR. |
| 531 | 531 | ||
| 532 | The FUNCTION is applied and the results are combined in ascending | 532 | The FUNCTION is applied and the results are combined in ascending |
| @@ -545,7 +545,7 @@ order, or descending order if REVERSE is non-nil." | |||
| 545 | 545 | ||
| 546 | 546 | ||
| 547 | (defun avl-tree-mapcar (__map-function__ tree &optional reverse) | 547 | (defun avl-tree-mapcar (__map-function__ tree &optional reverse) |
| 548 | "Apply FUNCTION to all elements in avl tree TREE, | 548 | "Apply FUNCTION to all elements in AVL tree TREE, |
| 549 | and make a list of the results. | 549 | and make a list of the results. |
| 550 | 550 | ||
| 551 | The FUNCTION is applied and the list constructed in ascending | 551 | The FUNCTION is applied and the list constructed in ascending |
| @@ -578,7 +578,7 @@ is more efficient." | |||
| 578 | (avl-tree--node-data node)))) | 578 | (avl-tree--node-data node)))) |
| 579 | 579 | ||
| 580 | (defun avl-tree-copy (tree) | 580 | (defun avl-tree-copy (tree) |
| 581 | "Return a copy of the avl tree TREE." | 581 | "Return a copy of the AVL tree TREE." |
| 582 | (let ((new-tree (avl-tree-create (avl-tree--cmpfun tree)))) | 582 | (let ((new-tree (avl-tree-create (avl-tree--cmpfun tree)))) |
| 583 | (setf (avl-tree--root new-tree) (avl-tree--do-copy (avl-tree--root tree))) | 583 | (setf (avl-tree--root new-tree) (avl-tree--do-copy (avl-tree--root tree))) |
| 584 | new-tree)) | 584 | new-tree)) |
| @@ -600,7 +600,7 @@ is more efficient." | |||
| 600 | treesize)) | 600 | treesize)) |
| 601 | 601 | ||
| 602 | (defun avl-tree-clear (tree) | 602 | (defun avl-tree-clear (tree) |
| 603 | "Clear the avl tree TREE." | 603 | "Clear the AVL tree TREE." |
| 604 | (setf (avl-tree--root tree) nil)) | 604 | (setf (avl-tree--root tree) nil)) |
| 605 | 605 | ||
| 606 | 606 | ||
| @@ -617,8 +617,8 @@ calling `avl-tree-stack-pop' will give unpredictable results). | |||
| 617 | 617 | ||
| 618 | Operations on these objects are significantly more efficient than | 618 | Operations on these objects are significantly more efficient than |
| 619 | constructing a real stack with `avl-tree-flatten' and using | 619 | constructing a real stack with `avl-tree-flatten' and using |
| 620 | standard stack functions. As such, they can be useful in | 620 | standard stack functions. As such, they can be useful in |
| 621 | implementing efficient algorithms of AVL trees. However, in cases | 621 | implementing efficient algorithms of AVL trees. However, in cases |
| 622 | where mapping functions `avl-tree-mapc', `avl-tree-mapcar' or | 622 | where mapping functions `avl-tree-mapc', `avl-tree-mapcar' or |
| 623 | `avl-tree-mapf' would be sufficient, it is better to use one of | 623 | `avl-tree-mapf' would be sufficient, it is better to use one of |
| 624 | those instead." | 624 | those instead." |
| @@ -629,11 +629,11 @@ those instead." | |||
| 629 | 629 | ||
| 630 | (defun avl-tree-stack-pop (avl-tree-stack &optional nilflag) | 630 | (defun avl-tree-stack-pop (avl-tree-stack &optional nilflag) |
| 631 | "Pop the first element from AVL-TREE-STACK. | 631 | "Pop the first element from AVL-TREE-STACK. |
| 632 | \(See also `avl-tree-stack'\). | 632 | \(See also `avl-tree-stack'). |
| 633 | 633 | ||
| 634 | Returns nil if the stack is empty, or NILFLAG if specified. (The | 634 | Returns nil if the stack is empty, or NILFLAG if specified. |
| 635 | latter allows an empty stack to be distinguished from a null | 635 | \(The latter allows an empty stack to be distinguished from |
| 636 | element stored in the AVL tree.)" | 636 | a null element stored in the AVL tree.)" |
| 637 | (let (node next) | 637 | (let (node next) |
| 638 | (if (not (setq node (pop (avl-tree--stack-store avl-tree-stack)))) | 638 | (if (not (setq node (pop (avl-tree--stack-store avl-tree-stack)))) |
| 639 | nilflag | 639 | nilflag |
| @@ -650,9 +650,9 @@ element stored in the AVL tree.)" | |||
| 650 | "Return the first element of AVL-TREE-STACK, without removing it | 650 | "Return the first element of AVL-TREE-STACK, without removing it |
| 651 | from the stack. | 651 | from the stack. |
| 652 | 652 | ||
| 653 | Returns nil if the stack is empty, or NILFLAG if specified. (The | 653 | Returns nil if the stack is empty, or NILFLAG if specified. |
| 654 | latter allows an empty stack to be distinguished from a null | 654 | \(The latter allows an empty stack to be distinguished from |
| 655 | element stored in the AVL tree.)" | 655 | a null element stored in the AVL tree.)" |
| 656 | (or (car (avl-tree--stack-store avl-tree-stack)) | 656 | (or (car (avl-tree--stack-store avl-tree-stack)) |
| 657 | nilflag)) | 657 | nilflag)) |
| 658 | 658 | ||
diff --git a/lisp/emacs-lisp/cconv.el b/lisp/emacs-lisp/cconv.el index c6e157be776..22db9ddba38 100644 --- a/lisp/emacs-lisp/cconv.el +++ b/lisp/emacs-lisp/cconv.el | |||
| @@ -507,7 +507,7 @@ places where they originally did not directly appear." | |||
| 507 | (defalias 'byte-compile-not-lexical-var-p 'boundp)) | 507 | (defalias 'byte-compile-not-lexical-var-p 'boundp)) |
| 508 | 508 | ||
| 509 | (defun cconv--analyse-use (vardata form varkind) | 509 | (defun cconv--analyse-use (vardata form varkind) |
| 510 | "Analyse the use of a variable. | 510 | "Analyze the use of a variable. |
| 511 | VARDATA should be (BINDER READ MUTATED CAPTURED CALLED). | 511 | VARDATA should be (BINDER READ MUTATED CAPTURED CALLED). |
| 512 | VARKIND is the name of the kind of variable. | 512 | VARKIND is the name of the kind of variable. |
| 513 | FORM is the parent form that binds this var." | 513 | FORM is the parent form that binds this var." |
| @@ -559,7 +559,7 @@ FORM is the parent form that binds this var." | |||
| 559 | (t (let ((varstruct (list arg nil nil nil nil))) | 559 | (t (let ((varstruct (list arg nil nil nil nil))) |
| 560 | (push (cons (list arg) (cdr varstruct)) newvars) | 560 | (push (cons (list arg) (cdr varstruct)) newvars) |
| 561 | (push varstruct newenv))))) | 561 | (push varstruct newenv))))) |
| 562 | (dolist (form body) ;Analyse body forms. | 562 | (dolist (form body) ;Analyze body forms. |
| 563 | (cconv-analyse-form form newenv)) | 563 | (cconv-analyse-form form newenv)) |
| 564 | ;; Summarize resulting data about arguments. | 564 | ;; Summarize resulting data about arguments. |
| 565 | (dolist (vardata newvars) | 565 | (dolist (vardata newvars) |
| @@ -612,7 +612,7 @@ and updates the data stored in ENV." | |||
| 612 | (push (cons binder (cdr varstruct)) newvars) | 612 | (push (cons binder (cdr varstruct)) newvars) |
| 613 | (push varstruct env)))) | 613 | (push varstruct env)))) |
| 614 | 614 | ||
| 615 | (dolist (form body-forms) ; Analyse body forms. | 615 | (dolist (form body-forms) ; Analyze body forms. |
| 616 | (cconv-analyse-form form env)) | 616 | (cconv-analyse-form form env)) |
| 617 | 617 | ||
| 618 | (dolist (vardata newvars) | 618 | (dolist (vardata newvars) |
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index de5f5e0b7c4..39f43bd8e3b 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog | |||
| @@ -2869,7 +2869,7 @@ | |||
| 2869 | we're using an encrypted connection. | 2869 | we're using an encrypted connection. |
| 2870 | 2870 | ||
| 2871 | * proto-stream.el: Alter the interface functions to also return the | 2871 | * proto-stream.el: Alter the interface functions to also return the |
| 2872 | actual stream type used: network or tls. | 2872 | actual stream type used: network or TLS. |
| 2873 | 2873 | ||
| 2874 | 2011-01-25 Julien Danjou <julien@danjou.info> | 2874 | 2011-01-25 Julien Danjou <julien@danjou.info> |
| 2875 | 2875 | ||
| @@ -3598,7 +3598,7 @@ | |||
| 3598 | 3598 | ||
| 3599 | 2010-11-30 Lars Magne Ingebrigtsen <larsi@gnus.org> | 3599 | 2010-11-30 Lars Magne Ingebrigtsen <larsi@gnus.org> |
| 3600 | 3600 | ||
| 3601 | * proto-stream.el (open-protocol-stream): All starttls connections are | 3601 | * proto-stream.el (open-protocol-stream): All STARTTLS connections are |
| 3602 | handled by the network handler. | 3602 | handled by the network handler. |
| 3603 | 3603 | ||
| 3604 | 2010-11-30 Julien Danjou <julien@danjou.info> | 3604 | 2010-11-30 Julien Danjou <julien@danjou.info> |
| @@ -3687,9 +3687,9 @@ | |||
| 3687 | (nnimap-open-connection): Be more backwards-compatible. | 3687 | (nnimap-open-connection): Be more backwards-compatible. |
| 3688 | 3688 | ||
| 3689 | * proto-stream.el (proto-stream-always-use-starttls): New variable. | 3689 | * proto-stream.el (proto-stream-always-use-starttls): New variable. |
| 3690 | (proto-stream-open-starttls): De-duplicate the starttls code. | 3690 | (proto-stream-open-starttls): De-duplicate the STARTTLS code. |
| 3691 | (proto-stream-open-starttls): Folded back into the main function. | 3691 | (proto-stream-open-starttls): Folded back into the main function. |
| 3692 | (proto-stream-open-network): Fix typo in the gnutls path. | 3692 | (proto-stream-open-network): Fix typo in the GnuTLS path. |
| 3693 | (proto-stream-command): Refactor out. | 3693 | (proto-stream-command): Refactor out. |
| 3694 | 3694 | ||
| 3695 | * nntp.el (nntp-open-connection): Fix the STARTTLS command syntax. | 3695 | * nntp.el (nntp-open-connection): Fix the STARTTLS command syntax. |
| @@ -3701,7 +3701,7 @@ | |||
| 3701 | 3701 | ||
| 3702 | * proto-stream.el (proto-stream-open-tls): Delete output from openssl | 3702 | * proto-stream.el (proto-stream-open-tls): Delete output from openssl |
| 3703 | if we're using tls.el. | 3703 | if we're using tls.el. |
| 3704 | (proto-stream-open-network): If we don't have gnutls-cli or gnutls | 3704 | (proto-stream-open-network): If we don't have gnutls-cli or GnuTLS |
| 3705 | built in, then don't try to establish a STARTTLS connection. | 3705 | built in, then don't try to establish a STARTTLS connection. |
| 3706 | 3706 | ||
| 3707 | * nntp.el (nntp-open-connection): Switch on STARTTLS on supported | 3707 | * nntp.el (nntp-open-connection): Switch on STARTTLS on supported |
| @@ -5101,7 +5101,7 @@ | |||
| 5101 | * gnus-sum.el (gnus-summary-set-local-parameters): Ignore the `active' | 5101 | * gnus-sum.el (gnus-summary-set-local-parameters): Ignore the `active' |
| 5102 | non-variable, too. | 5102 | non-variable, too. |
| 5103 | 5103 | ||
| 5104 | * nnimap.el (nnimap-open-connection): Use gnutls STARTTLS, if | 5104 | * nnimap.el (nnimap-open-connection): Use GnuTLS STARTTLS, if |
| 5105 | available. | 5105 | available. |
| 5106 | (nnimap-update-info): Rely more on the current active than the param | 5106 | (nnimap-update-info): Rely more on the current active than the param |
| 5107 | active to avoid marking articles as read too much. | 5107 | active to avoid marking articles as read too much. |
| @@ -5150,8 +5150,8 @@ | |||
| 5150 | group is the "last", so that the backends like nnfolder actually save | 5150 | group is the "last", so that the backends like nnfolder actually save |
| 5151 | their folders. | 5151 | their folders. |
| 5152 | 5152 | ||
| 5153 | * nnimap.el (nnimap-open-connection): If we have gnutls loaded, then | 5153 | * nnimap.el (nnimap-open-connection): If we have GnuTLS loaded, then |
| 5154 | try to use that for the tls stream. | 5154 | try to use that for the TLS stream. |
| 5155 | (nnimap-retrieve-group-data-early): Rework the marks code to heed | 5155 | (nnimap-retrieve-group-data-early): Rework the marks code to heed |
| 5156 | UIDVALIDITY and find out which groups are read-only and not. | 5156 | UIDVALIDITY and find out which groups are read-only and not. |
| 5157 | (nnimap-get-flags): Use the same marks parsing code as the rest of | 5157 | (nnimap-get-flags): Use the same marks parsing code as the rest of |
| @@ -6370,8 +6370,8 @@ | |||
| 6370 | * gnus-int.el (gnus-request-update-info): Protect against backends not | 6370 | * gnus-int.el (gnus-request-update-info): Protect against backends not |
| 6371 | having the function. | 6371 | having the function. |
| 6372 | 6372 | ||
| 6373 | * nnimap.el (nnimap-stream): Mention starttls. | 6373 | * nnimap.el (nnimap-stream): Mention STARTTLS. |
| 6374 | (nnimap-open-connection): Add starttls support. | 6374 | (nnimap-open-connection): Add STARTTLS support. |
| 6375 | 6375 | ||
| 6376 | 2010-09-23 Andrew Cohen <cohen@andy.bu.edu> | 6376 | 2010-09-23 Andrew Cohen <cohen@andy.bu.edu> |
| 6377 | 6377 | ||
| @@ -18651,7 +18651,7 @@ | |||
| 18651 | 2004-09-28 Kevin Greiner <kgreiner@compsol.cc> | 18651 | 2004-09-28 Kevin Greiner <kgreiner@compsol.cc> |
| 18652 | 18652 | ||
| 18653 | * gnus-agent.el (gnus-agent-synchronize-group-flags): Replace | 18653 | * gnus-agent.el (gnus-agent-synchronize-group-flags): Replace |
| 18654 | gnus-requst-update-info with explicit code to sync the in-memory | 18654 | gnus-request-update-info with explicit code to sync the in-memory |
| 18655 | info read flags with the marks being sync'd to the backend. | 18655 | info read flags with the marks being sync'd to the backend. |
| 18656 | 18656 | ||
| 18657 | * gnus-util.el (gnus-pp): Add optional stream to match pp API. | 18657 | * gnus-util.el (gnus-pp): Add optional stream to match pp API. |
| @@ -19765,7 +19765,7 @@ | |||
| 19765 | 19765 | ||
| 19766 | 2004-05-26 Simon Josefsson <jas@extundo.com> | 19766 | 2004-05-26 Simon Josefsson <jas@extundo.com> |
| 19767 | 19767 | ||
| 19768 | * starttls.el: Merge with my GNUTLS based starttls.el. | 19768 | * starttls.el: Merge with my GnuTLS based starttls.el. |
| 19769 | (starttls-gnutls-program, starttls-use-gnutls) | 19769 | (starttls-gnutls-program, starttls-use-gnutls) |
| 19770 | (starttls-extra-arguments, starttls-process-connection-type) | 19770 | (starttls-extra-arguments, starttls-process-connection-type) |
| 19771 | (starttls-connect, starttls-failure, starttls-success): | 19771 | (starttls-connect, starttls-failure, starttls-success): |
diff --git a/lisp/gnus/ChangeLog.2 b/lisp/gnus/ChangeLog.2 index e519ce340c2..952aae28b17 100644 --- a/lisp/gnus/ChangeLog.2 +++ b/lisp/gnus/ChangeLog.2 | |||
| @@ -1396,7 +1396,7 @@ | |||
| 1396 | * tls.el (tls-process-connection-type): Doc fix. | 1396 | * tls.el (tls-process-connection-type): Doc fix. |
| 1397 | 1397 | ||
| 1398 | * imap.el (imap-starttls-open): Rewrite, should support both old | 1398 | * imap.el (imap-starttls-open): Rewrite, should support both old |
| 1399 | starttls.el and new starttls.el that uses GNUTLS. | 1399 | starttls.el and new starttls.el that uses GnuTLS. |
| 1400 | 1400 | ||
| 1401 | 2003-09-18 Katsumi Yamaoka <yamaoka@jpl.org> | 1401 | 2003-09-18 Katsumi Yamaoka <yamaoka@jpl.org> |
| 1402 | 1402 | ||
diff --git a/lisp/net/gnutls.el b/lisp/net/gnutls.el index 9cb071b185d..18471782f2c 100644 --- a/lisp/net/gnutls.el +++ b/lisp/net/gnutls.el | |||
| @@ -108,7 +108,7 @@ trust and key files, and priority string." | |||
| 108 | trustfiles crlfiles keylist min-prime-bits | 108 | trustfiles crlfiles keylist min-prime-bits |
| 109 | verify-flags verify-error verify-hostname-error | 109 | verify-flags verify-error verify-hostname-error |
| 110 | &allow-other-keys) | 110 | &allow-other-keys) |
| 111 | "Negotiate a SSL/TLS connection. Returns proc. Signals gnutls-error. | 111 | "Negotiate a SSL/TLS connection. Returns proc. Signals gnutls-error. |
| 112 | 112 | ||
| 113 | Note arguments are passed CL style, :type TYPE instead of just TYPE. | 113 | Note arguments are passed CL style, :type TYPE instead of just TYPE. |
| 114 | 114 | ||
diff --git a/nt/ChangeLog b/nt/ChangeLog index 3aa7bd658e4..3de7192ae99 100644 --- a/nt/ChangeLog +++ b/nt/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2011-11-25 Juanma Barranquero <lekktu@gmail.com> | ||
| 2 | |||
| 3 | * configure.bat: Fix typos. | ||
| 4 | |||
| 1 | 2011-11-25 Eli Zaretskii <eliz@gnu.org> | 5 | 2011-11-25 Eli Zaretskii <eliz@gnu.org> |
| 2 | 6 | ||
| 3 | * INSTALL: Elaborate on debugging fatal errors. | 7 | * INSTALL: Elaborate on debugging fatal errors. |
diff --git a/nt/INSTALL b/nt/INSTALL index 7dc027f06f4..9947cd86a34 100644 --- a/nt/INSTALL +++ b/nt/INSTALL | |||
| @@ -606,7 +606,7 @@ | |||
| 606 | Emacs on Windows uses more than one thread. When Emacs aborts due | 606 | Emacs on Windows uses more than one thread. When Emacs aborts due |
| 607 | to a fatal error, the current thread may not be the application | 607 | to a fatal error, the current thread may not be the application |
| 608 | thread running Emacs code. Therefore, to produce a meaningful | 608 | thread running Emacs code. Therefore, to produce a meaningful |
| 609 | backtrace from a debugger, you need to iunstruct it to show the | 609 | backtrace from a debugger, you need to instruct it to show the |
| 610 | backtrace for every thread. With GDB, you do it like this: | 610 | backtrace for every thread. With GDB, you do it like this: |
| 611 | 611 | ||
| 612 | (gdb) thread apply all backtrace | 612 | (gdb) thread apply all backtrace |
diff --git a/nt/configure.bat b/nt/configure.bat index 45d966fc34d..c503900274e 100755 --- a/nt/configure.bat +++ b/nt/configure.bat | |||
| @@ -155,7 +155,7 @@ echo. --without-jpeg do not use JPEG library even if it is installed | |||
| 155 | echo. --without-gif do not use GIF library even if it is installed | 155 | echo. --without-gif do not use GIF library even if it is installed |
| 156 | echo. --without-tiff do not use TIFF library even if it is installed | 156 | echo. --without-tiff do not use TIFF library even if it is installed |
| 157 | echo. --without-xpm do not use XPM library even if it is installed | 157 | echo. --without-xpm do not use XPM library even if it is installed |
| 158 | echo. --without-gnutls do not use GNUTLS library even if it is installed | 158 | echo. --without-gnutls do not use GnuTLS library even if it is installed |
| 159 | echo. --with-svg use the RSVG library (experimental) | 159 | echo. --with-svg use the RSVG library (experimental) |
| 160 | echo. --distfiles path to files for make dist, e.g. libXpm.dll | 160 | echo. --distfiles path to files for make dist, e.g. libXpm.dll |
| 161 | if "%use_extensions%" == "0" goto end | 161 | if "%use_extensions%" == "0" goto end |
| @@ -563,7 +563,7 @@ set HAVE_GNUTLS= | |||
| 563 | goto :tlsDone | 563 | goto :tlsDone |
| 564 | 564 | ||
| 565 | :haveTls | 565 | :haveTls |
| 566 | echo ...GNUTLS header available, building with GNUTLS support. | 566 | echo ...GnuTLS header available, building with GnuTLS support. |
| 567 | set HAVE_GNUTLS=1 | 567 | set HAVE_GNUTLS=1 |
| 568 | 568 | ||
| 569 | :tlsDone | 569 | :tlsDone |
diff --git a/src/ChangeLog b/src/ChangeLog index 1614b02786b..fe7080f9c02 100644 --- a/src/ChangeLog +++ b/src/ChangeLog | |||
| @@ -7730,7 +7730,7 @@ | |||
| 7730 | * keyboard.c (Fcommand_execute, Fsuspend_emacs, safe_run_hooks_1): | 7730 | * keyboard.c (Fcommand_execute, Fsuspend_emacs, safe_run_hooks_1): |
| 7731 | Use Frun_hooks. | 7731 | Use Frun_hooks. |
| 7732 | (command_loop_1): Use Frun_hooks. Call safe_run_hooks | 7732 | (command_loop_1): Use Frun_hooks. Call safe_run_hooks |
| 7733 | unconditionnaly since it does the check itself. | 7733 | unconditionally since it does the check itself. |
| 7734 | 7734 | ||
| 7735 | 2011-03-23 Paul Eggert <eggert@cs.ucla.edu> | 7735 | 2011-03-23 Paul Eggert <eggert@cs.ucla.edu> |
| 7736 | 7736 | ||
diff --git a/src/ChangeLog.10 b/src/ChangeLog.10 index 6acc09c2164..4c0590aa94b 100644 --- a/src/ChangeLog.10 +++ b/src/ChangeLog.10 | |||
| @@ -4346,7 +4346,7 @@ | |||
| 4346 | 4346 | ||
| 4347 | * textprop.c (Fremove_list_of_text_properties): | 4347 | * textprop.c (Fremove_list_of_text_properties): |
| 4348 | Ensure modify_region is called only when buffer is modified and that | 4348 | Ensure modify_region is called only when buffer is modified and that |
| 4349 | signal_after_change is allways called in that case. | 4349 | signal_after_change is always called in that case. |
| 4350 | 4350 | ||
| 4351 | * print.c (PRINTFINISH): Call signal_after_change. | 4351 | * print.c (PRINTFINISH): Call signal_after_change. |
| 4352 | 4352 | ||
diff --git a/src/ChangeLog.11 b/src/ChangeLog.11 index cb8b413a514..7c027f1caec 100644 --- a/src/ChangeLog.11 +++ b/src/ChangeLog.11 | |||
| @@ -966,7 +966,7 @@ | |||
| 966 | ($(BLD)/editfns.$(O)): Depend on ../lib/strftime.h. | 966 | ($(BLD)/editfns.$(O)): Depend on ../lib/strftime.h. |
| 967 | ($(BLD)/print.$(O)): Depend on ../lib/ftoastr.h and ../lib/intprops.h. | 967 | ($(BLD)/print.$(O)): Depend on ../lib/ftoastr.h and ../lib/intprops.h. |
| 968 | 968 | ||
| 969 | * deps.mk: Update for recent changes: gnutls support, gnulib | 969 | * deps.mk: Update for recent changes: GnuTLS support, gnulib |
| 970 | imports, addition of globals.h. | 970 | imports, addition of globals.h. |
| 971 | 971 | ||
| 972 | * makefile.w32-in ($(BLD)/sysdep.$(O)): Depend on | 972 | * makefile.w32-in ($(BLD)/sysdep.$(O)): Depend on |
| @@ -3268,7 +3268,7 @@ | |||
| 3268 | 2010-10-10 Lars Magne Ingebrigtsen <larsi@gnus.org> | 3268 | 2010-10-10 Lars Magne Ingebrigtsen <larsi@gnus.org> |
| 3269 | 3269 | ||
| 3270 | * gnutls.c (emacs_gnutls_write): If we're trying to write before | 3270 | * gnutls.c (emacs_gnutls_write): If we're trying to write before |
| 3271 | gnutls is ready, return EAGAIN as the errno. | 3271 | GnuTLS is ready, return EAGAIN as the errno. |
| 3272 | 3272 | ||
| 3273 | 2010-10-10 Dan Nicolaescu <dann@ics.uci.edu> | 3273 | 2010-10-10 Dan Nicolaescu <dann@ics.uci.edu> |
| 3274 | 3274 | ||
| @@ -3585,12 +3585,12 @@ | |||
| 3585 | * process.c (make_process): Set the gnutls_p field to zero by | 3585 | * process.c (make_process): Set the gnutls_p field to zero by |
| 3586 | default. | 3586 | default. |
| 3587 | (read_process_output): Always call the gnutls_read function if the | 3587 | (read_process_output): Always call the gnutls_read function if the |
| 3588 | stream is a gnutls stream. | 3588 | stream is a GnuTLS stream. |
| 3589 | (send_process): Ditto for writes. | 3589 | (send_process): Ditto for writes. |
| 3590 | 3590 | ||
| 3591 | * gnutls.c (emacs_gnutls_write, emacs_gnutls_read): Refuse to read | 3591 | * gnutls.c (emacs_gnutls_write, emacs_gnutls_read): Refuse to read |
| 3592 | or write anything until the state is GNUTLS_STAGE_READY. | 3592 | or write anything until the state is GNUTLS_STAGE_READY. |
| 3593 | (Fgnutls_boot): Mark the stream as being a gnutls stream. | 3593 | (Fgnutls_boot): Mark the stream as being a GnuTLS stream. |
| 3594 | 3594 | ||
| 3595 | 2010-09-29 Eli Zaretskii <eliz@gnu.org> | 3595 | 2010-09-29 Eli Zaretskii <eliz@gnu.org> |
| 3596 | 3596 | ||
| @@ -27366,7 +27366,7 @@ | |||
| 27366 | 27366 | ||
| 27367 | * ccl.c: Include "character.h". | 27367 | * ccl.c: Include "character.h". |
| 27368 | (Qccl, Qcclp): New variables. | 27368 | (Qccl, Qcclp): New variables. |
| 27369 | (CCL_WRITE_CHAR): Alway treat the arg CH as a character even if | 27369 | (CCL_WRITE_CHAR): Always treat the arg CH as a character even if |
| 27370 | it's less than 256. | 27370 | it's less than 256. |
| 27371 | (CCL_WRITE_MULTIBYTE_CHAR): Delete. | 27371 | (CCL_WRITE_MULTIBYTE_CHAR): Delete. |
| 27372 | (CCL_WRITE_STRING, CCL_READ_CHAR): Adjust for the change of SRC | 27372 | (CCL_WRITE_STRING, CCL_READ_CHAR): Adjust for the change of SRC |
diff --git a/src/ChangeLog.6 b/src/ChangeLog.6 index af97d0de7b4..74141f6813a 100644 --- a/src/ChangeLog.6 +++ b/src/ChangeLog.6 | |||
| @@ -718,7 +718,7 @@ | |||
| 718 | (init_ntproc) [HAVE_SOCKETS]: Only load winsock library on startup | 718 | (init_ntproc) [HAVE_SOCKETS]: Only load winsock library on startup |
| 719 | if PRELOAD_WINSOCK is set in environment (or registry). | 719 | if PRELOAD_WINSOCK is set in environment (or registry). |
| 720 | 720 | ||
| 721 | * ntproc.c (Fwin32_has_winsock, Fwin32_unload_winsock) | 721 | * ntproc.c (Fwin32_has_winsock, Fwin32_unload_winsock) |
| 722 | [HAVE_SOCKETS]: New functions. | 722 | [HAVE_SOCKETS]: New functions. |
| 723 | (syms_of_ntproc) [HAVE_SOCKETS]: defsubr them. | 723 | (syms_of_ntproc) [HAVE_SOCKETS]: defsubr them. |
| 724 | 724 | ||
| @@ -845,7 +845,7 @@ | |||
| 845 | (timer_id): Renamed to mouse_button_timer. | 845 | (timer_id): Renamed to mouse_button_timer. |
| 846 | (saved_mouse_move_msg, mouse_move_timer): New variables. | 846 | (saved_mouse_move_msg, mouse_move_timer): New variables. |
| 847 | (win_msg_worker): Delete WM_TIMER code. | 847 | (win_msg_worker): Delete WM_TIMER code. |
| 848 | (win32_wnd_proc): Handle WM_TIMER events here. Use separate timers | 848 | (win32_wnd_proc): Handle WM_TIMER events here. Use separate timers |
| 849 | for mouse down and mouse move (including scroll bar drag) events. | 849 | for mouse down and mouse move (including scroll bar drag) events. |
| 850 | Add new handling code for WM_VSCROLL and WM_MOUSEMOVE events. | 850 | Add new handling code for WM_VSCROLL and WM_MOUSEMOVE events. |
| 851 | Only filter WM_MOUSEMOVE events when a button is held down. | 851 | Only filter WM_MOUSEMOVE events when a button is held down. |
| @@ -1100,17 +1100,17 @@ | |||
| 1100 | 1100 | ||
| 1101 | (nt_sleep): Renamed to sys_sleep. | 1101 | (nt_sleep): Renamed to sys_sleep. |
| 1102 | 1102 | ||
| 1103 | (rename): Renamed to sys_rename. Always rename to a temporary name | 1103 | (rename): Renamed to sys_rename. Always rename to a temporary name |
| 1104 | first on Windows 95. Unlink new name first if necessary. | 1104 | first on Windows 95. Unlink new name first if necessary. |
| 1105 | 1105 | ||
| 1106 | (dir_finding): Variable deleted. | 1106 | (dir_finding): Variable deleted. |
| 1107 | (dir_is_fat, dir_pathname): New variables. | 1107 | (dir_is_fat, dir_pathname): New variables. |
| 1108 | 1108 | ||
| 1109 | (openddir): Fail if dir_find_handle is in use. Save directory name | 1109 | (openddir): Fail if dir_find_handle is in use. Save directory name |
| 1110 | in dir_pathname, and set dir_is_fat appropriately. | 1110 | in dir_pathname, and set dir_is_fat appropriately. |
| 1111 | (closedir, readdir): Use dir_find_handle in place of dir_finding. | 1111 | (closedir, readdir): Use dir_find_handle in place of dir_finding. |
| 1112 | (readdir): Copy directory name from dir_pathname on first | 1112 | (readdir): Copy directory name from dir_pathname on first |
| 1113 | call. Use IS_DIRECTORY_SEP instead of IS_ANY_SEP. Force filename | 1113 | call. Use IS_DIRECTORY_SEP instead of IS_ANY_SEP. Force filename |
| 1114 | to be lower case on FAT volumes. | 1114 | to be lower case on FAT volumes. |
| 1115 | 1115 | ||
| 1116 | (getpwuid): Move struct passwd initialization to init_user_info, | 1116 | (getpwuid): Move struct passwd initialization to init_user_info, |
| @@ -1141,7 +1141,7 @@ | |||
| 1141 | (get_emacs_configuration): Detect Windows flavor (Windows 95 or | 1141 | (get_emacs_configuration): Detect Windows flavor (Windows 95 or |
| 1142 | NT) at run-time. Change OS name for Windows 95 to be "win95". | 1142 | NT) at run-time. Change OS name for Windows 95 to be "win95". |
| 1143 | 1143 | ||
| 1144 | (fd_info): New variable. Array of extra info for file descriptors | 1144 | (fd_info): New variable. Array of extra info for file descriptors |
| 1145 | needed for pipe/socket support. | 1145 | needed for pipe/socket support. |
| 1146 | 1146 | ||
| 1147 | (utc_base_ft, utc_base, init): New internal variables used for | 1147 | (utc_base_ft, utc_base, init): New internal variables used for |
| @@ -1206,7 +1206,7 @@ | |||
| 1206 | * ntinevt.c (win32_kdb_patch_key): Initialize isdead. | 1206 | * ntinevt.c (win32_kdb_patch_key): Initialize isdead. |
| 1207 | (key_event) [HAVE_NTGUI]: Use Windows key code. | 1207 | (key_event) [HAVE_NTGUI]: Use Windows key code. |
| 1208 | 1208 | ||
| 1209 | * ntproc.c: Include config.h after CRT headers. Include fcntl.h. | 1209 | * ntproc.c: Include config.h after CRT headers. Include fcntl.h. |
| 1210 | (child_process, MAX_CHILDREN, CHILD_ACTIVE): Moved to nt.h. | 1210 | (child_process, MAX_CHILDREN, CHILD_ACTIVE): Moved to nt.h. |
| 1211 | (DebugPrint): New macro. | 1211 | (DebugPrint): New macro. |
| 1212 | (new_child): Create input event structures for child processes. | 1212 | (new_child): Create input event structures for child processes. |
| @@ -2580,7 +2580,7 @@ | |||
| 2580 | (win32_fill_rect, dumpglyphs, do_line_dance, x_draw_box): | 2580 | (win32_fill_rect, dumpglyphs, do_line_dance, x_draw_box): |
| 2581 | Use Get/ReleaseFrameDC. | 2581 | Use Get/ReleaseFrameDC. |
| 2582 | (win32_update_begin): Regenerate palette if required. | 2582 | (win32_update_begin): Regenerate palette if required. |
| 2583 | (w32_read_socket): Use FALSE. Handle WM_PALETTECHANGED. | 2583 | (w32_read_socket): Use FALSE. Handle WM_PALETTECHANGED. |
| 2584 | (win32_term_init): Use GetDC directly. | 2584 | (win32_term_init): Use GetDC directly. |
| 2585 | Enable palette in display structure. | 2585 | Enable palette in display structure. |
| 2586 | Predefine white and black. | 2586 | Predefine white and black. |
| @@ -4501,7 +4501,7 @@ | |||
| 4501 | * msdos.c (putchar): Call internal_flush instead of _flsbuf. | 4501 | * msdos.c (putchar): Call internal_flush instead of _flsbuf. |
| 4502 | (DO_TERMSCRIPT): New macro to support open-termscript. | 4502 | (DO_TERMSCRIPT): New macro to support open-termscript. |
| 4503 | (internal_flush): Corrected handling of flush in middle of | 4503 | (internal_flush): Corrected handling of flush in middle of |
| 4504 | escape sequences. Handle screen width > 127. | 4504 | escape sequences. Handle screen width > 127. |
| 4505 | (flush_escape): New function for use by internal_flush. | 4505 | (flush_escape): New function for use by internal_flush. |
| 4506 | (sys_select): New MS-DOS specific version with us timing. | 4506 | (sys_select): New MS-DOS specific version with us timing. |
| 4507 | (EMACSCOLORS): New environment variable. | 4507 | (EMACSCOLORS): New environment variable. |