diff options
| author | Glenn Morris <rgm@gnu.org> | 2017-04-27 22:03:56 -0700 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2017-04-27 22:03:56 -0700 |
| commit | cee4128135d0d9fd6032a0134b649d5fc81370c0 (patch) | |
| tree | e62e97cbe32f4ca4f9540fe528dac0394702efdf /lisp | |
| parent | f0daad9adc5b8fd19f60f89e96b286a78f7162b3 (diff) | |
| parent | 784602b10506c50075aa9463891a47380ebea55f (diff) | |
| download | emacs-cee4128135d0d9fd6032a0134b649d5fc81370c0.tar.gz | |
Merge from origin/emacs-25
784602b1050 (origin/emacs-25) ; Add release notice
3a34412caae (tag: emacs-25.2) Set Emacs version to 25.2 and update AU...
56a4461a48d ; Move stray item from admin/notes/repo to CONTRIBUTE
2b0d1118199 ; CONTRIBUTE: Remove stray header.
f2ab09ec60d Fix a typo in indexing the user manual
bc55a574235 * lisp/menu-bar.el (kill-this-buffer): Doc fix. (Bug#26466)
a6d50401b4b Document 'line-pixel-height'
0c55cf43e61 * search.c (Fre_search_forward, Fre_search_backward): Imp...
c7ed57eaef4 Mention that processes start in default-directory (Bug#18...
856ec9ffa1f * src/xdisp.c (vmessage, message): Clarify commentary.
849a0aaa1c9 Belated fixes for admin.el's M-x make-manuals-dist
84938d79698 default-directory: Remark that it must be a directory name
3f0d047d2eb Delete confuse statement in manual
ee1bd94dd0c Improve packaging documentation
fb18bff91f0 Expand manual section on quitting windows
9a737079645 Fix docstring of dabbrev-abbrev-char-regexp
afe8849bac1 * doc/misc/cl.texi (Iteration Clauses): Clarify example (...
ada79442c07 ;* doc/misc/info.texi (Choose menu subtopic): Improve ind...
d38fd9229c0 Narrow scope of modification hook renabling in org-src fo...
e0e9db4c84a ; Spelling fix
# Conflicts:
# README
# etc/AUTHORS
# etc/HISTORY
# lisp/ldefs-boot.el
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/dabbrev.el | 32 | ||||
| -rw-r--r-- | lisp/menu-bar.el | 5 | ||||
| -rw-r--r-- | lisp/org/org-src.el | 18 | ||||
| -rw-r--r-- | lisp/subr.el | 7 |
4 files changed, 34 insertions, 28 deletions
diff --git a/lisp/dabbrev.el b/lisp/dabbrev.el index 3550d75c46a..9c9dc8a4f38 100644 --- a/lisp/dabbrev.el +++ b/lisp/dabbrev.el @@ -191,23 +191,21 @@ This variable has an effect only when the value of This regexp will be surrounded with \\\\( ... \\\\) when actually used. Set this variable to \"\\\\sw\" if you want ordinary words or -\"\\\\sw\\\\|\\\\s_\" if you want symbols (including characters whose -syntax is \"symbol\" as well as those whose syntax is \"word\". - -The value nil has a special meaning: the abbreviation is from point to -previous word-start, but the search is for symbols. - -For instance, if you are programming in Lisp, `yes-or-no-p' is a symbol, -while `yes', `or', `no' and `p' are considered words. If this -variable is nil, then expanding `yes-or-no-' looks for a symbol -starting with or containing `no-'. If you set this variable to -\"\\\\sw\\\\|\\\\s_\", that expansion looks for a symbol starting with -`yes-or-no-'. Finally, if you set this variable to \"\\\\sw\", then -expanding `yes-or-no-' signals an error because `-' is not part of a word; -but expanding `yes-or-no' looks for a word starting with `no'. - -The recommended value is nil, which will make dabbrev default to -using \"\\\\sw\\\\|\\\\s_\"." +\"\\\\sw\\\\|\\\\s_\" if you want symbols (including characters +whose syntax is \"symbol\" as well as those whose syntax is +\"word\"). The abbreviation is from point to the start of the +previous sequence of characters matching this variable. + +The default value of nil is equivalent to \"\\\\sw\\\\|\\\\s_\". + +For instance, suppose the current buffer is in `c-mode'. If this +variable is nil or \"\\\\sw\\\\|\\\\s_\", then expanding +`debug_print_in_' looks for a symbol starting with +`debug_print_in_'. If you set this variable to \"\\\\sw\", that +expansion looks for a word prefixed with `in_' (e.g., it would +match `in_range', but not `in_close_range'). If expanding +`debug_print_in' it would look for a word starting with +`in' (e.g. `integer')." :type '(choice (const nil) regexp) :group 'dabbrev) diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el index 28464f13df7..719173c7e1e 100644 --- a/lisp/menu-bar.el +++ b/lisp/menu-bar.el @@ -1898,7 +1898,10 @@ updating the menu." (defun kill-this-buffer () ; for the menu bar "Kill the current buffer. When called in the minibuffer, get out of the minibuffer -using `abort-recursive-edit'." +using `abort-recursive-edit'. + +This command can be reliably invoked only from the menu bar, +otherwise it could decide to silently do nothing." (interactive) (cond ;; Don't do anything when `menu-frame' is not alive or visible diff --git a/lisp/org/org-src.el b/lisp/org/org-src.el index caa6526435b..4eb8a531b85 100644 --- a/lisp/org/org-src.el +++ b/lisp/org/org-src.el @@ -919,15 +919,15 @@ fontification of code blocks see `org-src-fontify-block' and ;; from `jit-lock-function' (Bug#25132). (let ((inhibit-modification-hooks nil)) (delete-region (point-min) (point-max)) - (insert string " ") ;; so there's a final property change - (unless (eq major-mode lang-mode) (funcall lang-mode)) - (org-font-lock-ensure) - (setq pos (point-min)) - (while (setq next (next-single-property-change pos 'face)) - (put-text-property - (+ start (1- pos)) (1- (+ start next)) 'face - (get-text-property pos 'face) org-buffer) - (setq pos next)))) + (insert string " ")) ;; so there's a final property change + (unless (eq major-mode lang-mode) (funcall lang-mode)) + (org-font-lock-ensure) + (setq pos (point-min)) + (while (setq next (next-single-property-change pos 'face)) + (put-text-property + (+ start (1- pos)) (1- (+ start next)) 'face + (get-text-property pos 'face) org-buffer) + (setq pos next))) (add-text-properties start end '(font-lock-fontified t fontified t font-lock-multiline t)) diff --git a/lisp/subr.el b/lisp/subr.el index 1dd5d2ffef9..02e79932233 100644 --- a/lisp/subr.el +++ b/lisp/subr.el @@ -2077,7 +2077,12 @@ arguments PROGRAM-ARGS are strings to give program as arguments. If you want to separate standard output from standard error, use `make-process' or invoke the command through a shell and redirect -one of them using the shell syntax." +one of them using the shell syntax. + +The process runs in `default-directory' if that is local (as +determined by `unhandled-file-name-directory'), or \"~\" +otherwise. If you want to run a process in a remote directory +use `start-file-process'." (unless (fboundp 'make-process) (error "Emacs was compiled without subprocess support")) (apply #'make-process |
