1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-27 07:37:33 +00:00

(tramp-send-string): Handle empty string.

This commit is contained in:
Andreas Schwab 2003-04-04 11:33:54 +00:00
parent aa8b70aef5
commit 49914e046a
2 changed files with 6 additions and 1 deletions

View File

@ -1,3 +1,7 @@
2003-04-04 Andreas Schwab <schwab@suse.de>
* net/tramp.el (tramp-send-string): Handle empty string.
2003-04-03 Richard M. Stallman <rms@gnu.org>
* emacs-lisp/easymenu.el (easy-menu-define):

View File

@ -5657,7 +5657,8 @@ the remote host use line-endings as defined in the variable
(mapconcat 'identity
(split-string string "\n")
tramp-rsh-end-of-line))
(unless (string-equal (substring string -1) tramp-rsh-end-of-line)
(unless (or (string= string "")
(string-equal (substring string -1) tramp-rsh-end-of-line))
(setq string (concat string tramp-rsh-end-of-line)))
;; send the string
(if (and tramp-chunksize (not (zerop tramp-chunksize)))