diff options
| author | Paul Eggert | 2015-03-03 14:29:22 -0800 |
|---|---|---|
| committer | Paul Eggert | 2015-03-03 14:29:22 -0800 |
| commit | f15c8583198c3d6c26ca0c0a5b6fb019f98d6c3c (patch) | |
| tree | 7068ac99c5729e94a93a4a0ae7ddd1acbb7d2c01 /lisp | |
| parent | 118a31a3b1eb08cba14887c3134054e9b4383688 (diff) | |
| parent | ec26c23f4815fbc6bbd16d20f400721bc7b58344 (diff) | |
| download | emacs-f15c8583198c3d6c26ca0c0a5b6fb019f98d6c3c.tar.gz emacs-f15c8583198c3d6c26ca0c0a5b6fb019f98d6c3c.zip | |
Merge from origin/emacs-24
ec26c23 authors.el: Add missing ignored and renamed files
e589765 A more thorough fix for bug#19307
4e8d586 Fix last commit
d6fee01 Tramp: Don't use a tempfile for ControlPath.
27e11c0 Fix display of overlay strings with faces after ellipsis (Bug#19307)
e9a7e10 Fix redrawing of mode lines when exposed (Bug#19721)
50f3811 net/tramp.el (tramp-ssh-controlmaster-options): Use "%C"
Conflicts:
lisp/ChangeLog
src/ChangeLog
src/xdisp.c
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ChangeLog | 21 | ||||
| -rw-r--r-- | lisp/net/tramp.el | 25 |
2 files changed, 38 insertions, 8 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index db1358cd2fe..8083fb85cea 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,24 @@ | |||
| 1 | 2015-03-03 Nicolas Petton <nicolas@petton.fr> | ||
| 2 | |||
| 3 | * emacs-lisp/authors.el (authors-ignored-files) | ||
| 4 | (authors-renamed-files-alist): Additions. | ||
| 5 | |||
| 6 | 2015-03-03 Michael Albinus <michael.albinus@gmx.de> | ||
| 7 | |||
| 8 | * net/tramp.el (tramp-ssh-controlmaster-options): Don't use a | ||
| 9 | tempfile for ControlPath. (Bug#19702) | ||
| 10 | |||
| 11 | 2015-03-03 Michael Albinus <michael.albinus@gmx.de> | ||
| 12 | |||
| 13 | * net/tramp.el (tramp-ssh-controlmaster-options): Use "%C" for | ||
| 14 | ControlPath if possible. (Bug#19702) | ||
| 15 | |||
| 16 | 2015-03-03 Glenn Morris <rgm@gnu.org> | ||
| 17 | |||
| 18 | * emacs-lisp/authors.el (authors-obsolete-files-regexps) | ||
| 19 | (authors-valid-file-names, authors-renamed-files-alist): Additions. | ||
| 20 | |||
| 21 | 2015-03-03 Alan Mackenzie <acm@muc.de> | ||
| 1 | 2015-03-03 Alan Mackenzie <acm@muc.de> | 22 | 2015-03-03 Alan Mackenzie <acm@muc.de> |
| 2 | 23 | ||
| 3 | CC Mode: Stop Font Lock forcing fontification from BOL. Fixes | 24 | CC Mode: Stop Font Lock forcing fontification from BOL. Fixes |
diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el index ba0d13eab8b..a03affa5eeb 100644 --- a/lisp/net/tramp.el +++ b/lisp/net/tramp.el | |||
| @@ -311,17 +311,26 @@ useful only in combination with `tramp-default-proxies-alist'.") | |||
| 311 | (let ((result "") | 311 | (let ((result "") |
| 312 | (case-fold-search t)) | 312 | (case-fold-search t)) |
| 313 | (ignore-errors | 313 | (ignore-errors |
| 314 | (with-temp-buffer | 314 | (when (executable-find "ssh") |
| 315 | (call-process "ssh" nil t nil "-o" "ControlMaster") | ||
| 316 | (goto-char (point-min)) | ||
| 317 | (when (search-forward-regexp "missing.+argument" nil t) | ||
| 318 | (setq result "-o ControlPath=%t.%%r@%%h:%%p -o ControlMaster=auto"))) | ||
| 319 | (unless (zerop (length result)) | ||
| 320 | (with-temp-buffer | 315 | (with-temp-buffer |
| 321 | (call-process "ssh" nil t nil "-o" "ControlPersist") | 316 | (call-process "ssh" nil t nil "-o" "ControlMaster") |
| 322 | (goto-char (point-min)) | 317 | (goto-char (point-min)) |
| 323 | (when (search-forward-regexp "missing.+argument" nil t) | 318 | (when (search-forward-regexp "missing.+argument" nil t) |
| 324 | (setq result (concat result " -o ControlPersist=no")))))) | 319 | (setq result "-o ControlMaster=auto"))) |
| 320 | (unless (zerop (length result)) | ||
| 321 | (with-temp-buffer | ||
| 322 | (call-process | ||
| 323 | "ssh" nil t nil "-o" "ControlPath=%C" "host.does.not.exist") | ||
| 324 | (goto-char (point-min)) | ||
| 325 | (if (search-forward-regexp "unknown.+key" nil t) | ||
| 326 | (setq result | ||
| 327 | (concat result " -o ControlPath='tramp.%%r@%%h:%%p'")) | ||
| 328 | (setq result (concat result " -o ControlPath='tramp.%%C'")))) | ||
| 329 | (with-temp-buffer | ||
| 330 | (call-process "ssh" nil t nil "-o" "ControlPersist") | ||
| 331 | (goto-char (point-min)) | ||
| 332 | (when (search-forward-regexp "missing.+argument" nil t) | ||
| 333 | (setq result (concat result " -o ControlPersist=no"))))))) | ||
| 325 | result) | 334 | result) |
| 326 | "Call ssh to detect whether it supports the Control* arguments. | 335 | "Call ssh to detect whether it supports the Control* arguments. |
| 327 | Return a string to be used in `tramp-methods'.") | 336 | Return a string to be used in `tramp-methods'.") |