diff options
| author | Paul Eggert | 2017-01-01 01:02:47 -0800 |
|---|---|---|
| committer | Paul Eggert | 2017-01-01 01:02:47 -0800 |
| commit | 61848d2da32bb889d714fcddcb7dfd6dfa1b502d (patch) | |
| tree | bec14e4a5ad9051ad310273db7fcc1d2164488b7 /lisp | |
| parent | bbb683f04aa0960422b12af5ef79679344fac19c (diff) | |
| parent | 697167b5432a89db009238cf5cbddc61e69ad339 (diff) | |
| download | emacs-61848d2da32bb889d714fcddcb7dfd6dfa1b502d.tar.gz emacs-61848d2da32bb889d714fcddcb7dfd6dfa1b502d.zip | |
Merge from origin/emacs-25
697167b ; Improve wording of previous change in variables.texi
d7973e8 Document 'default-toplevel-value' and 'set-default-toplevel-v...
8b71826 Don't modify minibuffer variables globally
5b5e036 Revert to pre-25.1 behavior in ffap
19994a1 * lisp/ffap.el: Fix obsolete comment referencing ffap-bug.
3ace730 Attempt to fix 64-bit AIX build
f69bd79 Clarify usage of 'ediff-cleanup-hook' (Bug#24675)
c04ac8a Document that variable binding order is unspecified
272554a * lisp/desktop.el (desktop-buffers-not-to-save): Doc fix.
08de101 Fix M-x hints on Mac port
86a297a Work around reporting a dpi change in apply_xft_settings
cf1f985 ; lisp/skeleton.el (skeleton-insert): Fix typo in last change
9e1209d Amend the version number of CC Mode 5.33 -> 5.32.99. Don't m...
88cdf14 Improve skeleton docstrings
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/desktop.el | 5 | ||||
| -rw-r--r-- | lisp/ffap.el | 10 | ||||
| -rw-r--r-- | lisp/files.el | 14 | ||||
| -rw-r--r-- | lisp/progmodes/cc-defs.el | 2 | ||||
| -rw-r--r-- | lisp/simple.el | 1 | ||||
| -rw-r--r-- | lisp/skeleton.el | 12 |
6 files changed, 26 insertions, 18 deletions
diff --git a/lisp/desktop.el b/lisp/desktop.el index 063208fee69..a88d39a5e62 100644 --- a/lisp/desktop.el +++ b/lisp/desktop.el | |||
| @@ -380,7 +380,10 @@ modes are restored automatically; they should not be listed here." | |||
| 380 | :group 'desktop) | 380 | :group 'desktop) |
| 381 | 381 | ||
| 382 | (defcustom desktop-buffers-not-to-save "\\` " | 382 | (defcustom desktop-buffers-not-to-save "\\` " |
| 383 | "Regexp identifying buffers that are to be excluded from saving." | 383 | "Regexp identifying buffers that are to be excluded from saving. |
| 384 | This is in effect only for buffers that don't visit files. | ||
| 385 | To exclude buffers that visit files, use `desktop-files-not-to-save' | ||
| 386 | or `desktop-modes-not-to-save'." | ||
| 384 | :type '(choice (const :tag "None" nil) | 387 | :type '(choice (const :tag "None" nil) |
| 385 | regexp) | 388 | regexp) |
| 386 | :version "24.4" ; skip invisible temporary buffers | 389 | :version "24.4" ; skip invisible temporary buffers |
diff --git a/lisp/ffap.el b/lisp/ffap.el index 99bb65faafe..a7983f08395 100644 --- a/lisp/ffap.el +++ b/lisp/ffap.el | |||
| @@ -32,7 +32,7 @@ | |||
| 32 | ;; (`ffap-require-prefix' swaps these behaviors). This is useful for | 32 | ;; (`ffap-require-prefix' swaps these behaviors). This is useful for |
| 33 | ;; following references in situations such as mail or news buffers, | 33 | ;; following references in situations such as mail or news buffers, |
| 34 | ;; README's, MANIFEST's, and so on. Submit bugs or suggestions with | 34 | ;; README's, MANIFEST's, and so on. Submit bugs or suggestions with |
| 35 | ;; M-x ffap-bug. | 35 | ;; M-x report-emacs-bug. |
| 36 | ;; | 36 | ;; |
| 37 | ;; For the default installation, add this line to your init file: | 37 | ;; For the default installation, add this line to your init file: |
| 38 | ;; | 38 | ;; |
| @@ -162,8 +162,12 @@ schemes (e.g. \"ftp\"); in that case, only convert those URLs." | |||
| 162 | :group 'ffap | 162 | :group 'ffap |
| 163 | :version "24.3") | 163 | :version "24.3") |
| 164 | 164 | ||
| 165 | (defcustom ffap-lax-url nil | 165 | (defcustom ffap-lax-url t |
| 166 | "If non-nil, allow lax URL matching." | 166 | "If non-nil, allow lax URL matching. |
| 167 | The default non-nil value might produce false URLs in C++ code | ||
| 168 | with symbols like \"std::find\". On the other hand, setting | ||
| 169 | this to nil will disable recognition of URLs that are not | ||
| 170 | well-formed, such as \"user@host\" or \"<user@host>\"." | ||
| 167 | :type 'boolean | 171 | :type 'boolean |
| 168 | :group 'ffap | 172 | :group 'ffap |
| 169 | :version "25.1") | 173 | :version "25.1") |
diff --git a/lisp/files.el b/lisp/files.el index 790f6cedfd6..71398227407 100644 --- a/lisp/files.el +++ b/lisp/files.el | |||
| @@ -716,13 +716,13 @@ The path separator is colon in GNU and GNU-like systems." | |||
| 716 | ;; (which will lead to the use of B/a). | 716 | ;; (which will lead to the use of B/a). |
| 717 | (minibuffer-with-setup-hook | 717 | (minibuffer-with-setup-hook |
| 718 | (lambda () | 718 | (lambda () |
| 719 | (setq minibuffer-completion-table | 719 | (setq-local minibuffer-completion-table |
| 720 | (apply-partially #'locate-file-completion-table | 720 | (apply-partially #'locate-file-completion-table |
| 721 | cd-path nil)) | 721 | cd-path nil)) |
| 722 | (setq minibuffer-completion-predicate | 722 | (setq-local minibuffer-completion-predicate |
| 723 | (lambda (dir) | 723 | (lambda (dir) |
| 724 | (locate-file dir cd-path nil | 724 | (locate-file dir cd-path nil |
| 725 | (lambda (f) (and (file-directory-p f) 'dir-ok)))))) | 725 | (lambda (f) (and (file-directory-p f) 'dir-ok)))))) |
| 726 | (unless cd-path | 726 | (unless cd-path |
| 727 | (setq cd-path (or (parse-colon-path (getenv "CDPATH")) | 727 | (setq cd-path (or (parse-colon-path (getenv "CDPATH")) |
| 728 | (list "./")))) | 728 | (list "./")))) |
diff --git a/lisp/progmodes/cc-defs.el b/lisp/progmodes/cc-defs.el index ab4baa247b9..f1943a82163 100644 --- a/lisp/progmodes/cc-defs.el +++ b/lisp/progmodes/cc-defs.el | |||
| @@ -94,7 +94,7 @@ | |||
| 94 | 94 | ||
| 95 | ;;; Variables also used at compile time. | 95 | ;;; Variables also used at compile time. |
| 96 | 96 | ||
| 97 | (defconst c-version "5.33" | 97 | (defconst c-version "5.32.99" |
| 98 | "CC Mode version number.") | 98 | "CC Mode version number.") |
| 99 | 99 | ||
| 100 | (defconst c-version-sym (intern c-version)) | 100 | (defconst c-version-sym (intern c-version)) |
diff --git a/lisp/simple.el b/lisp/simple.el index 0ee2f060e5e..b72e75d169b 100644 --- a/lisp/simple.el +++ b/lisp/simple.el | |||
| @@ -1699,6 +1699,7 @@ If the value is non-nil and not a number, we wait 2 seconds." | |||
| 1699 | ;; Don't show the help message if the binding isn't | 1699 | ;; Don't show the help message if the binding isn't |
| 1700 | ;; significantly shorter than the M-x command the user typed. | 1700 | ;; significantly shorter than the M-x command the user typed. |
| 1701 | (< len (- max 5)))) | 1701 | (< len (- max 5)))) |
| 1702 | (input-pending-p) ;Dummy call to trigger input-processing, bug#23002. | ||
| 1702 | (let ((candidate (pop candidates))) | 1703 | (let ((candidate (pop candidates))) |
| 1703 | (when (equal name | 1704 | (when (equal name |
| 1704 | (car-safe (completion-try-completion | 1705 | (car-safe (completion-try-completion |
diff --git a/lisp/skeleton.el b/lisp/skeleton.el index 0e81e2d74c6..c563a9cd0cd 100644 --- a/lisp/skeleton.el +++ b/lisp/skeleton.el | |||
| @@ -59,8 +59,7 @@ region.") | |||
| 59 | (make-obsolete-variable 'skeleton-autowrap nil "24.5") | 59 | (make-obsolete-variable 'skeleton-autowrap nil "24.5") |
| 60 | 60 | ||
| 61 | (defvar skeleton-end-newline t | 61 | (defvar skeleton-end-newline t |
| 62 | "If non-nil, make sure that the skeleton inserted ends with a newline. | 62 | "If non-nil, make sure that the skeleton inserted ends with a newline.") |
| 63 | This just influences the way the default `skeleton-end-hook' behaves.") | ||
| 64 | 63 | ||
| 65 | (defvar skeleton-end-hook nil | 64 | (defvar skeleton-end-hook nil |
| 66 | "Hook called at end of skeleton but before going to point of interest. | 65 | "Hook called at end of skeleton but before going to point of interest. |
| @@ -187,6 +186,10 @@ The optional third argument STR, if specified, is the value for the | |||
| 187 | variable `str' within the skeleton. When this is non-nil, the | 186 | variable `str' within the skeleton. When this is non-nil, the |
| 188 | interactor gets ignored, and this should be a valid skeleton element. | 187 | interactor gets ignored, and this should be a valid skeleton element. |
| 189 | 188 | ||
| 189 | When done with skeleton, but before going back to `_'-point, add | ||
| 190 | a newline (unless `skeleton-end-newline' is nil) and run the hook | ||
| 191 | `skeleton-end-hook'. | ||
| 192 | |||
| 190 | SKELETON is made up as (INTERACTOR ELEMENT ...). INTERACTOR may be nil if | 193 | SKELETON is made up as (INTERACTOR ELEMENT ...). INTERACTOR may be nil if |
| 191 | not needed, a prompt-string or an expression for complex read functions. | 194 | not needed, a prompt-string or an expression for complex read functions. |
| 192 | 195 | ||
| @@ -235,10 +238,7 @@ available: | |||
| 235 | then: insert previously read string once more | 238 | then: insert previously read string once more |
| 236 | help help-form during interaction with the user or nil | 239 | help help-form during interaction with the user or nil |
| 237 | input initial input (string or cons with index) while reading str | 240 | input initial input (string or cons with index) while reading str |
| 238 | v1, v2 local variables for memorizing anything you want | 241 | v1, v2 local variables for memorizing anything you want" |
| 239 | |||
| 240 | When done with skeleton, but before going back to `_'-point call | ||
| 241 | `skeleton-end-hook' if that is non-nil." | ||
| 242 | (let ((skeleton-regions regions)) | 242 | (let ((skeleton-regions regions)) |
| 243 | (and skeleton-regions | 243 | (and skeleton-regions |
| 244 | (setq skeleton-regions | 244 | (setq skeleton-regions |