aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/eshell
diff options
context:
space:
mode:
authorPaul Eggert2017-01-01 01:02:45 -0800
committerPaul Eggert2017-01-01 01:02:45 -0800
commit4f7a90bf6ce831063d721324e712f8c38e85c678 (patch)
tree73e980746ddc55c4285d145769a94b2845cbfcdf /lisp/eshell
parent620e5a3cd4464aaffaa3568d6f6b89764de5cfbd (diff)
parent9adb101353e1f3d41a8f822fa4164e9b41e82ce5 (diff)
downloademacs-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.el4
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)