diff options
| author | Paul Eggert | 2017-01-01 01:02:45 -0800 |
|---|---|---|
| committer | Paul Eggert | 2017-01-01 01:02:45 -0800 |
| commit | 4f7a90bf6ce831063d721324e712f8c38e85c678 (patch) | |
| tree | 73e980746ddc55c4285d145769a94b2845cbfcdf /lisp/eshell | |
| parent | 620e5a3cd4464aaffaa3568d6f6b89764de5cfbd (diff) | |
| parent | 9adb101353e1f3d41a8f822fa4164e9b41e82ce5 (diff) | |
| download | emacs-4f7a90bf6ce831063d721324e712f8c38e85c678.tar.gz emacs-4f7a90bf6ce831063d721324e712f8c38e85c678.zip | |
Merge from origin/emacs-25
9adb101 Document 'describe-fontset'
229315c ; Add missing symbol quoting.
3d94931 Repair desktop restoration on text terminals
43022f9 Ignore forward-sexp-function in js-mode indentation code
b19fb49 Improve documentation of 'define-coding-system'
467768f Fix Bug#25162
6db78ae Fix a typo in define-abbrev-table
5f7d906 Bump makeinfo requirement from 4.7 to 4.13
442e2f6 Fixes related to select-enable-clipboard
e4ac450 Define struct predicate before acccesors
08decbd Doc fix for vc-git
5531e75 Further improve make-dist checking
953bf67 Improve previous make-dist change
129645a Make make-dist --snapshot do some sanity checks
# Conflicts:
# lisp/menu-bar.el
Diffstat (limited to 'lisp/eshell')
| -rw-r--r-- | lisp/eshell/esh-io.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/eshell/esh-io.el b/lisp/eshell/esh-io.el index 1b4f4093168..e88a4e0f66d 100644 --- a/lisp/eshell/esh-io.el +++ b/lisp/eshell/esh-io.el | |||
| @@ -125,7 +125,7 @@ from executing while Emacs is redisplaying." | |||
| 125 | 'eshell-kill-append) t) | 125 | 'eshell-kill-append) t) |
| 126 | ("/dev/clip" (lambda (mode) | 126 | ("/dev/clip" (lambda (mode) |
| 127 | (if (eq mode 'overwrite) | 127 | (if (eq mode 'overwrite) |
| 128 | (let ((gui-select-enable-clipboard t)) | 128 | (let ((select-enable-clipboard t)) |
| 129 | (kill-new ""))) | 129 | (kill-new ""))) |
| 130 | 'eshell-clipboard-append) t)) | 130 | 'eshell-clipboard-append) t)) |
| 131 | "Map virtual devices name to Emacs Lisp functions. | 131 | "Map virtual devices name to Emacs Lisp functions. |
| @@ -325,7 +325,7 @@ last execution result should not be changed." | |||
| 325 | (defun eshell-clipboard-append (string) | 325 | (defun eshell-clipboard-append (string) |
| 326 | "Call `kill-append' with STRING, if it is indeed a string." | 326 | "Call `kill-append' with STRING, if it is indeed a string." |
| 327 | (if (stringp string) | 327 | (if (stringp string) |
| 328 | (let ((gui-select-enable-clipboard t)) | 328 | (let ((select-enable-clipboard t)) |
| 329 | (kill-append string nil)))) | 329 | (kill-append string nil)))) |
| 330 | 330 | ||
| 331 | (defun eshell-get-target (target &optional mode) | 331 | (defun eshell-get-target (target &optional mode) |